各位高手
我須將檔案自Client端Copy至Server端,程式如下:
Dim fFso As New FileSystemObject 
 Set fFso = CreateObject("Scripting.FileSystemObject")
 wFile = "\\192.68.30.1\D\Test\DOC"
  
 '檢查目錄是否存在,不存在則Create
 If fFso.FileExists(wFile) <> True Then
   fFso.CreateFolder (wFile)
 End If

結果第一次執行時,確實CreateFolder,可是第二次以後程式仍然執行此行,為什麼呢?照理說第二次以後Boolean值不是應為True嗎?
文章標籤
全站熱搜
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(1) 人氣(0)