软件开发培训班 >> 编程开发 >> VbScript


鎷栨嫿鏂囦欢鏄剧ず鏂囦欢璺緞鐨剉bs浠ｇ爜

　　本文标签：vbs鏄剧ず鏂囦欢璺緞

涓嬮潰涓ゆ鍘熺悊閮芥槸涓�鏍风殑锛屽ぇ瀹跺彲浠ョ湅涓?/p>

浠ｇ爜涓�

If wscript.Arguments.count=0 then 
		msgbox "鎷栨嫿鏂囦欢鍒版湰vbs鏂囦欢",0,"鎻愮ず"
End if  
for jb=0 to wscript.Arguments.count-1
	strPath=wscript.Arguments(jb)
	msgbox strPath	
next

鍔犱簡鍒ゆ柇濡傛灉鐩存帴杩愯vbs浼氭彁绀洪渶瑕佹嫋鎷芥枃浠跺埌姝bs鏂囦欢涓?/p>

浠ｇ爜浜?/p>

vbs鎷栨斁鎿嶄綔鐨勯棶棰? 濡備笅,鍙灏嗘枃浠舵垨鏂囦欢澶规嫋鍒拌繖涓猼.vbs涓婂氨鍙互寰楀埌璇ユ枃浠舵垨鏂囦欢澶圭殑璺緞

For Each ar In WScript.Arguments
filename=ar
Next
Msgbox filename

濂戒簡杩欑瘒鏂囩珷灏变粙缁嶅埌杩欎簡锛岄渶瑕佺殑鏈嬪弸鍙互鍙傝�冧竴涓嬨�?/p>