<%
conn.open constr
if session("u_sysid")="" then
Response.write ""
Response.end
end if
Sql="Select * from userdetail Where u_name='" & Session("user_name") &"'"
Rs.open Sql,conn,1,1
if Rs.eof then
Response.write ""
Response.end
end if
Sql="Select * from Fuser Where username='" & Session("user_name") & "' and L_ok=True"
Set FRs=conn.Execute(Sql)
if FRs.eof then
Response.write ""
Response.end
end if
%>
VCP用户管理
尊敬的
<%if FRs("ModeD") then
Response.write "D"
else
Response.write "C"
end if%>
<%=name%>模式合作伙伴，您好！(修改资料)