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

📄 url.asp

📁 3ani桑尼网络wap导航程序wap导航程序wap导航程序
💻 ASP
字号:
<!--#include file="../66hc.asp"--><!--#include file="admin.asp"-->
<card id="main" title="编辑站点" >
<p>
<%
id=request("id")
if id="" then id="0"
set rs=Server.CreateObject("ADODB.Recordset")
rsstr="select * from [66hc_url] where [66hc_id]="&id&""
rs.open rsstr,conn,1,2
if rs.eof then 
response.write("无此站点<br/>")
else
%>
所属分类<select title="分类" name="fid<%=minute(now)%><%=second(now)%>" value="<%=ubb(rs("66hc_fid"))%>">
<%
set rst=server.createobject("ADODB.Recordset")
Sql="select * from [66hc_class] order by [66hc_id] asc"
rst.open Sql,conn,1,1
i=1
do while not rst.eof
%>
<option title="<%=rst("66hc_name")%>" value="<%=rst("66hc_id")%>"><%=ubb(rst("66hc_name"))%></option>
<%
i=i+1
rst.movenext
loop
rst.Close
set rst=nothing
%>
</select><br/>
站点名称<input name='name<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_name"))%>'/><br/>
首连名称<input name='syname<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_sy"))%>'/><br/>
站点地址<input name='url<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_url"))%>'/><br/>
今日连入<input name='jrlr<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_jr"))%>'/><br/>
总的连入<input name='zdlr<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_zl"))%>'/><br/>
昨日数量<input name='zrsl<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_zr"))%>'/><br/>
最新时间<%=ubb(rs("66hc_time"))%><br/>
是否推荐<select name='tjj<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("kz"))%>'>
<option value="0">普通</option>
<option value="1">推荐</option>
</select><br/>
站点状态<select name='zt<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("zt"))%>'>
<option value="0">待审</option>
<option value="1">正常</option>
<option value="2">封锁</option>
</select><br/>
连出数量<input name='lcsl<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("lc"))%>'/><br/>
<anchor>[确定编辑]<go href='urlcl.asp' method='post' accept-charset='utf-8'>
<postfield name='name' value='$(name<%=minute(now)%><%=second(now)%>)'/>
<postfield name='syname' value='$(syname<%=minute(now)%><%=second(now)%>)'/>
<postfield name='url' value='$(url<%=minute(now)%><%=second(now)%>)'/>
<postfield name='jrlr' value='$(jrlr<%=minute(now)%><%=second(now)%>)'/>
<postfield name='jrsj' value='$(jrsj<%=minute(now)%><%=second(now)%>)'/>
<postfield name='zrlr' value='$(zrsl<%=minute(now)%><%=second(now)%>)'/>
<postfield name='zxsj' value='$(zcsj<%=minute(now)%><%=second(now)%>)'/>
<postfield name='tj' value='$(tjj<%=minute(now)%><%=second(now)%>)'/>
<postfield name='zt' value='$(zt<%=minute(now)%><%=second(now)%>)'/>
<postfield name='zdlr' value='$(zdlr<%=minute(now)%><%=second(now)%>)'/>
<postfield name='lcsl' value='$(lcsl<%=minute(now)%><%=second(now)%>)'/>
<postfield name='fid' value='$(fid<%=minute(now)%><%=second(now)%>)'/>
<postfield name='pdsj' value='$(pasdj<%=minute(now)%><%=second(now)%>)'/>
<postfield name='id' value='<%=id%>'/>
<postfield name='sb' value='<%=sb%>'/>
</go></anchor><br/>
<%
end if
'rsp.update
rs.close
set rs=nothing%>
----------<br/>
<a href="66hc_zd.asp?sb=<%=sb%>">返回站点管理</a><br/>
<a href="d_i.asp?sb=<%=sb%>">返回管理首页</a><br/>
<a href="/?sb=<%=sb%>">返回网站首页</a><br/>
报时:<%=time%>
</p></card></wml>

⌨️ 快捷键说明

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