📄 top.asp
字号:
<!--#include file="check.asp"-->
<html>
<title>虚拟主机代理商自助管理系统</title>
<STYLE type=text/css>
BODY {FONT-SIZE: 9pt; FONT-FAMILY: "宋体"}
TD {FONT-SIZE: 9pt; FONT-FAMILY: "宋体"; line-height: 20px}
.TEXT1 {FONT-SIZE: 9pt; FONT-FAMILY: "宋体"; line-height: 16px}
.TEXT2 {FONT-SIZE: 12pt; FONT-FAMILY: "宋体"; COLOR: #FFFFFF; line-height: 24px; font-weight: bold}
A {TEXT-TRANSFORM: none; COLOR: #000000; TEXT-DECORATION: none}
A:active {COLOR: #ff0000; TEXT-DECORATION: none}
A:visited {COLOR: #000000; TEXT-DECORATION: none}
A:hover {COLOR: #666666; TEXT-DECORATION: underline}
input {font-size:12px; height: 18; border: 1px solid #cccccc; background-color:#F6F6F6; color:#000000}
textarea {font-size:12px; border: 1px solid #cccccc; background-color:#F6F6F6; color:#000000}
select {font-size:12px; border: 1px solid #cccccc; background-color:#F6F6F6; color:#000000}
</STYLE>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [Agent_User] where ID=" & session("ID")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
response.redirect "index.asp"
response.end
else
UserID=rs("UserID")
Name=rs("Name")
Grade=rs("Grade")
Money=rs("Money")
TelePhone=rs("TelePhone")
Address=rs("Address")
end if
rs.close
Set rs = Nothing
%>
<!--#include file="hand.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -