windows-server-2008 – 修改MDT向导以自动执行计算机命名
情况:
状态:
进展:
问题解决了! HTML页面: <H1>Configure the computer name.</H1> <p>Please answer the following questions. Your answers will be used to formulate the computer's name and description.</p> <FORM NAME="SetComputerNameForm"> <p> <LABEL class="Larger"><u class="Larger">D</u>epartmental Prefix:</LABEL><br /> <SELECT NAME="DepartmentalPrefix_Edit" ID="DepartmentalPrefix_Edit" language=vbscript onpropertychange=ValidateSetComputerName AccessKey=D> <option value="FOO">FOO</option> <option value="DOE">DOE</option> <option value="AFK">AFK</option> <option value="BBL">BBL</option> <option value="RTFM">RTFM</option> </SELECT> </p> <p> <LABEL class="Larger"><u class="Larger">C</u>lient's ID:</LABEL> <br /> <INPUT NAME="ClientID" ID="ClientID" TYPE="text" ID="ClientID" SIZE="15" language=vbscript onpropertychange=ValidateSetComputerName AccessKey=C /> <label class=ErrMsg for=ClientID>* Required (MISSING)</label> </p> <p> <LABEL class="Larger"><u class="Larger">B</u>uilding:</LABEL><br /> <SELECT NAME="Building_Edit" ID="Building_Edit" language=vbscript onpropertychange=ValidateSetComputerName AccessKey=B> <option value="ASA">ASA</option> <option value="ASB">ASB</option> <option value="ASC">ASC</option> </SELECT> </p> <p> <LABEL class="Larger"><u class="Larger">R</u>oom Number:</span></LABEL> <br /> <INPUT NAME="RoomNumber" ID="RoomNumber" TYPE="text" ID="RoomNumber" size="15" language=vbscript onpropertychange=ValidateSetComputerName AccessKey=R> <label class=ErrMsg for=RoomNumber>* Required (MISSING)</label> </p> </FORM> 功能: Function ValidateSetComputerName ParseAllWarningLabels If Len(Document.SetComputerNameForm.ClientNetID.Value) < 1 OR Len(Document.SetComputerNameForm.RoomNumber.Value) < 1 THEN ButtonNext.disabled = true Else Dim Department Dim SerialNumber Dim CID Dim RoomNumber Dim BuildingName Dim Make Dim Model Department = Document.SetComputerNameForm.DepartmentalPrefix_Edit.Value SerialNumber = oEnvironment.Item("SerialNumber") CID = Document.SetComputerNameForm.ClientID.Value RoomNumber = Document.SetComputerNameForm.RoomNumber.Value BuildingName = Document.SetComputerNameForm.Building_Edit.Value Make = oEnvironment.Item("Make") Model = oEnvironment.Item("Model") oEnvironment.Item("OSDComputerName") = "AG-" & Department & "-" & Right(SerialNumber,7) oEnvironment.Item("ComputerDescription") = Department & "," & CID & "," & RoomNumber & " " & BuildingName & "," & Make & " " & Model ButtonNext.disabled = false End If End Function
问题已解决.我已更新上面的代码以反映我所做的更改.
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
- 个人亲测,在win10系统下安装多实例mysql8.0详细教程
- windows-server-2003 – IIS 6.0上的HTTP压缩(Windows Serv
- windows-server-2003 – IIS无法提供某些文件扩展名
- Windows – 批处理文件FOR / f令牌
- windows-server-2008 – 小型企业需要Active Directory
- 使用SDL处理最大化的窗口
- Apache+php+mysql在windows下的安装与配置图解(最新版)
- windows – 测试自动化:如何模拟电源故障/机器崩溃?
- windows – 创建虚拟文件夹并将它们挂钩到文件系统中
- windows – 是否可以远程检查PC主板中填充了多少个DIMM插槽
- windows-installer – Techsmith Snagit的Window
- MinGW没有定义WIN32,预处理器指令中的错误
- windows – Windbg!heap -s和!heap -stat命令不
- windows-phone-7 – 即使不可见,PerformanceProg
- windows – PDC已经死了,其他人没有复制我应该先
- Windows防火墙,Tinywall和GIT
- 寻找适用于Windows 7的OAuth DLL(需要在WAMP服务
- Windows如何知道文件是否是从Internet下载的?
- windows – 将代码移入内核空间会给出更精确的时
- Windows安装MySQL8