updatebank2.asp

功能强大的一个b/s工作站

<!--#include file="connbank.asp"-->
<%
'bank update
Server.ScriptTimeOut=9999999
dim rs,sql

select case request("action")
case "update1"
	call update1()
case else
	call main()
end select

sub main()
%>
<b><font color=red>新版银行插件V1.1 for final to V1.2 for 6.0 升级程序</font></b><br>
<br>
<b><font color=navy>升级说明</font></b><br>
	<ui>
		<li>本升级程序只是适合[我来了]提供的银行插件的升级
		<li>也适合其他数据库结构一样的银行插件升级
		<li>升级好银行数据库之后用新版银行文件覆盖即可使用		
	</ui>
<br><br>
<b><font color=navy>注意事项</font></b><br> 
	<ui> 
		<li>升级前请先备份银行数据库
		<li>如果是全新安装银行插件，则无须升级数据库，直接用新版中提供的数据库就可以
	</ui>
<br><br>	
<B>操作步骤</B>：<BR><BR>    
本升级只需一步个步骤    
<br>
<FORM METHOD=POST ACTION="?action=update1">
<B>第一步</B>：<input type=submit name=submit value="开始更新数据库结构"><br>
<p>更新银行数据库结构，正常1秒钟之内完成升级  </p>
<%
end sub

'更新表结构
sub update1()
'=================================================
	'更新bankconfig表
	conn1.execute("alter table bankconfig add [StartLixiDay] int default 10")
	conn1.execute("update [bankconfig] set StartLixiDay=10,bank_setting='1,1,1,1,1.5,0,0,0||24'")
	
	'更新bank表
	conn1.execute("update bank set bankuser_setting='0,1.5,30'")	
'=================================================
	response.write "升级银行数据库结构成功，请用新版银行文件覆盖原文件即可使用"
end sub
%>