run time error

[nuti]

hi all,

im running a macro which sets dns names for all the clients.
it takes the input from the excel sheet.

whil executing i got this run time error.

Got Run-Time error: -

2147024894(80070002) Method 'Run' of object 'IWshShell3' failed

how wshould i go about it?

 

[paul.robinson]

Hi
No one will reply to this. What have they got to go on??

regards
Paul

 

[nuti]

ooopsss....im sorry folks....

here is the snippet....
-----------------------------------------------------------
Set objWSH = CreateObject("WScript.Shell")

-------------------------------------------------------
sCmd = "DNSCMD " & strDNSServer & " /recordadd " & strDNSZone & " " &
strAlias & " " & strtype & " " & strIPAddr
LogToLog "running:" & sCmd
lRet = objWSH.Run(sCmd, 0, True)


If lRet = 0 Then
LogToLog "successfully created DNSAlias " & strAlias & " for
IP-address " & strIPAddr & " on " & strDNSServer & "." & strDNSZone &
"."
Else
LogToLog "*** !!! Error by DNSAlias creation " & strAlias & "
for IP-address " & strIPAddr & " on " & strDNSServer & "." & strDNSZone
& "."
lCountErrors = lCountErrors + 1
End If
LogToLog ""

----------------------------------------------------------------------------