求一个Delphi6里面,软件自动更新的例子!
小弟想过用下面的方法:
1.先运行程序,连数据库判版本号.
2.如果需要更新,把自身EXE文件删除.
3.从服务器接收文件.
4.结束当前实例,用更新过的文件启动另一个实例.不知道做过这方面的大侠用的是什么方法,以及技术要点。
不胜感激!
小弟想过用下面的方法:
1.先运行程序,连数据库判版本号.
2.如果需要更新,把自身EXE文件删除.
3.从服务器接收文件.
4.结束当前实例,用更新过的文件启动另一个实例.不知道做过这方面的大侠用的是什么方法,以及技术要点。
不胜感激!
解决方案 »
- 如何发送同一个数据流到多个客户端?
- WebBrowser的问题?
- QQ使用的功能类似pagecontrol的是什么控件?
- 大家帮忙提供一些delphi的教程吧
- ★★★★★关于Corba的若干重大问题,600分相赠。★★★★★
- 之前装了很多第三方控件,重装系统后再运行以前做的软件时都发生错误:[Fatal Error] Required package 'FlatStyle_D6' not found这是为
- delphi中如何将real型的数据转化成integer
- Session + 动态连接库的问题????有谁知道高分
- 简单问题,请各位帮忙
- TtreeView 能够和数据库内的节点一一对应吗?
- 请大家推荐一个升级包安装制作程序
- 帮将要出来的小宝宝取名字
行不通了.要换思路.
你去www.2ccc.com看下.里面好多现成例子如http://www.2ccc.com/article.asp?articleid=4142
if FormDialog.MessageDlg('升级系统将暂时关闭客户端,是否继续?')=mrok then
begin
ShellExecute(GetDesktopWindow, nil,'Update.exe',nil,pchar(ExtractFilePath(application.ExeName)), SW_SHOW);
close;
end;
//update.exe更新完成后
shellexecute(GetDesktopWindow,nil,'Clients.exe',nil,pchar(ExtractFilePath(application.ExeName)),SW_show);
close;
免费将自动升级功能加入您的软件产品中网站:http://www.visession.com/anyupdate
下载:http://www.visession.com/anyupdate/DownLoad.htm