有哪些信誉好的足球投注网站- 1、本文档共3页，可阅读全部内容。
- 2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
新装的电脑，我喜欢用VBS，来实现，计算机名、IP、子网、网关、DNS、WINS及域的自动加入。因为楼主的方法需要先装SUPPOT工具。感觉很麻烦。感觉脚本很方便：下面是我的脚本内容。不过各有各的好处。看大家选择。首先的脚本有两个VBS文件，一个是renamecomputer.vbs，用于计算机名称;二是joindomain.vbs，用于IP、子网、网关、DNS、WINS及域的加入.第一个脚本执行后，再执行第二个,脚本内容如下：
1、renamecomputer.vbs
strComputerName=InputBox(Pleasetypeyournewcomputername,Input)strComputer=.
SetobjWMIService=GetObject(winmgmts:_
{impersonationLevel=impersonate}!\\strComputer\root\cimv2)
SetcolComputers=objWMIService.ExecQuery_(Select*fromWin32_ComputerSystem)
ForEachobjComputerincolComputers
strErr=objComputer.Rename(strComputername)
Next
IfstrErr=0Then
SetobjShell=CreateObject(Wscript.shell)
Setfso=CreateObject(Scripting.FileSystemObject)fso.CopyFilejoindomain.vbs,c:\windows\system32\objshell.RegWrite
HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce\joindomain,c:\windows\system32\joindomain.vbs,REG_SZ
return=MsgBox(Yes for reboot,no forcancel.,vbYesNo+vbInformation,Information)
Ifreturn=6Thenobjshell.Run(cmd/cshutdown.exe-r-t0)
EndIf
2、joindomain.vbsConstJOIN_DOMAIN=1ConstACCT_CREATE=2ConstACCT_DELETE=4
ConstWIN9X_UPGRADE=16
ConstDOMAIN_JOIN_IF_JOINED=32ConstJOIN_UNSECURE=64
ConstMACHINE_PASSWORD_PASSED=128ConstDEFERRED_SPN_SET=256
ConstINSTALL_INVOCATION=262144
strIPAddress=array(0)
strIPAddress=array(InputBox(PleasetypeyourIPaddress,Input))strSubnetMask=array()
strGateway=array(53)
strGatewayMetric=array(1)strwinsOne=
strwinsTwo=
strdnsOne=InputBox(PleasetypeyourfirstDNSaddress,Input)strdnsOne=
strdnsTwo=InputBox(PleasetypeyoursecondDNSaddress,Input)strdnsTwo=
strDomain=InputBox(Pleasetypeyourdomainname,Input)strDomain=
strUser=InputBox(Pleasetypeyourdomainusername,Input)strUser=lafferli
strPassword=InputBox(Pleasetypeyoudomainuserspassword,Input)strComputer=.
SetobjShell=CreateObject(Wscript.shell)
SetobjWMIService=GetObject(winmgmts:_
{impersonationLevel=imper
文档评论（0）