ExcelVBA之獲取D盤檔案列表

過程getfiles獲取d盤根目錄下的所有檔名並且將每個檔名寫入工作表：

sub getfiles()

dim nfile as string
dim nextrow as integer
nextrow = 1
'next row index
with worksheets("sheet1").range("a1")
nfile = dir("d:\", vbnormal)
.value = nfile
do while nfile <> ""
nfile = dir
.offset(nextrow, 0).value = nfile
nextrow = nextrow + 1
loop
end with
end sub

在立即視窗的測試結果：

mfile = dir("d:\", vbhidden)

?mfile

結果:network_driver.zip

mfile = dir

?mfile

結果:~$solid state drive (ssd) inte***ce.pptm

檔案的屬性列表顯示：

總結：根據相應的檔案型別，可以查詢相應的檔名稱。 

ExcelVBA之檔案屬性

檔案和資料夾具有類似 唯讀 隱藏 系統 和 檔案 的特點。這些特點就是屬性。可以使用getattr函式來獲得檔案或資料夾的屬性。該函式的唯一引數就是檔案或資料夾路徑名 getattr 檔案路徑名 getattr函式的相反函式是setattr函式，它允許你設定乙個檔案或資料夾的屬性。語法如下 seta...

檔案上傳到D盤

基本的io流 最基本jar 如果伺服器已經存在和上傳檔案同名的檔案，則輸出提示資訊 inputstream is uploadfile.getinputstream file tempfile new file path filename if tempfile.exists 開始儲存檔案到伺服器 ...

ExcelVBA之建立和刪除資料夾

依照下面的mkdir語句語法，你可以建立乙個新資料夾 mkdir path path明確你要建立的新資料夾名稱。如果你沒有寫驅動器的名稱的話，vb就將在當前的驅動上建立新資料夾。現在，我們來看幾個例子 1.在立即視窗裡輸入指令，在c盤上建立乙個叫 try 的資料夾 mkdir c try 2.將預設...