user.asp

使用Asp+Access+FSO+Jmail+Servu开发

<%
set rsuser=server.createobject("ADODB.Recordset")
sqluser="select * from [user] where username='"&Request.Cookies("username")&"'"
rsuser.open sqluser,conn,1,1
if rsuser.eof and rsuser.bof then
Response.Cookies("username")=""
response.redirect("error.asp?error=other")
response.End
end if
groups=rsuser("groups")
set rshost=server.createobject("ADODB.Recordset")
sqlhost="select * from [host] where id="&cint(groups)
rshost.open sqlhost,conn,1,1
userdir=rshost("userdir")
bakfolder=rshost("bakfolder")
%>