用vbs實現本地添加用戶的腳本
更新時間：2008年06月15日 21:23:29 作者：
這個方法我第一次看到，以前都是用wscript.shell運行，這個是sendkeys方法
Dim WshShell
set WshShell = CreateObject("wscript.Shell")
WshShell.Run "cmd /k"
for i = 1 to 3
WScript.Sleep 500
WshShell.SendKeys "net user admin" & i & " abcd@123 /add"
WshShell.SendKeys "{ENTER}"
next
WshShell.SendKeys "exit"
WshShell.SendKeys "{ENTER}"
set WshShell = CreateObject("wscript.Shell")
WshShell.Run "cmd /k"
for i = 1 to 3
WScript.Sleep 500
WshShell.SendKeys "net user admin" & i & " abcd@123 /add"
WshShell.SendKeys "{ENTER}"
next
WshShell.SendKeys "exit"
WshShell.SendKeys "{ENTER}"
相關文章
2008-01-01
如果你想用遞歸搜索我也沒辦法。下面的程序搜索電腦上所有的MP3文件。2011-01-01
用vbs腳本獲取網卡MAC,CPUID,硬盤序列號的實現代碼
這篇文章主要介紹了用vbs腳本獲取網卡MAC,CPUID,硬盤序列號的實現代碼,需要的朋友可以參考下2019-04-04
VBS教程：屬性-IsReady 屬性...2006-11-11
好多情況下，我們只想保留某個文件或文件夾但對于大量的文件或文件夾刪除起來，比較麻煩，下面這個代碼可以解決這個問題，用vbs實現的刪除文件夾代碼2008-05-05
VBS教程：方法-FolderExists 方法...2006-11-11
VBS教程：函數-DateAdd 函數...2006-11-11
這篇文章主要介紹了如何使用 iisext.vbs 在本地或遠程計算機上啟用 Web 服務擴展文件,需要的朋友可以參考下2014-07-07
你用WshShell.AppActivate("D:\")這個，就是說窗體Caption里要包含"D:\"這個字符串?？赡愦蜷_D盤看看，是這樣的嗎？2008-07-07
下面的hta主要用于實現網易文件的提取，提供這個代碼希望大家學習他的hta編寫2008-06-06