Pause i et VBScript
Hvordan får jeg en pause på 5 sekunder i dette VBScript, mellem afvikling af Notepad.exe og window.print()<html>
<head>
<title>Printvenlig</title>
<script language="VBScript" type="text/vbscript">
Function OpenProg(ProgName)
Set ws = CreateObject("WScript.Shell")
ws.Run ProgName
Set ws = Nothing
Her vil jeg gerne have en pause på 5 sekunder så jeg er sikker på at VBScriptet er blevet afviklet inden Notepad.exec startes op.
window.print()
End Function
</script>
</head>
<body onload="OpenProg('c:\winnt\notepad.exe')">
<table border="1" width="40%">
<tr>
<td width="48%" style="background-color: rgb(0,255,0)"> </td>
<td width="52%" style="background-color: rgb(255,0,0)"> </td>
</tr>
<tr>
<td width="48%" style="background-color: rgb(255,255,0)"> </td>
<td width="52%" style="background-color: rgb(0,0,255)"> </td>
</tr>
</table>
</body>
</html>
