例如,把文件"E:\新建文件夾\a.txt"復制到剪貼板
成都創新互聯公司 - 四川樂山服務器托管,四川服務器租用,成都服務器租用,四川網通托管,綿陽服務器托管,德陽服務器托管,遂寧服務器托管,綿陽服務器托管,四川云主機,成都云主機,西南云主機,四川樂山服務器托管,西南服務器托管,四川/成都大帶寬,成都機柜租用,四川老牌IDC服務商
CreateObject("Shell.Application").NameSpace("E:\新建文件夾").ParseName("a.txt").InvokeVerb?"復制(C)"
這段代碼的問題是:
首先for each循環在files里查找文件對象,但是f變量聲明為string了,無法讓它獲取對象;
然后file.copy的變量file沒有任何聲明,也沒有初始化賦值等;
最后,整個for each循環里查找集合files的文件,由于初始化的循環計數器仍然按照最初設定的文件數目向后遞增(文件地址),但是實際文件刪除一部分,后續的文件位置就不能跟循環計數指針匹配了,所以默認為查找不到文件,將會報錯。一般的做法時把復制和刪除分別放在2次循環里,第一次只復制文件,第二次才去刪除。
創建一個文本文件,在其中輸入:
dir *.txt /s /n 目錄.txt
保存為XX.bat
然后雙擊運行即可在該文件夾下產生一個目錄.txt的文件,里面有你要的內容,不用VB點虐
標題名稱:vb點虐
復制后綴 vb中復制文件的代碼
分享路徑:http://vcdvsql.cn/article48/ddeidhp.html
成都網站建設公司_創新互聯,為您提供微信小程序、網站營銷、網站排名、App開發、自適應網站、外貿網站建設
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯