Мне нужно вызвать две функции для одного события клика. а также функции должны выполняться последовательно. Я пытался <button onclick="copy();zip();"> click me </button>. Но это не работает. Он не вызывает ни одну из функций.
Вот полный код:
<html>
<head>
<script type="text/vbscript">
function copy()
Dim WshShell, oExec,g,h
h="D:\d"
g="xcopy " & h & " " & "D:\y\ /E"
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec(g)
Do While oExec.Status = 0
WScript.Sleep 100
Loop
WScript.Echo oExec.Status
end function
function zip()
Dim WshShel, oExe
Set WshShel = CreateObject("WScript.Shell")
Set oExe = WshShel.Exec("cmd /c cd D:\d & D: & winzip32.exe -min -a D:\a")
Do While oExe.Status = 0
WScript.Sleep 100
Loop
WScript.Echo oExe.Status
end function
</script>
</head>
<body>
<button onclick="copy();zip();"> click me </button>
</body>
</html>