命名空間:System.Windows.Forms
目前創(chuàng)新互聯(lián)公司已為成百上千家的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬主機(jī)、網(wǎng)站改版維護(hù)、企業(yè)網(wǎng)站設(shè)計(jì)、亳州網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
Application.StartupPath 屬性(返回String)
獲取啟動(dòng)了應(yīng)用程序的可執(zhí)行文件的路徑,不包括可執(zhí)行文件的名稱。
Application.ExecutablePath 屬性(返回String)
獲取啟動(dòng)了應(yīng)用程序的可執(zhí)行文件的路徑,包括可執(zhí)行文件的名稱。
Path:是初始目錄的路徑
Private Sub WriteArray(ByVal Path As String)
'寫入數(shù)組代碼在這里,直接將Path寫到數(shù)組就行了。
Dim dir As New IO.DirectoryInfo(Path)
For Each d As IO.DirectoryInfo In dir.GetDirectories
WriteArray(d.FullName) '遞歸
Next
End Sub
如果子目錄較多那么遞歸會(huì)比較費(fèi)時(shí)間,在調(diào)用遞歸前加入application.doevent就行了,這樣在應(yīng)對(duì)大遞歸時(shí)不會(huì)死機(jī)。
至于數(shù)組嘛使用 arraylist 最好了。
回答補(bǔ)充:
把遞歸去掉就行了??!
見上圖,用鼠標(biāo)按照上述三個(gè)步驟先后次序,一一單擊進(jìn)行選擇和設(shè)置,“生成輸出路徑”。
那么,在你的程序代碼里使用:
MsgBox(Application.StartupPath)
顯示的就是,你的當(dāng)前默認(rèn)的相對(duì)路徑。
也可以按照自己的需要重新設(shè)置該路徑。
因?yàn)椴幻靼啄銌栴}的用意,只能這么回答你了。
絕對(duì)路徑是指在文件標(biāo)識(shí)符的位置,應(yīng)該包含了從磁盤驅(qū)動(dòng)器符號(hào)開始的所有完整路徑。那么相對(duì)路徑只需要在文件標(biāo)識(shí)符的位置,包含斜杠 加 文件名就可以了。
相對(duì)路徑,其實(shí)是指從相對(duì)于當(dāng)前文件夾而言。
本文題目:vb.net局域網(wǎng)路徑 vbs 局域網(wǎng)傳文件
URL鏈接:http://jinyejixie.com/article10/doscgdo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供營(yíng)銷型網(wǎng)站建設(shè)、全網(wǎng)營(yíng)銷推廣、、網(wǎng)站改版、小程序開發(fā)、軟件開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)
網(wǎng)頁(yè)設(shè)計(jì)公司知識(shí)