如下代码是往FTP服务器里写入路径的,但是有时候能成功,有时却是没有建立任何路径也没有报错,是什么原因?本来我是直接执行“ ftpm.MakeDir ("" & lg & "") ”一次建立的,也是有时可以,大部分时候不可以
Dim rq As String = "2025"
Dim cb As String = "f55"
Dim gd As String = "f85"
Dim lb As String = "j622f"
Dim lga As String = "" & "\" & "资料图片\" & "" & rq & "" & "\" & ""
Dim lgb As String = "" & "\" & "资料图片\" & "" & rq & "" & "\" & "" & cb & "" & "\" & ""
Dim lgc As String = "" & "\" & "资料图片\" & "" & rq & "" & "\" & "" & cb & "" & "\" & "" & gd & "" & "\" & ""
Dim lg As String = "" & "\" & "资料图片\" & "" & rq & "" & "\" & "" & cb & "" & "\" & "" & gd & "" & "\" & "" & lb & "" & "\" & ""
If ftpm.DirExists ("" & lga & "") = False Then
ftpm.MakeDir ("" & lga & "")
If ftpm.DirExists ("" & lgb & "") = False Then
ftpm.MakeDir ("" & lgb & "")
If ftpm.DirExists ("" & lgc & "") = False Then
ftpm.MakeDir ("" & lgc & "")
If ftpm.DirExists ("" & lg & "") = False Then
ftpm.MakeDir ("" & lg & "")
End If
End If
End If
End If