?? lianjie_tui.asp
字號:
?<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
<%
'====================================================================
' 請你保留這段說明,這并不會影響你的速度,
' 程序制作:橫云 掌上校園版權所有,請勿破解
' 完成時間: 2007-09-27 主頁地址:HTTP://wap.cnscu.cn
' E-Mail: cnscu@126.com QQ:554904632
'====================================================================
%>
<%
if session("admin")="" then
response.redirect "index.asp"
end if
%>
<?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"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql ="SELECT * From wapqita where id="&request("id")
RS.open sql,Conn,1,1
lassid=rs("lassid")
title=rs("title")
title_quan=rs("title_quan")
jianjie=rs("jianjie")
tuijian=rs("tuijian")
%>
<wml>
<head>
<meta http-equiv='Cache-Control' content='no-Cache'/>
<meta http-equiv='Cache-Control' content='max-age=0'/>
</head>
<card id='main' title='推薦站點'>
<p align='center'>
<%if tuijian=0 then%>
<a href='lianjie_tui_jia.asp?id=<%=request("id")%>'>推薦本站</a>
<%else%>
<a href='lianjie_tui_jian.asp?id=<%=request("id")%>'>取消推薦</a>
<%end if%>
<br/><a href='../index.asp'>返回首頁!</a>
</p>
</card>
</wml>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -