找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
請尊重及感激所有版主付出和奉獻認識好友、聊天,分享生活趣事安全提問(回答) 和 永久尊貴會員 事宜
julia三上悠亞mega無碼cosplayfatentr旬果
lightroo在男人官 堕ちコス一念神魔他の男のmrhp 024

休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

[繁]最強肉盾的迷宮攻

河南商丘 男子不滿店

[簡]通靈王 FLOWERS -

[繁]佐佐木與文鳥小嗶

〖高清繁〗霹靂天機貳

[繁]SYNDUALITY Noir
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
查看: 4968|回復: 3

[求助] 檔名有 VBA 無法辨別的字元 , 如何查出檔案大小 ?[複製鏈接]

帖子
5
積分
7 點
潛水值
2390 米
發表於 2017-8-9 07:53 PM|顯示全部樓層
分享使你變得更實在,可以使其他人感到快樂,分享是我們的動力。今天就來分享你的資訊、圖片或檔案吧。
本帖最後由 darkjack 於 2017-8-11 09:03 PM 編輯

又遇到困難了 , 要列出某資料夾內檔案名稱 , 可以使用下列方式 :
  1. File_Name = Dir("D:\Movie\*.mp4")
  2. While File_Name <> ""
  3.          ...
  4.          ...
  5.          File_Name = Dir()
  6. Wend
複製代碼

如果要查出這些檔案大小 , 可以用 FileLen(File_Name) 指令 ,
但如果遇到檔名有 VBA 無法辨別的字元 , 例如 MMND-130 羽咲美晴.mp4
VBA 跑出的結果會變成 File_Name ="MMND-130 羽?美晴.mp4"
這還可以忍受 , 但如果要查出檔案大小 , 會因檔名不正確而產生程式錯誤 ,
該怎麼查出檔案大小呢 ?


...
瀏覽完整內容,請先 註冊登入會員
如果你忘記伊莉的密碼,請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出,系統就會把密碼寄到你的E-Mail。

使用道具檢舉

帖子
5
積分
7 點
潛水值
2390 米
發表於 2017-8-11 07:25 PM|顯示全部樓層
如果發覺自己無法使用一些功能或出現問題,請按重新整理一次,並待所有網頁內容完全載入後5秒才進行操作。
本帖最後由 darkjack 於 2017-8-11 09:04 PM 編輯

想起 2,30 年前 DOS 年代的 Dir 指令 , 可以把某路徑下的資料夾 , 檔案 全部一次 List 出來 ,
包含 : FileDateTime , Size , Name
還有用 DOS 的 .bat 批次檔案 來執行 DOS 指令
在 Excel VBA 中 :
  1. Open "D:\Dir_Files.bat" For Output As #1
  2. Print #1, "D:"
  3. Print #1, "Cd Movie"
  4. Print #1, "Dir > D:\File_Size_Name.txt"
  5. Close #1
  6. Shell ("D:\Dir_Files.bat")
複製代碼


結果就出來了 : ( 開啟 D:\File_Size_Name.txt 檔案 )

磁碟區 D 中的磁碟是 Data
磁碟區序號:  BA77-7966

D:\Movie 的目錄

2017/08/09  下午 07:21    <DIR>          .
2017/08/09  下午 07:21    <DIR>          ..
2017/08/07  上午 06:07     4,857,133,080 ABP-623 愛音麻里亞 .mp4
2017/08/03  下午 06:16     3,723,925,144 MEYD-283 東凜 .mp4
2017/08/07  下午 12:23     3,699,664,260 MMND-130 羽?美晴 .mp4
2017/08/07  下午 12:48     3,736,532,029 MMND-131 深田奈奈 .mp4
               4 個檔案  16,017,254,513 位元組
               2 個目錄  939,158,974,464 位元組可用

再數數格子 , 就可算出檔案大小了 , 即使檔名有 VBA 無法辨識的字元 "羽?美晴" 。
...
瀏覽完整內容,請先 註冊登入會員
若對尊貴或贊助會員有任何疑問,歡迎向我們查詢。我們的即時通或MSN: admin@eyny.com

使用道具檢舉

Rank: 6Rank: 6Rank: 6Rank: 6Rank: 6Rank: 6

帖子
155
積分
1291 點
潛水值
47805 米
發表於 2017-8-12 11:48 AM|顯示全部樓層
若新密碼無法使用,可能是數據未更新。請使用舊密碼看看。
本帖最後由 tryit244178 於 2017-8-13 12:03 PM 編輯

噢…本來想叫你參考這頁的…
下載: 訪客無法瀏覽下載點,請先 註冊登入會員

下載: 訪客無法瀏覽下載點,請先 註冊登入會員
...
瀏覽完整內容,請先 註冊登入會員
若有安裝色情守門員,可用無界、自由門等軟件瀏覽伊莉。或使用以下網址瀏覽伊莉: http://www.eyny.com:81/index.php

使用道具檢舉

帖子
5
積分
7 點
潛水值
2390 米
發表於 2017-8-14 07:27 PM|顯示全部樓層
感謝 tryit244178 大 ,
GetFolder.Files 真是好用 ,
能同時抓取 FileName & FilsSize
還能辨別 難字 , 日文字
不用再為檔名煩惱了 , 謝謝 。

使用道具檢舉

您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明:本討論區是以即時上載留言的方式運作,對所有留言的真實性、完整性及立場等,不負任何法律責任。而一切留言之言論只代表留言者個人意見,並非本網站之立場,用戶不應信賴內容,並應自行判斷內容之真實性。於有關情形下,用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限,故不能完全監察所有留言,若讀者發現有留言出現問題,請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言,同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論,敬請自律。本網站保留一切法律權利。
回頂部