我有几个工作站,无法运行networking映射networking驱动器等脚本我知道脚本工作,因为它是为所有人工作。
但在1台或2台机器上(1000台),脚本根本不会运行。 我得到一个错误“VBScript运行时错误,错误ID 800A046。
剧本本身很好,我很确定。 有任何想法吗?
也尝试作为pipe理员帐户。
从501行
.Open .Write "<span id='theEnd'></span>" .Close Set oTheEnd = .all.theEnd .Title = sTitle With .ParentWindow.document.body .style.backgroundcolor = "LightBlue" .style.Font = "10pt 'Arial'" '.style.borderStyle = "outset" '.style.borderWidth = "4px" ' .scroll="no" End With oIE.Visible = True End With ' document End With ' oIE End Sub
另外值得注意的是:
'main Function main() On Error Resume Next 'Map "<group>" , "<drive>:" , "\\server\<share>" Map "DummyGroupName" , "R:" , "\\Servername\Sharename" Log File ' Create logfile If appendlogfile=True Then WriteFlag = 8 Else WriteFlag = 2 End If sSystemdrive = oShell.ExpandEnvironmentStrings("%USERPROFILE%") Set logfile = oFSO.OpenTextFile (sSystemdrive & "\logon.log", WriteFlag, True) logfile.Writeline "............................"
此错误是拒绝权限。 不幸的是,这可能来自剧本中的任何地方,而不仅仅是它所抱怨的那一个。 既然你知道问题是在工作站上,而不是驱动器映射,我会认为问题是在DCOM或本地工作站上的目录的权限。 你提到他们不能运行任何脚本,我会首先尝试重新安装VBScript,看看是否能解决问题。
在一个侧面说明,如果这是映射驱动器为什么不使用组策略首选项,并完全消除脚本?
检查这篇文章了。 我同意,这听起来像映射驱动器的权限问题或任何其他networkinglogin脚本正在尝试做的事情。
http://www.computerperformance.co.uk/Logon/code/code_800A0046.htm
我注意到,你提到的行之前的行引发错误是.Close …
所以看起来你正在closures一些东西然后引用它。
尝试移动。 .title = sTitle后.title = sTitle
虽然没有看到更多的剧本,但很难确定。