求一个vb自动升级的源文件
求一个vb自动升级的程序文件
[解决办法]
http://www.cndw.com/tech/program/2006051873663.asp
网上有很多的 很详细
根据自己情况稍微改下即可
[解决办法]
网上很多,自己搜搜
[解决办法]
http://www.google.cn/search?complete=1&hl=zh-CN&newwindow=1&q=vb+%E8%87%AA%E5%8A%A8%E5%8D%87%E7%BA%A7%E7%A8%8B%E5%BA%8F&meta=&aq=3&oq=vb+%E8%87%AA%E5%8A%A8
[解决办法]
提供一个思路,简单的:
1)发布新的程序时,同时也发布版号
2)客户端在运行程序时,程序自动检测自己的版本与新版本号谁大,自己小则升级.
3)写一个简单的升级程序
4)升级完成后,运行主程序即可.
[解决办法]
up
[解决办法]
标记
[解决办法]
http://www.zhujiangroad.com/html/soft/s3940.html
[解决办法]
学习中
[解决办法]
帮帮忙啊.
[解决办法]
挺好的，还不满意？
[解决办法]
好像不全吧.我看了7楼的.和10的差不多.但要全些.但是调试不成功.
提示编译错误.缺少结束语句
Begin VB.Label lblCap
Caption = "告诉你，我已经升级了，没看出和以前不一样了吗？"
Height = 255
Left = 120
TabIndex = 1
Top = 60
Width = 4275
End
End
Option Explicit
' ------------------------------------------
' 升级程序的例子
' 作者: 谢家峰
' 日期: 2003/12/19
'
' 这里是升级后的主程序
'
' ------------------------------------------
Private Sub Command1_Click()
Command1.Enabled = False
' 运行更新程序
Shell App.Path & "\update.exe", vbNormalFocus
End Sub
Private Sub Form_Load()
Dim i As Integer
If App.PrevInstance Then End
UpdateIniPath = App.Path & "\Update.ini"
' 记录主程序的名字
WritePrivateProfileString "Main", "Name", App.EXEName, UpdateIniPath
' 记录运行状态
WritePrivateProfileString "Main", "Active", "-1", UpdateIniPath
Me.Caption = App.EXEName
End Sub
Private Sub Form_Unload(Cancel As Integer)
' 记录运行状态
WritePrivateProfileString "Main", "Active", "0", UpdateIniPath
End Sub
[解决办法]
编译frmNewMain时出的错误提示.
[解决办法]
没有人回答吗?
[解决办法]
讲讲我的程序自动升级设计思路
1、打包程序时带版本号信息，安装时写入注册表
2、程序需要升级时打一个升级包，打入需要升级的文件和新版本号，放在服务器上
3、运行程序时首先去服务器检查最新版本号，和本机注册表版本号比较，如果需要升级就下载升级包并自动运行安装，关闭自身程序
4、安装完成自动启动程序
我的一个程序现在就是这么做的，当然你也不用打成安装包，直接下载文件也可，不过要写另一个程序来管理下载的文件
[解决办法]
楼上说的太简单了，其实程序不能关闭自身，更新再运行新版本的
实现程序自动升级是有二个程序的，每次启动程序时是A.exe， 这个A.exe的功能只是看一下网上有关些程序的版本号，和本地自己的版本号，及下载完成的版本号，处理这些版本号的关系，
关系如下
1，网上 和本地下载的不一样，则启动主程序B.exe并打开主程序的下载新版本的线程，主程序工作正常，并在后台下载，下载完成后更新下载完成的版本号。
2，网上 和本地下载的一样，则判断本地和下载的版本号是否一样，一样则启动主程序B.exe主程序正常工作无事。
3，网上 和本地下载的一样，则判断本地和下载的版本号是否一样，不一样则复制下载的版本为新的B.exe，再启动主程序正常工作无事。
[解决办法]
楼上说的太好了。我想要的就是哪种效果。
谁能提供一份源代码？
ppcc02@tom.com