Vb.net自動更新

fucker

寫法千百種，最簡單的寫法就是建立個txt檔，上面打上最新版本號
在上傳到伺服器上，再利用vb.net下載檔案、讀檔案的方式 取得txt檔中的版本編號
在比對最新版本和目前版本。
這樣基本就完成最新版本檢測了，接下來就用IF判斷式去寫.

設當前版本為:ver,最新版本為newver 請將網址替換

Dim ver as string=1.0
My.Computer.Network.DownloadFile("https://123.com/*.txt","yourname.txt")
Dim newver as string=My.Computer.Filesystem.ReadAllText("yourname.txt")

-------------------
'判斷版本
If ver=newver Then
MsgBox("目前是最新版本")
Else
MsgBox("已有新版本 請前往下載")
End IF

.....搞定收工

fucker

上面補充程式碼給你了，不知道對不對 自己套用上去看看
不對在自己修正一下 我好久沒碰vb了

這是最基本的讀檔方式做的判斷更新。

如果想做自動更新 那麼在提示新版的程式片段加上
My.Computer.Network.Downloadfile("網址","存放位置+檔名")
或是直接用Shell的方式打開下載網頁給他自己更新