拡張子は .wsf です 拡張子:txtvbswsfjsphpjavahtmlutf8sjis <JOB> <COMMENT> ************************************************************ WSH 実行スケルトン ************************************************************ </COMMENT> <COMMENT> ************************************************************ 外部スクリプト定義 ************************************************************ </COMMENT> <SCRIPT language="VBScript" src="http://lightbox.in.coocan.jp/laylaClass.vbs"> </SCRIPT> <SCRIPT language=VBScript> ' *********************************************************** ' 処理開始 ' *********************************************************** Call laylaFunctionTarget( "http://lightbox.in.coocan.jp/" ) Call laylaLoadFunction( "baseFunction.vbs" ) Call laylaLoadFunction( "toolFunction.vbs" ) Crun Call GetObj("Stream1", "ADODB.Stream") Call GetObj("Stream2", "ADODB.Stream") Stream1.Open Stream1.Type = 2 Stream1.Charset = "shift_jis" 'Stream1.Charset = "euc-jp" 'Stream1.Charset = "utf-8" 'Stream1.Charset = "Unicode" 'Stream1.Charset = "ISO-2022-JP" ' JIS ' 入力ファイル Stream1.LoadFromFile ScriptDir & "\test1.txt" Stream2.Open 'Stream2.Charset = "shift_jis" Stream2.Charset = "euc-jp" 'Stream2.Charset = "utf-8" 'Stream2.Charset = "Unicode" 'Stream2.Charset = "ISO-2022-JP" ' JIS Stream1.CopyTo Stream2 Stream1.Close ' 出力ファイル Stream2.SaveToFile ScriptDir & "\test2.txt", 2 Stream2.Close </SCRIPT> </JOB> SaveToFile オプションの 2 は 上書きを意味します ライブラリ無しで、通常処理で動作します
拡張子は .wsf です
<JOB> <COMMENT> ************************************************************ WSH 実行スケルトン ************************************************************ </COMMENT> <COMMENT> ************************************************************ 外部スクリプト定義 ************************************************************ </COMMENT> <SCRIPT language="VBScript" src="http://lightbox.in.coocan.jp/laylaClass.vbs"> </SCRIPT> <SCRIPT language=VBScript> ' *********************************************************** ' 処理開始 ' *********************************************************** Call laylaFunctionTarget( "http://lightbox.in.coocan.jp/" ) Call laylaLoadFunction( "baseFunction.vbs" ) Call laylaLoadFunction( "toolFunction.vbs" ) Crun Call GetObj("Stream1", "ADODB.Stream") Call GetObj("Stream2", "ADODB.Stream") Stream1.Open Stream1.Type = 2 Stream1.Charset = "shift_jis" 'Stream1.Charset = "euc-jp" 'Stream1.Charset = "utf-8" 'Stream1.Charset = "Unicode" 'Stream1.Charset = "ISO-2022-JP" ' JIS ' 入力ファイル Stream1.LoadFromFile ScriptDir & "\test1.txt" Stream2.Open 'Stream2.Charset = "shift_jis" Stream2.Charset = "euc-jp" 'Stream2.Charset = "utf-8" 'Stream2.Charset = "Unicode" 'Stream2.Charset = "ISO-2022-JP" ' JIS Stream1.CopyTo Stream2 Stream1.Close ' 出力ファイル Stream2.SaveToFile ScriptDir & "\test2.txt", 2 Stream2.Close </SCRIPT> </JOB>
SaveToFile オプションの 2 は 上書きを意味します ライブラリ無しで、通常処理で動作します