asptbsys.asp

使用前请您先阅读以下条款

<!--#include file="conn.asp"-->
<%
'会员信息
if session("idu")="" then
idu=0
username="游客"
userzhiwu=0
else  
set rsu=Server.CreateObject("ADODB.Recordset")
sus="select * from asptbuser where idu="&session("idu")
rsu.Open sus,Conn,1,3
idu=rsu("idu")
userid=rsu("userid")
username=rsu("username")
userzhiwu=rsu("userzhiwu")
rsu.close
set rsu=nothing
end if
'系统信息
asptbver="ASPTBcom v1.0"
asptbsys="select  * from asptbsys" 
set rssys=server.createobject("adodb.recordset")
rssys.open asptbsys,conn,1,1
webname=rssys("webname")
weburl=rssys("weburl")
weblogo=rssys("weblogo")
webver=rssys("webver")
webyn=rssys("webyn")
webcopy=rssys("webcopy")
medes=rssys("medes")
mekey=rssys("mekey")
webguang1=rssys("webguang1")
webguang2=rssys("webguang2")
webguang3=rssys("webguang3")
rssys.close
set rssys=nothing
'模板信息

asptbtable="select  * from asptbtable" 
set rstb=server.createobject("adodb.recordset")
rstb.open asptbtable,conn,1,1
tabletop = rstb("tabletop")
tableind = rstb("tableind")
tableind2 = rstb("tableind2")
tablelist = rstb("tablelist")
tableshow = rstb("tableshow")
tablebottom = rstb("tablebottom")
rstb.close
set rstb=nothing
%>