top.asp

来自「一个非常优秀的自动建站程序」· ASP 代码 · 共 35 行

ASP
35 行
字号 
<!--#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"-->

top.asp - 源码说明

本页面展示了「一个非常优秀的自动建站程序」中的 top.asp 源码文件，采用 ASP 编程语言编写，共 35 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与自动相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?