我已经尝试了"使用 VBS 更新注册表"中的解决方案,但它仍然给出相同的错误消息:
WshShell.RegWrite:注册表项中的根无效
您应该将 LegalNoticeText 值与 LegalNoticeCaption 一起更改。在HKLMSOFTWAREMicrosoftWindows NTCurrentVersionWinlogon
注册表项下
,这两个值也驻留。对于这种情况(如果计算机未连接到域或禁用组策略(应该在下一个脚本中工作。
我正在尝试使用 VBScript 在 UFT 12.5 中执行此操作。
环境:
- UFT 12.5
- 视窗 2012 服务器
将执行注册表写入步骤的代码保存在单独的vbs
文件中,并使用以下代码从 UFT 脚本以管理员身份运行它:
myVbsFilePath = "C:tempsomething.vbs"
Dim WShell : Set WShell = CreateObject("Shell.Application")
WShell.ShellExecute "C:Windowssystem32cscript.exe", """" & myVbsFilePath & """ /elevate", "", "runas", 1
您尝试引用的WScript
属性需要vbscript
由wscript.exe
或cscript.exe
运行,而您尝试从UFT
运行它,其中WScript.FullName
和WScript.ScriptFullName
之类的东西不可用。
您可能需要修改上面示例代码中为您自己的系统提供的路径cscript.exe
。
您也可以以管理员身份运行:
RunAsAdmin()
Function RunAsAdmin()
If WScript.Arguments.length = 0 Then
CreateObject("Shell.Application").ShellExecute "wscript.exe", """" & _
WScript.ScriptFullName & """" & " RunAsAdministrator",,"runas", 1
WScript.Quit
End If
End Function