ASPで指定ミリ秒数待たせる
ASPに指定秒数を待たせるSleepがありません。
BASP21などを使えばSleepはありますが、標準機能だけでSleepを行います。
PINGコマンドで指定ミリ秒数待たせるものです。CPUを使いますので負荷にはご注意ください。
Function asp_Wait(Msec)
	Dim oShell
	Set oShell= Server.CreateObject("WScript.Shell")
	Call oShell.run("ping 1.1.1.1 -n 1 -w " & Msec,1,TRUE) 
	' TRUE: PIMGが終わるのを待ちます。
End Function
