Wscript.Echo で止めない為に WSH のテストをする場合エクスプローラからの起動が便利なわけですが、GUI を使用するとどうしても Wscript.exe が起動されて、デバッグの為に表示している Wscript.Echo が 実行毎にダイアログ表示になってしまいます。 これでは、ループ内で処理している場合等は悲惨な事になります。 そうならない為の関数です。 スクリプト自身から再度 Cscript.exe で実行させる 具体的には Cscript.exe で実行して無かった場合にコマンドプロンプトを開いて、そこから Cscript.exe で自分自身を実行させて、終了したら PAUSE します。( Wscript で実行されたスクリプトは終了させます ) ※ スクリプトへの引数は引継ぎます サンプルコード( .vbs ) ▼ 以下のコードでは、Crun 関数がその部分ですが、そ
Shibuya.js in Kyoto にて「WSHでDOM」というタイトルで発表しました。開発に一週間、プレゼン作りに一週間かけた渾身のネタです。プレゼン作りにあたっては、2ページ目のイメージ写真を撮るために祇園祭に出かけたのが楽しかったです。資料に使ったフォントは「アニトM-教漢(無料版)」です。素敵なフォントが比較的自由なライセンスで公開されていて大変ありがたいですね。無料版なので、一部漢字が使えずに文章の変更を余儀なくされましたが、おかげで小学生にも読める分かりやすい資料になりました。ソースコード:http://coderepos.org/share/browser/lang/cplusplus/dom4winui/trunk/srcプレゼン 全画面で見る:http://tech.nitoyon.com/misc/shibuya-js-kyoto/Slide.swfソース:http
【サンプルリスト】 Private Sub Sample() Dim fs As New Scripting.FileSystemObject 'ファイルを移動する1 If (fs.FileExists("c:\work\test.txt")) Then 'コピー元ファイルあり fs.CopyFile "c:\work\test.txt", "c:\temp\" '上書きファイルコピー fs.DeleteFile "c:\work\test.txt", True 'コピー元ファイル削除 End If 'ファイルを移動する2 If (fs.FileExists("c:\work\test1.txt")) Then '移動元ファイルあり If (fs.FileExists("c:\temp\test1.txt")) Then '移動先ファイルあり fs.DeleteFile "c:\temp
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く