update15.asp

信运网店系统是一套功能完善、简洁美观

<!--#include file="inc_connect.asp"-->
<%
' 注意：此升级文件仅适用于V1.5及以上的版本。

On Error Resume Next

conn.execute("ALTER TABLE topic ADD ip char(50)")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update topic set ip='未记录'")
end if

conn.execute("ALTER TABLE admin ADD maxnum int")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update admin set maxnum='600'")
end if

conn.execute("ALTER TABLE admin ADD needcheck int")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update admin set needcheck='0'")
end if

conn.execute("ALTER TABLE topic ADD checked int")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update topic set checked='1'")
end if

conn.execute("ALTER TABLE topic ADD userface int")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update topic set userface='1' where xingbie='1'")
	conn.execute("update topic set userface='6' where xingbie='2'")
	conn.execute("update topic set userface='11' where xingbie='0'")
end if

conn.execute("ALTER TABLE topic ADD whisper int")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update topic set whisper='0'")
end if

conn.execute("ALTER TABLE admin ADD UBBconfig char(100)")
if not err.number=0 then
	Err.Clear
else
	conn.execute("update admin set UBBconfig = 'font, size, color, bold, italic, underline, center, URL, email, shadow, glow, pic, emot' ")
end if

conn.execute("ALTER TABLE admin ADD adword memo")
if not err.number=0 then
	Err.Clear
else
	dim ad	'以下为被屏蔽的广告词语，升级后，请根据自己站点的情况，在后台增加或删除。
	ad="网赚" & chr(13) & chr(10) & "网络赚钱" & chr(13) & chr(10) & "网上赚钱" & chr(13) & chr(10) & "网上兼职" & chr(13) & chr(10) & "专业提供" & chr(13) & chr(10) & "合同下载" & chr(13) & chr(10) & "网站建设" & chr(13) & chr(10) & "六合彩" & chr(13) & chr(10) & "网上购物" & chr(13) & chr(10) & "求租房" & chr(13) & chr(10) & "房屋租赁" & chr(13) & chr(10) & "网站建设" & chr(13) & chr(10) & "网站推广" & chr(13) & chr(10) & "写真" & chr(13) & chr(10) & "美女图库" & chr(13) & chr(10) & "人体艺术" & chr(13) & chr(10) & "免费音乐" & chr(13) & chr(10) & "免费电影" & chr(13) & chr(10) & "铃声下载" & chr(13) & chr(10) & "麻醉药" & chr(13) & chr(10) & "安眠药" & chr(13) & chr(10) & "出售各种" & chr(13) & chr(10) & "交友" & chr(13) & chr(10) & "数据恢复" & chr(13) & chr(10) & "交换链接" & chr(13) & chr(10) & "法轮" & chr(13) & chr(10) & "注册公司" & chr(13) & chr(10) & "诚招" & chr(13) & chr(10) & "私服" & chr(13) & chr(10) & "外挂" & chr(13) & chr(10) & "花店" & chr(13) & chr(10) & "代理" & chr(13) & chr(10) & "网上支付" & chr(13) & chr(10) & "游戏下载" & chr(13) & chr(10) & "资源下载" & chr(13) & chr(10) & "留学" & chr(13) & chr(10) & "google排名" & chr(13) & chr(10) & "枪手" & chr(13) & chr(10) & "SOHO" & chr(13) & chr(10) & "商务" & chr(13) & chr(10) & "成人用品" & chr(13) & chr(10) & "查价网" & chr(13) & chr(10) & "sex" & chr(13) & chr(10) & "href" & chr(13) & chr(10) & "提供专业" & chr(13) & chr(10) & "域名注册" & chr(13) & chr(10) & "减肥产品"
	conn.execute("update admin set adword = '"&ad&"'")
end if

conn.execute("ALTER TABLE admin ADD badip memo")
conn.execute("ALTER TABLE topic ADD replycode memo")
conn.execute("CREATE TABLE _nodown (nodown Nvarchar(50) WITH COMPRESSION)")
conn.execute("insert into _nodown (nodown) values ('<%<%')")

response.write "已成功更新数据库。请接着运行update2.asp。"
%>