Hola a todos tengo este codigo q abre un archivo excel que contiene una serie de nombre de maquinas, obtengo ese nombre y lo meto en la variable Server para poder usarla en el script. Cuando una maquina no se pueda conectar me saca un aviso y sigue con el script.
Mi problema es q por ejemplo la primera maquina falla al conectar, pero la segunda se q debe entrar pq esta activa y me saca el aviso igualmente de q no se puede conectar, sin embargo si pongo esta segunda maquina la primera hace todo bien. ¿Que ocurre aqui alguien me ayuda?
Código:
While objExcel.Cells(NumRow,1).Value <> ""
Server = objExcel.Cells(NumRow, 1).Value
Set objSWbemServices = objSWbemLocator.ConnectServer (Server, "root\cimv2", "", "")
if (Err.Number <> 0) Then
Wscript.Echo "No se puede conectar a la maquina " & Server
else
Set colItems = objSWbemServices.ExecQuery("Select * from Win32_LogicalDisk")
For Each objItem in colItems
wscript.echo objItem.name
next
end if
NumRow = NumRow + 1
Set objSWbemServices = Nothing
Wend