小编lad*_*792的帖子

如何在VB Script中延迟?

如何延迟 Vb 脚本?以下代码对我不起作用:

wscript.sleep 1000
Run Code Online (Sandbox Code Playgroud)
Delay 10

Sub Delay( seconds )
    Dim wshShell, strCmd
    Set wshShell = CreateObject( "Wscript.Shell" )
    strCmd = "%COMSPEC% /C (PING -n " & ( seconds + 1 ) & " 127.0.0.1 >NUL 2>&1 || PING -n " & seconds & " ::1 >NUL 2>&1)"
    wshShell.Run strCmd, 0, 1
    Set wshShell = Nothing
End Sub
Run Code Online (Sandbox Code Playgroud)
dim oshell 
set oshell = CreateObject("Wscript.Shell") 


obshell.run "%windir%\system32\rundll32.exe kernel32.dll Sleep 5000" 
Run Code Online (Sandbox Code Playgroud)

vbscript wsh delay setup-project visual-studio-2010

5
推荐指数
1
解决办法
5406
查看次数

Jquery确认不起作用

我试过这个:https : //stackoverflow.com/a/12617274/4164311。字符串“Are you sure about this”刚刚出现在我的浏览器中,当我点击按钮时没有任何反应。

<html lang="en">
<head>
  <meta charset="utf-8">
  <title>jQuery UI Dialog - Modal confirmation</title>

  <link rel="stylesheet" href="jquery-ui.min.css">
  <script src="external/jquery/jquery.js"></script>
  <script src="jquery-ui.min.js"></script>

  <script>
   $("#dialog").dialog({
   autoOpen: false,
   modal: true,
   buttons : {
        "Confirm" : function() {
            alert("You have confirmed!");            
        },
        "Cancel" : function() {
          $(this).dialog("close");
        }
      }
    });

    $("#callConfirm").on("click", function(e) {
      e.preventDefault();
      $("#dialog").dialog("open");
    });
  </script>
</head>
<body>
<button id="callConfirm">Confirm!</button>

<div id="dialog" title="Confirmation Required">
  Are you sure about this?
</div>
</body>
</html>
Run Code Online (Sandbox Code Playgroud)

截屏:

在此处输入图片说明

jquery confirm jquery-ui confirmation

3
推荐指数
1
解决办法
7987
查看次数

如何删除SQL Plus假脱机中不必要的换行符?

我从数据库假脱机包,这就是我得到的:

CREATE OR REPLACE PACKAGE BODY "CPI"."GIPI_WBOND_BASIC_PKG"                   
    AS                                                                              
       FUNCTION get_gipi_wbond_basic (p_par_id gipi_wbond_basic.par_id%TYPE)        
          RETURN gipi_wbond_basic_tab PIPELINED                                     
       IS                                                                           
          v_wbond   gipi_wbond_basic_type;                                          
       BEGIN                                                                        
          FOR i IN (SELECT a.par_id,        a.obligee_no,    a.bond_dtl,      a.inde
    mnity_text,                                                                     
                           a.clause_type,   a.waiver_limit,  a.contract_date, a.cont
    ract_dtl,                                                                       
                           a.prin_id,       a.co_prin_sw,    a.np_no,         a.coll
    _flag,                                                                          
                           a.plaintiff_dtl, a.defendant_dtl, a.civil_case_no        
                      FROM gipi_wbond_basic a                                       
                     WHERE a.par_id = p_par_id)  
Run Code Online (Sandbox Code Playgroud)

我希望它是这样的:

CREATE OR REPLACE PACKAGE BODY cpi.gipi_wbond_basic_pkg
AS
   FUNCTION get_gipi_wbond_basic (p_par_id gipi_wbond_basic.par_id%TYPE)
      RETURN gipi_wbond_basic_tab PIPELINED
   IS
      v_wbond   gipi_wbond_basic_type;
   BEGIN
      FOR i IN (SELECT a.par_id, a.obligee_no, a.bond_dtl, a.indemnity_text,
                       a.clause_type, a.waiver_limit, a.contract_date,
                       a.contract_dtl, a.prin_id, …
Run Code Online (Sandbox Code Playgroud)

sql database command-line sqlplus spool

1
推荐指数
1
解决办法
1万
查看次数

使用 VB 脚本的多行 REGEX

我有这个文本文件需要检查:

\n\n
} else if ("saveAssured".equals(ACTION))\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0\xc2\xa0{\n\xc2\xa0 \xc2\xa0Integer assuredNo =\xc2\xa0giisAssuredService.saveAssured(assured);\n
Run Code Online (Sandbox Code Playgroud)\n\n

该模式将包含一个变量:

\n\n
var = "saveAssured"\nreMethod.Pattern = """& var &""[.]equals\\(ACTION\\).{\\n.\\w+?.=.\\w+?[.](\\w+?)\\(\\w+?\\)"\n
Run Code Online (Sandbox Code Playgroud)\n\n

我需要从文本文件中捕获第二个“saveAssured”。并且 \'\\n\' (新行)似乎不起作用。我用对了吗?我还可以尝试哪些其他步骤?

\n

regex vbscript text

0
推荐指数
1
解决办法
2479
查看次数