主题：[求助]

 取得当前的版本号，对比最新的版本号

Network.DownloadFile("http://www.foxtable.com/download/80211/update.txt", "d:\update.txt" ,"" ,"" ,False, 100000, True)
Dim ary() As String = FileSys.ReadAllText("d:\update.txt").Split("|")

msgbox(ary(0))
msgbox(PublishDate)

If PublishDate < ary(0) Then
    msgbox("不是最新版")
End If