Board logo

標題: 如何檢查指定資料夾是否存在 [打印本頁]
作者: enoch    時間: 2012-3-22 12:30     標題: 如何檢查指定資料夾是否存在

請問如何檢查指定資料夾是否存在, 若果不存在時, 則新增該資料夾
請指教
作者: GBKEE    時間: 2012-3-22 15:22

回復 1# enoch
  1. Option Explicit
  2. Sub Ex()
  3.     Dim xlFolder As String
  4.     xlFolder = "D:\MyTest"       '指定資料夾
  5.     If Dir(xlFolder, vbDirectory) = "" Then MkDir xlFolder
  6. End Sub
複製代碼
作者: brabus    時間: 2012-3-24 21:55

回復  enoch
GBKEE 發表於 2012-3-22 15:22


請問一下
如果我給員工一個檔,
檔名是他的身份證字號.id (比方 M123456789.id)
這個檔員工可以在自己的電腦中任意移動
如果我要控制電腦中有這個檔才可以開啟檔案否則就關閉檔案的話
該怎麼寫程式
謝謝指正
作者: enoch    時間: 2012-3-26 12:41

謝謝 GBKEE
你已解答了我過去很多問題
THANK YOU
作者: GBKEE    時間: 2012-3-26 15:23

回復 3# brabus
你的問題用 vba 有點難度,當搜尋到系統資料夾會出錯,我能力有限,尚須高手相助
作者: brabus    時間: 2012-3-26 21:15

回復 5# GBKEE


    如果不用搜尋的方式
而是由使用者告知路徑在那的話呢
會不會容易解決
等於請使用者告知id檔在那
如果有
就可以使用
如果沒有就在30秒後關閉檔寀



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)