ディレクトリ選択してコマンドプロンプト

  Console.vbs



  
Set Shell = CreateObject( "Shell.Application" )
Set WshShell = CreateObject( "WScript.Shell" )

Set objFolder = Shell.BrowseForFolder( 0, "フォルダ選択", 11, 0 )
if objFolder is nothing then
	Wscript.Quit
end if

WshShell.CurrentDirectory = objFolder.Self.Path
WshShell.Run( "cmd.exe" )
  












   SQLの窓    create:2005/08/28  update:2014/09/07   管理者用(要ログイン)





フリーフォントWEBサービス

SQLの窓WEBサービス

SQLの窓フリーソフト

写真素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ