FileZilla Client 用に作りましたが、どこでも使えると思います。ただ、呼び出し方は wscript.exe の正しい位置をパスで指定して "" で囲う事が重要です ▼ 例 "C:\Windows\System32\wscript.exe" "C:\user\runext.vbs"FileZilla は、設定したエディタで開くと、その開かれたファイルは監視されて更新されるとアップロードするかどうか聞いてきます。つまり、直接サーバーのファイルを更新するような作業ができます。ただ、エディタを一つしか指定できないので、このようなランチャーを登録してやると、テキストも画像も変更した後にすぐサーバへアップロードできます。また、複数開いても全て監視されるので、更新されたものが対象となります。とても便利です。
Set WshShell = WScript.CreateObject("WScript.Shell")
Dim aData,strExt,strExe
strExt = ""
aData = Split( Wscript.Arguments(0), "." )
if Ubound( aData ) > 0 then
strExt = UCase( aData( Ubound( aData ) ) )
end if
' 拡張子別エディタ
if strExt = "JPG" then
strExe = "MSPAINT.EXE"
RunExt( strExe )
Wscript.Quit
end if
if strExt = "JPEG" then
strExe = "MSPAINT.EXE"
RunExt( strExe )
Wscript.Quit
end if
if strExt = "PNG" then
strExe = "MSPAINT.EXE"
RunExt( strExe )
Wscript.Quit
end if
if strExt = "GIF" then
strExe = "MSPAINT.EXE"
RunExt( strExe )
Wscript.Quit
end if
' デフォルトのエディタ
strExe = "C:\Program Files\tpad093\TeraPad.exe"
RunExt( strExe )
Function RunExt( path )
WshShell.Run( """" & path & """" & " " _
& """" & Wscript.Arguments(0) & """" )
End Function
関連する記事 FileZilla FTP クライアントのサーバー情報の引っ越し作業 WEB 上のファイルに使用できる文字と FileZilla
|
|
【VBScriptの最新記事】
- 指定した位置でレジストリエディタを開く為の VBScript をダウンロードします
- VBScript(WSH) と PHP(7.3) で氏名をランダムに作成
- VBScript : XCOPYで新しいファイルのみバックアップする為のスクリプトを作成するスクリプト
- VBScript + PowerShell : PowerShell がファイルを開くダイアログで取得したパスをテキストファイル経由で VBScript に戻して使用する
- VBScript : XMLファイルのテキストノードの値の更新
- HTA : 指定したキーでレジストリエディタを開く
- WSH(VBScript) : 指定したキーでレジストリエディタを開く
- VBScript : WEB上のHTMLを使用して、InternetExplorer.Application でパスワード入力を実装する
- VBS : 正規表現で、URL リストの中のドメイン部分のみを取り出す
- 文字列を指定してその名前の変数でオブジェクトを作成する : WEB に VBScript ライブラリ
- 実行中のスクリプトのタイプを知る : WEB に VBScript ライブラリ
