![[PukiWiki]](image/../localimages/Atom.gif "[PukiWiki]")
NVR500のVPNをTeratermマクロでON/OFF †更新日2023-03-17 (金) 16:52:38
作成日:2023年3月17日
マクロファイルは全てUTF-8で作成 VPNの状態をTextファイルに書き出しするマクロ †書き出しファイル:c:\Temp\data.txt VPN_Status.ttl †;==============================================
;; 接続先サーバ・ユーザ名・パスワード設定
HOSTADDR = '/I 192.168.100.40' ; /IはWindowの非表示
USERNAME = ''
PASSWORD = '*****'
PATH = 'c:\Temp\'
filename='Data.txt'
timeout=1
;==============================================
;; �．灰泪鵐描販�て
COMMAND = HOSTADDR
strconcat COMMAND ':23 /nossh /T=1'
;; �▲機璽仞楝�
connect COMMAND
;; ��ログイン情報応答（ユーザ名・パスワード）
;; wait 'login:'
;; sendln USERNAME
wait 'Password:'
sendln PASSWORD
changedir PATH
fileopen handle filename 0; 上書きモード
setsync 1 ; 同期モードの開始
wait '>'
sendln 'console character ja.utf8'
wait '>'
sendln 'console lines infinity' ;「---つづく---」などで出力停止を行なわない
wait '>'
sendln 'show config'
recvln ; 「> show config」がinputstr入るので、読み捨て
sendln ;Enterを一度入力すると>が命令実行後表示される
result=0
while result = 0
tmp_result = result
strscan inputstr 'l2tp service'
if result = 1 then
filewriteln handle inputstr
endif
result = tmp_result
recvln
strscan inputstr '>' ;inputstrはrecvlnで取得した1行の文字列
endwhile
setsync 0
;; �ぅ泪�ロ終了
sendln 'exit'
end
VPNをON/OFFするマクロ †例はON、OFFは2か所変更 VPN_ON.ttl †;============================================== ;; 接続先サーバ・ユーザ名・パスワード設定 HOSTADDR = '/I 192.168.100.40' ; /IはWindowの非表示 USERNAME = '' PASSWORD = '****' ;;VPNをONにする → ONをOFFに変更 ;============================================== ;; �．灰泪鵐描販�て COMMAND = HOSTADDR strconcat COMMAND ':23 /nossh /T=1' ;; �▲機璽仞楝� connect COMMAND ;; ��ログイン情報応答（ユーザ名・パスワード） ;; wait 'login:' ;; sendln USERNAME wait 'Password:' sendln PASSWORD wait '>' sendln 'console character ja.utf8' wait '>' sendln 'administrator' wait 'Password:' sendln PASSWORD wait '#' sendln 'l2tp service on' → onをoffに変更 wait '#' sendln 'exit' wait '新しい設定を保存しますか? (Y/N)' send 'N' wait '>' ;; �ぅ泪�ロ終了 sendln 'exit' end バッチファイル †OFFも同じように作成 -VPN_ON.bat †@echo off c:\Temp\VPN_ON.ttl c:\Temp\VPN_Status.ttl |
