如何延迟 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) 我试过这个: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)
截屏:
我从数据库假脱机包,这就是我得到的:
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) 我有这个文本文件需要检查:
\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);\nRun Code Online (Sandbox Code Playgroud)\n\n该模式将包含一个变量:
\n\nvar = "saveAssured"\nreMethod.Pattern = """& var &""[.]equals\\(ACTION\\).{\\n.\\w+?.=.\\w+?[.](\\w+?)\\(\\w+?\\)"\nRun Code Online (Sandbox Code Playgroud)\n\n我需要从文本文件中捕获第二个“saveAssured”。并且 \'\\n\' (新行)似乎不起作用。我用对了吗?我还可以尝试哪些其他步骤?
\n