guest.asp

来自「企业版WAP网站」· ASP 代码 · 共 36 行

ASP
36
字号
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>

<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<!--#include file="conn.asp"-->
<!--#include file="char.asp"-->
<wml>
<head>
<meta http-equiv='Cache-Control' content='no-Cache'/>
<meta http-equiv='Cache-Control' content='max-age=0'/>
</head>
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql ="SELECT * From config Order By id DESC"
rs.open sql,conn,1,1
liuyan=rs("liuyan")
rs.close
set rs=nothing
%>
<card id='main' title='<%=liuyan%>'>  
<p>
<a href='guest/guest_input.asp'>&#x6211;&#x8981;&#x7559;&#x8A00;</a>
<br/><a href='guest/guest_my.asp'>&#x6211;&#x7684;&#x7559;&#x8A00;</a>
<br/><a href='guest/guest_list.asp'>&#x7559;&#x8A00;&#x5217;&#x8868;</a>
<%
if session("admin")="" and session("flag")="" then 
response.write "<br/><a href='const.asp'>&#x7BA1;&#x7406;&#x767B;&#x9646;</a>"
else
response.write "<br/><a href='main.asp'>管理页面</a>"
end if
%>
<br/><a href='index.asp'>&#x8FD4;&#x56DE;&#x9996;&#x9875;</a> 
</p>
</card>
</wml>                          

⌨️ 快捷键说明

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