<%
set conn=server.createObject("ADODB.Connection")
dbpath=server.mappath("club.mdb")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath
set rs=server.createobject("ADODB.Recordset")
set rs1=server.createobject("adodb.recordset")
sqltext="select newregtime,articlenum,logonnum,lives from user_info where username='"&session("username")&"' "
rs.open sqltext,conn
set rs2=server.createobject("ADODB.RecordSet")
sql1="select top 20 m.id,m.guestname,m.title,m.whattime,m.[textsize],m.clicknum,m.renum,m.feeling,m.boardid,b.boardname from mainboard m,board_info b where m.fatherid=0 and m.boardid=b.boardid order by m.clicknum desc"
rs2.open sql1,conn
sql="select geter from mails where geter='"&session("username")&"' and chek=0"
'response.write sql
'response.end
rs1.open sql,conn
if rs.bof and rs.eof then
response.redirect ("welcome.html")
response.end
end if
%>
欢迎光临都市伙伴
