關于在vb.net中獲取文件路徑的問題，如何解決？

當然不能~！ Me.OpenFileDialog1. FileNames這個是多選文件時，一個文件數組， 不是單個文件，單個文件用Me. OpenFileDialog1.FileName 而Str(Me.OpenFileDialog1. FileNames) 又是什么意思呢~？把數組轉化成字符串~？~~？~？ strFileDirectary = Me.OpenFileDialog1.FileName 這樣strFileDirectary 得到的是完整的文件路徑，不是文件夾 我搞不懂你到底要獲得文件路徑還是文件所在的文件夾~~？~？

鼓樓網站建設公司創新互聯建站,鼓樓網站設計制作，有大型網站制作公司豐富經驗。已為鼓樓超過千家提供企業網站建設服務。企業網站搭建\外貿營銷網站建設要多少錢，請找那個售后服務好的鼓樓做網站的公司定做！

希望采納

vb.net怎么實現點擊下載，獲取文件路徑并下載

下載，直接通過url讀取文件，然后Response.OutputStream.Write()數據

下面提供個下載的靜態方法，是C#的，供參考：

///?summary

///?下載文件

///?/summary

///?param?name="fileName"下載的文件名稱（包括擴展名）/param

///?param?name="filePath"下載文件的絕對路徑/param

public?static?void?DownFile(string?fileName,?string?filePath)

{

//打開要下載的文件，并把該文件存放在FileStream中????????????????

System.IO.FileStream?Reader?=?System.IO.File.OpenRead(filePath);

//文件傳送的剩余字節數：初始值為文件的總大小????????????????

long?Length?=?Reader.Length;

HttpContext.Current.Response.Buffer?=?false;

HttpContext.Current.Response.AddHeader("Connection",?"Keep-Alive");

HttpContext.Current.Response.ContentType?=?"application/octet-stream";

HttpContext.Current.Response.Charset?=?"utf-8";

HttpContext.Current.Response.AddHeader("Content-Disposition",?"attachment;?filename="?+?System.Web.HttpUtility.UrlEncode(fileName));

HttpContext.Current.Response.AddHeader("Content-Length",?Length.ToString());

byte[]?Buffer?=?new?Byte[10000];//存放欲發送數據的緩沖區????????????????

int?ByteToRead;?//每次實際讀取的字節數???????????????

while?(Length??0)

{????

//剩余字節數不為零，繼續傳送????????????????????

if?(HttpContext.Current.Response.IsClientConnected)

{????

//客戶端瀏覽器還打開著，繼續傳送????????????????????????

ByteToRead?=?Reader.Read(Buffer,?0,?10000);???????????????????//往緩沖區讀入數據????????????????????????

HttpContext.Current.Response.OutputStream.Write(Buffer,?0,?ByteToRead);????

//把緩沖區的數據寫入客戶端瀏覽器????????????????????????

HttpContext.Current.Response.Flush();?//立即寫入客戶端????????????????????????

Length?-=?ByteToRead;//剩余字節數減少????????????????????????????}

else

{?????????????????????????

//客戶端瀏覽器已經斷開，阻止繼續循環????????????????????????

Length?=?-1;

}

}????????????????//關閉該文件???????????????

Reader.Close();

}

QQ：121一九五五121

vb.net從文件路徑中獲取文件名

獲取方法，參考實例如下：

'獲取路徑名各部分:

如：

c:\dir1001\aaa.txt

'獲取路徑路徑

c:\dir1001\

Public

Function

GetFileName(FilePathFileName

As

String)

As

String

'獲取文件名

aaa.txt

On

Error

Resume

Next

Dim

i

As

Integer,

J

As

Integer

i

Len(FilePathFileName)

J

InStrRev(FilePathFileName,

"\")

GetFileName

Mid(FilePathFileName,

J

+

1,

i)

End

Function

''獲取路徑路徑

c:\dir1001\

Public

Function

GetFilePath(FilePathFileName

As

String)

As

String

'獲取路徑路徑

c:\dir1001\

On

Error

Resume

Next

Dim

J

As

Integer

J

InStrRev(FilePathFileName,

"\")

GetFilePath

Mid(FilePathFileName,

1,

J)

End

Function

'獲取文件名但不包括擴展名

aaa

Public

Function

GetFileNameNoExt(FilePathFileName

As

String)

As

String

'獲取文件名但不包括擴展名

aaa

On

Error

Resume

Next

Dim

i

As

Integer,

J

As

Integer,

k

As

Integer

i

Len(FilePathFileName)

J

InStrRev(FilePathFileName,

"\")

k

InStrRev(FilePathFileName,

".")

If

k

Then

GetFileNameNoExt

Mid(FilePathFileName,

J

+

1,

i

-

J)

Else

GetFileNameNoExt

Mid(FilePathFileName,

J

+

1,

k

-

J

-

1)

End

If

End

Function

'＝＝＝＝＝

'獲取擴展名

.txt

Public

Function

GetFileExtName(FilePathFileName

As

String)

As

String

'獲取擴展名

.txt

On

Error

Resume

Next

Dim

i

As

Integer,

J

As

Integer

i

Len(FilePathFileName)

J

InStrRev(FilePathFileName,

".")

If

J

Then

GetFileExtName

".txt"

Else

GetFileExtName

Mid(FilePathFileName,

J,

i)

End

If

End

Function

VB.net怎么彈出文件夾路徑選擇框

選擇文件夾??在工具箱?-?對話框?里選擇?FolderBrowserDialog?添加?到設計器中

然后?代碼寫在??按鈕事件里

FolderBrowserDialog1.ShowDialog()

textbox1.text?=FolderBrowserDialog1.SelectedPath

選擇文件?在工具箱?-?對話框?里選擇?OpenFileDialog

把?OpenFileDialog1.ShowDialog()

TextBox1.Text?=?OpenFileDialog1.FileName

寫到按鈕事件下

如圖

點擊按鈕會彈出?通用對話框??選擇好路徑后?確定?，編輯框里就會顯示選擇的路徑

新聞名稱：vb.net文件路徑 vb當前目錄路徑
網頁路徑：http://m.newbst.com/article42/docjphc.html

成都網站建設公司_創新互聯，為您提供面包屑導航、網站排名、微信公眾號、企業網站制作、響應式網站、服務器托管

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯