?<!--#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>