これはHTAスクリプトです。次のコードをコピーしてから、ファイルの接尾辞をCCC.htaに変更して使用します。元のスクリプトは、myitforum.comのものです
「接続ファイル」
/コンソール
/管理者
/w:xxx
/H:xxx
/公共
/スパン
/編集
/移動します
実行可能なリモートデスクトップ接続の完全なリストの実行ラインからのスイッチスイッチは、MSTSC /?
ヒント:読み取る行で:
<入力タイプ= "Radio" name = "radioption" value = "serverone">サーバー1 <br>
必要に応じて、値= "ServerOne"をマシンIPアドレスに変更するか、以下の例のように、サーバー1マシン名値をより説明的な名前に変更できます。
<入力型= "Radio" name = "radioption" value = "sms001">プライマリ<br>
<入力タイプ= "Radio" name = "radioption" value = "sms002"> secondary <br>
HTAスクリプト:
コードは次のとおりです。
<html>
<head>
<title>リモートデスクトップチューザー</title>
<style>
ボディ{背景色:コーンシルク}
</style>
<HTA:アプリケーション
キャプション=はい
境界線=厚
スクロール=いいえ
showintaskbar = no
MaximizeButton =はい
Button =はい>を最小限に抑えます
<スクリプト言語= vbscript>
sub window_onload
window.resizeto 400,250
End Sub
サブWindowsload
ラジオオプションの各objbuttonについて
objbutton.チェックした場合
set wshell = createObject( "wscript.shell")
wshshell.run "mstsc /v"&objbutton.value& " /f"
ifを終了します
次
self.close()
End Sub
</script> <body>
<p> <h3 align = center> <font color = 'orange'> myitforum.comにアクセスしてください</font> </h3>
<div> </div>
<table align = 'center'>
<入力型= "Radio" name = "172.16.24.100" value = "serverone"> 172.16.24.100 <br>
<入力型= "Radio" name = "radioption" value = "servertwo">サーバー2 <br>
<入力型= "Radio" name = "radioption" value = "serverthree">サーバー3 <p>
<入力ID = runbutton type = "button" value = "run script" name = "run_button" onclick = "windowsload">
<span id = "dataarea"> </span> </body> </html>