(鍏跺疄鎴戜笉鏄綉绠★紝璇︽儏璇风湅……) 鍏充簬缃戠涔嬭矾鐨勮鏄
銆恮indows銆憊bs鏇存敼3389杩滅▼妗岄潰绔彛鐨勮剼鏈
浣滆:smoile|鏃ユ湡:2008-06-11 23:20:59(5352澶╁墠)
鐢╲bscript瀹炵幇鐨勪慨鏀规湇鍔″櫒3389绔彛鐨勪唬鐮侊紝姣旇緝鏂逛究浣跨敤锛屼笉鐢ㄦ瘡娆￠兘瑕佽繘娉ㄥ唽琛ㄤ慨鏀癸紝鏂逛究澶у
绋嬪簭浠ｇ爜
绋嬪簭浠ｇ爜Set WshShell=CreateObject("Wscript.Shell")
Function Imput()
imputport=InputBox("璇疯緭鍏ヤ竴涓鍙ｅ彿锛屾敞鎰忥細杩欎釜绔彛鍙风洰鍓嶄笉鑳借鍏跺畠绋嬪簭浣跨敤锛屽惁鍒欎細褰卞搷缁堢鏈嶅姟"," 鏇存敼缁堢绔彛鍙", "3389", 100, 100)
If imputport<>"" Then
Function Imput()
imputport=InputBox("璇疯緭鍏ヤ竴涓鍙ｅ彿锛屾敞鎰忥細杩欎釜绔彛鍙风洰鍓嶄笉鑳借鍏跺畠绋嬪簭浣跨敤锛屽惁鍒欎細褰卞搷缁堢鏈嶅姟"," 鏇存敼缁堢绔彛鍙", "3389", 100, 100)
If imputport<>"" Then
銆恮indows銆憁stsc鍜宮stsc /console鐨勫尯鍒
浣滆:smoile|鏃ユ湡:2007-12-19 11:49:03(5527澶╁墠)
- 1
