ここでスレッドを検索しましたが、何をしようとしているのか遠隔に何も見つかりませんでした。基本的に私は、onClickのjavascriptを使ってvbscriptを呼びたいと思います。JavaScriptからVBscriptを呼び出すにはどうすればよいですか?
Javascript onmouseoverイベントとonmouseoutイベントを使用するボタンからonClickイベントのaVBScriptを呼び出す方法はありますか?
私はそれが機能して助けを必要とするように思えません。
Javascriptコード::以下は、私が呼び出すしたいと思い、私のjavascriptのコードのスニペットともVBスクリプトである私がやりたい何
<td align="center">
<input onMouseOver="window.status=me.value" onMouseOut="window.status=''" onMouseOver="window.status=me.value" onMouseOut="window.status=''" type="button" value="Impersonation" class="redBtn" onClick="openPopup('http://internal.mps.cardinal.net/cardcom/index.asp')" />
</td>
<td align="center">
<input onMouseOver="window.status=me.value" onMouseOut="window.status=''" onMouseOver="window.status=me.value" onMouseOut="window.status=''" type="button" value="ServiceNow" class="normalBtn" onClick="openPopup('https://cardinal.service-now.com/navpage.do')" />
</td>
はServiceNowクリック時のVBScriptを呼び出すですイベント。
私のVBスクリプト:エラー時に WScript.Quitメイン
Function Main
Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
IE.Visible = True
IE.Navigate "https://cardinal.service-now.com/navpage.do"
Wait IE
With IE.Document
On Error Resume Next
.GetElementsByName("EnterpriseID")(0).value = "admin"
.GetElementsByName("PASSWORD")(0).value = "admin"
End With
IE.Document.getElementByID("SignInBtn").Click
End Function
Sub Wait(IE)
Do
WScript.Sleep 500
Loop While IE.ReadyState < 4 And IE.Busy
Do
WScript.Sleep 500
Loop While IE.ReadyState < 4 And IE.Busy
End Sub
Sub IE_OnQuit
次 WScript.StdErr.WriteLine再開 "スクリプトが終了する前にIEを閉じたの。" WScript.Quit End Subのは
はいあなたは、このサンプルはJSでonmouseover/out
とVBScriptでonClick
を使用していることを行うことができますあなたが
ewww .... .... peopleまだブラウザでVBScriptを使用しますか?なぜあなたはそのようなことをしますか? – Spudley
@Spudleyのレガシーコード? –