⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 lianjie_gai.asp.bak

📁 一个WAP导航程序!动态友链!好东西!而且后台安全性很强
💻 BAK
字号:

<% @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="const.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")
content=rs("content")
	set rs = server.createobject("adodb.recordset")
	sql="select * from class where id="&lassid&""
	rs.open sql,conn,1,1
	if not rs.eof then
	class_name=rs("name")
	end if
%>
<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>
网站简称(限两字)
<br/><input type='text' name='title' size='10' maxlength='2' value='<%=title%>'/>
<br/>网站全称(全名)
<br/><input type='text' name='quan' size='10' value='<%=title_quan%>'/>
<br/>网站地址(带http://)
<br/><input type='text' name='content' size='10' value='<%=content%>'/>
<br/>添加到
<br/><select name='lassid'>
<%if lassid="" then%>
<option value=''>选择分类</option>
<%else%>
<%
	if request("id")=7 then
	name="综合"
	end if
	if request("id")=1 then
	name="美图"
	end if
	if request("id")=2 then
	name="游戏"
	end if
	if request("id")=3 then
	name="文学"
	end if
	if request("id")=4 then
	name="社区"
	end if
	if request("id")=5 then
	name="音乐"
	end if
	if request("id")=6 then
	name="智能"
	end if
	if request("id")=8 then
	name="导航"
	end if
    if request("id")=14 then
	name="影视"
	end If
	if request("id")=9 then
	name="搜索"
	end if
	if request("id")=10 then
	name="酷站"
	end if
	if request("id")=11 then
	name="资讯"
	end if
	if request("id")=12 then
	name="军事"
	end if
	if request("id")=13 then
	name="娱乐"
	end if
	if request("id")=15 then
	name="体育"
	end if
	if request("id")=16 then
	name="财经"
	end if
	if request("id")=17 then
	name="博客"
	end if
    if request("id")=18 then
	name="手机"
	end If
	if request("id")=19 then
	name="科技"
	end If
	if request("id")=22 then
	name="求职"
	end If
	if request("id")=23 then
	name="建站"
	end if
%>
<option value='<%=lassid%>'><%=class_name%></option>
<%end if%>
<option value='7'>综合</option>
<option value='1'>美图</option>
<option value='2'>游戏</option>
<option value='3'>文学</option>
<option value='4'>社区</option>
<option value='5'>音乐</option>
<option value='6'>智能</option>
<option value='8'>导航</option>
<option value='14'>影视</option>
<option value='9'>搜索</option>
<option value='10'>酷站</option>
<option value='11'>资讯</option>
<option value='12'>军事</option>
<option value='13'>娱乐</option>
<option value='15'>体育</option>
<option value='16'>财经</option>
<option value='17'>博客</option>
<option value='18'>手机</option>
<option value='19'>科技</option>
<option value='22'>求职</option>
<option value='23'>建站</option>
</select>
<br/>站点简介(可留空)
<br/><input type='text' name='jianjie' size='10' value='这个站很爽的,只是站长太忙了,什么也没留下!'/>
<br/><anchor>[-提交-]
<go href='lianjie_gai_ok.asp?id=<%=request("id")%>' method='post' accept-charset='utf-8'>
<postfield name='title' value='$(title)'/>
<postfield name='title_quan' value='$(quan)'/>
<postfield name='content' value='$(content)'/>
<postfield name='lassid' value='$(lassid)'/>
<postfield name='jianjie' value='$(jianjie)'/>
</go>
</anchor>

<br/>-------------
<br/><a href='../index.asp'>返回首页</a>
</p>
</card>
</wml> 

⌨️ 快捷键说明

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