最近要從一個http上下載個文件,差點就直接telnet了,突然發現了這個: 但是還得讀取它,用什麼呢? 直接用 但是在類里,不能用Application.StartupPath代表程式所在目錄呀,這怎麼辦呢?遂baidu了一下,發現可以這樣: 然後,就可以讀取了。 完整代碼:(目標文件地址http ...
最近要從一個http上下載個文件,差點就直接telnet了,突然發現了這個:
1 My.Computer.Network.DownloadFile("目標文件網址")
但是還得讀取它,用什麼呢?
直接用
1 Imports System.IO '引入System.IO命名空間 2 Dim test As New StreamReader("讀取文件的路徑")
但是在類里,不能用Application.StartupPath代表程式所在目錄呀,這怎麼辦呢?遂baidu了一下,發現可以這樣:
1 My.Application.Info.DirectoryPath '=Application.StartupPath
然後,就可以讀取了。
完整代碼:(目標文件地址http://123it.cf/test/download.txt)
1 Imports System.IO '引入System.IO命名空間 2 3 Public Class test 4 5 Private Sub frm_test_Load(sender As Object, e As EventArgs) Handles MyBase.Load 6 My.Computer.Network.DownloadFile("http://123it.cf/test/download.txt", My.Application.Info.DirectoryPath & "\" & "down.txt") '下載文件 7 Dim rreeaadd As New StreamReader(My.Application.Info.DirectoryPath & "\" & "down.txt") 8 MsgBox(rreeaadd.ReadtoEnd,64,"提示") '讀取文件內容並彈出Msgbox消息框 9 rreeaadd.Close() '關閉流 10 End Sub 11 12 End Class