祝愿大家身体健康!

 站点注册  找回密码
 站点注册

QQ登录

只需一步,快速开始

查看: 34307|回复: 16

[PB10-15.X] 自动升级

  [复制链接]

[PB10-15.X] 自动升级

  [复制链接]
redmg

主题

0

回帖

6

积分

新手上路

积分
6
贡献
在线时间
小时
2008-9-24 23:53:30 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?站点注册

×
网上的太过复杂,不适用!
其实很简单。

自动升级源码:可保存历史版本信息

在主程序 open 事件中 加入以下代码

string lsNewVer, lsSysName, lsOldVer
lsSysName = upper(ProfileString(is_updateini, 'Config', 'sysName', 'xsbd'))
select isnull(max(version),'')  into :lsNewVer from sys_verfile where upper(systemname) = :lsSysName;
lsOldVer = ProfileString(is_updateini, 'Config', 'version', '1.0')
if lsOldVer < lsNewVer then
        if MessageBox('系统升级','当前程序已有新版本,~r~r是否马上升级?',  Question!, YesNo!, 1) = 1 then
                run('update.exe')
                halt
        end if
end if

升级需要用到的数据表:
CREATE TABLE sys_verfile
(
systemname varchar(20) not NULL,
version varchar(20) NOT NULL,
filename varchar(40) NOT NULL,
filesize int NULL,
filebody image NULL,
fileupdate datetime null,
CONSTRAINT pk_fn PRIMARY KEY (systemname, filename,filebodyid )
);

自动升级.rar

73.51 KB, 下载次数: 282, 下载积分: 金钱 -1

共享共进共赢Sharing And Win-win Results
SYBASEBBS - 免责申明1、欢迎访问“SYBASEBBS.COM”,本文内容及相关资源来源于网络,版权归版权方所有!本站原创内容版权归本站所有,请勿转载!
2、本文内容仅代表作者观点,不代表本站立场,作者自负,本站资源仅供学习研究,请勿非法使用,否则后果自负!请下载后24小时内删除!
3、本文内容,包括但不限于源码、文字、图片等,仅供参考。本站不对其安全性,正确性等作出保证。但本站会尽量审核会员发表的内容。
4、如本帖侵犯到任何版权问题,请立即告知本站 ,本站将及时删除并致以最深的歉意!客服邮箱:admin@sybasebbs.com
ehxz

主题

0

回帖

56万

积分

管理员

积分
567733
贡献
在线时间
小时
2008-9-25 08:39:21 | 显示全部楼层
加个精华先,不过PB11的版本的话估计能用的人少些
共享共进共赢Sharing And Win-win Results
decalove

主题

0

回帖

2

积分

新手上路

积分
2
贡献
在线时间
小时
2009-4-8 22:56:08 | 显示全部楼层
重要的是注意对主程序和升级程序本身升级的问题
共享共进共赢Sharing And Win-win Results
winwhere

主题

0

回帖

129

积分

中级会员

积分
129
贡献
在线时间
小时
2009-4-21 06:44:58 | 显示全部楼层
这样的方法是必须首先更改数据库中的版本号,那数据库中的版本号由谁来改呢,如果有专人的数据库管理员是可以的,否则,不大可行。
共享共进共赢Sharing And Win-win Results
zjyh168

主题

0

回帖

85

积分

注册会员

积分
85
贡献
在线时间
小时
2009-8-23 17:18:31 | 显示全部楼层
非常感谢。。。。
共享共进共赢Sharing And Win-win Results
838637819

主题

0

回帖

337

积分

高级会员

积分
337
贡献
在线时间
小时
2010-2-9 10:11:23 | 显示全部楼层
增加数据库脚本执行的功能应该可以进行数据库的升级了
共享共进共赢Sharing And Win-win Results
522503763

主题

0

回帖

528

积分

注册会员

积分
528
贡献
在线时间
小时
2012-5-17 06:36:15 | 显示全部楼层
增加数据库脚本执行的功能应该可以进行数据库的升级了
共享共进共赢Sharing And Win-win Results
838637819

主题

0

回帖

337

积分

高级会员

积分
337
贡献
在线时间
小时
2012-12-29 11:53:15 | 显示全部楼层
多谢分析,学习一下。
共享共进共赢Sharing And Win-win Results
fmmugy

主题

0

回帖

435

积分

高级会员

积分
435
贡献
在线时间
小时
2014-5-31 08:38:35 | 显示全部楼层
好东西,必须支持一下
共享共进共赢Sharing And Win-win Results
吞吞

主题

0

回帖

189

积分

注册会员

积分
189
贡献
在线时间
小时
2014-9-30 22:18:13 | 显示全部楼层
看着很简单的样子{:soso_e100:}
共享共进共赢Sharing And Win-win Results
chinahero139

主题

0

回帖

152

积分

中级会员

积分
152
贡献
在线时间
小时
2014-12-29 23:41:58 | 显示全部楼层
不错的资源,感谢分享
共享共进共赢Sharing And Win-win Results
telephone

主题

0

回帖

1万

积分

论坛元老

积分
10669
贡献
在线时间
小时
2015-6-6 08:11:30 | 显示全部楼层
非常感谢。。。。
共享共进共赢Sharing And Win-win Results
您需要登录后才可以回帖 登录 | 站点注册

本版积分规则

免责声明:
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com

QQ|Archiver|PowerBuilder(PB)BBS社区 ( 鲁ICP备2021027222号-1 )

GMT+8, 2024-3-29 03:56 , Processed in 0.044251 second(s), 11 queries , MemCached On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表