如下代码是往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
加好友 
发短信
Post By：2024/2/28 8:33:00 [显示全部帖子]
