Programming Forums - View Single Post

Keiran · Jul 6th, 2006, 6:05 AM

I changed the code to have error checking, and to remove any spaces from the variable to see if that was the problem

If InStr(dmsg, prefix & "makedir") = 1 Then
On Error GoTo mkdirerr
Dim Dir2Make As String
Dir2Make = Replace(dat(4), " ", "")
Call MkDir(Dir2Make)
wsCon.SendData SendMessage & "Operation Complete " & vbCrLf
mkdirerr:
wsCon.SendData SendMessage & "Operation Failed - " & Err.Description & vbCrLf
End If

This is the error i get

(Toggle Plain Text)

( 11:43:26 ) ( Keiran[away] ) .makedir C:\Testing
( 11:43:28 ) ( Administrator ) Operation Failed - Path not found

Jul 6th, 2006, 6:05 AM	#3
Keiran Newbie Join Date: May 2006 Location: uk Posts: 3 Rep Power: 0	I changed the code to have error checking, and to remove any spaces from the variable to see if that was the problem (Toggle Plain Text) If InStr(dmsg, prefix & "makedir") = 1 Then On Error GoTo mkdirerr Dim Dir2Make As String Dir2Make = Replace(dat(4), " ", "") Call MkDir(Dir2Make) wsCon.SendData SendMessage & "Operation Complete " & vbCrLf mkdirerr: wsCon.SendData SendMessage & "Operation Failed - " & Err.Description & vbCrLf End If If InStr(dmsg, prefix & "makedir") = 1 Then On Error GoTo mkdirerr Dim Dir2Make As String Dir2Make = Replace(dat(4), " ", "") Call MkDir(Dir2Make) wsCon.SendData SendMessage & "Operation Complete " & vbCrLf mkdirerr: wsCon.SendData SendMessage & "Operation Failed - " & Err.Description & vbCrLf End If This is the error i get (Toggle Plain Text) ( 11:43:26 ) ( Keiran[away] ) .makedir C:\Testing ( 11:43:28 ) ( Administrator ) Operation Failed - Path not found ( 11:43:26 ) ( Keiran[away] ) .makedir C:\Testing ( 11:43:28 ) ( Administrator ) Operation Failed - Path not found