1樓:網友
dim arrpath,p
for each p in arrpathif trim(p)<>then
msgbox isfileexist(p)end if
nextfunction isfileexist(strfilename) '判斷檔案是否存在。
dim fso
set fso=createobject("")if(
isfileexist = true
elseisfileexist = falseend if
set fso=nothing
end function
function fsofileread(filename) '使用fso讀取檔案內容的函式。
dim objfso,objfile,filetempdataset objfso = createobject("")set objfile = ,1,true)fsofileread =
set objfile=nothing
set objfso = nothing
end function
vb檢測檔案是否存在
2樓:網友
假設文姿拍件名為戚念file_test,路徑為c:\test(到時可換成實際路徑)
if dir(c:\test\跡仔羨file_test)<>thenmsgobx "已檢測到file_test檔案"
elsemsgobx "未檢測到file_test檔案"
end if
3樓:匿名使用者
findfirstfile
vb聲猜哪明毀兆者纖薯。
declare function findfirstfile lib kernel32 alias findfirstfilea (byval lpfilename as string, lpfindfiledata as win32_find_data) as long
根據檔名查詢檔案。
vb怎麼檢測檔案是否存在,.
4樓:網友
if dir(檔案路徑 & "\")="" or dir(檔案路徑 & "\")="" then
表示至少有乙個檔案不存在。
vb檢測網路檔案是否存在的問題
5樓:匿名使用者
樓上的那個逼碧激核,一看悔掘就不會,zhuangbi的人,樓主我告訴你吧鉛搜,你用winsock檢測,之後msgbox顯示出來 存在或者不存在。
vb檢測資料夾下是否存在***格式檔案
6樓:網友
試試這樣:if dir(路徑 & ***") 拿寬》 "then掘雀存在***
else不存在消散亮***
end if
VB寫入檔案寫入特定一行,vb 如何寫入檔案第一行
1 先建一個變數陣列把 i.txt 裡面的內容都讀出來2 修改你要修改的資料 3 重新新建那個檔案,寫入資料。ok?閒來沒事,幫你寫一個吧,加一個按鈕,把 複製進去,然後去d 檢視一下.也不知道你想幹嘛,是學習呢,還是想做別的東西,嘿嘿 像你這種想讀取某行,某段的資料,最好用隨機檔案進行讀取priv...
VB高手進 VB實現自動搜尋檔案修改名稱並啟動
使用vb的檔案系統控制元件,就在現有的vb工具箱裡,有3個控制元件,驅動器列表框,目錄列表框,檔案列表框,執行時直接用 使他們在一個個盤,一個個資料夾裡尋找檔案,很簡單,執行檔案的話用shell命令,shell 絕對路徑 就有點麻煩了,要遍歷所有資料夾,用迴圈做 vb搜尋檔案 55 假設你的表的名稱...
簡單的vb問題,關於開啟檔案,一個簡單的vb問題,關於開啟檔案
正常的語法不是應該這樣嗎?if dk.filename then 如果路徑為實值 open dk.filename for output as 1 則開啟 print 1,txt.text 我把文字框改名為txt了 close 1 end if 你確定dk.filename 是一個正常的完整的檔案路...