O PC não executará o script VB, erro erro de tempo de execução do VBScript ID 800A046

Question

Eu tenho algumas estações de trabalho que não podem executar um script de rede para mapear unidades de rede, etc. Eu sei que o script funciona como está funcionando para todos os outros.

Mas em 1 ou 2 máquinas (de 1000) o script não será executado. Eu recebo um erro "VBScript erro de execução, erro ID 800A046.

O script em si é bom, tenho certeza disso. Alguma idéia?

Também tentei como uma conta de administrador.

Da linha 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

Também vale a pena notar isso:

'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 "............................"

    

Answer 1

Este erro é permissão negada. Infelizmente, isso pode ser de qualquer lugar do roteiro, não apenas da linha que reclama. Desde que você sabe que o problema está na estação de trabalho e não o mapeamento de unidade, eu acho que o problema é permissões no DCOM ou um diretório na estação de trabalho local. Você menciona que eles não podem executar nenhum script que eu primeiro tentaria reinstalar o vbscript para ver se isso resolve o problema.

Em uma nota secundária, se esse mapeamento for direcionado, por que não usar as preferências de política de grupo e eliminar completamente o script?

    

Answer 2

Verifique este artigo. Concordo em que isso soa como um problema de permissões com o mapeamento das unidades ou qualquer outra coisa que seu script de logon de rede esteja tentando fazer.

link

    

Answer 3

Eu notei que a linha antes da linha que você mencionou gera o erro é .Close ...

Parece que você está fechando algo e fazendo referência a ele.

Tente mover .Close após .title = sTitle

Embora seja difícil ter certeza sem ver mais do roteiro.