📄 index.asp
字号:
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form method="post" action="" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)">
<td valign="top">
<table width="100%" border="0" cellspacing="1" cellpadding="2">
<tr bgcolor="#999999">
<td colspan="5" class="heading">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="2%" align="right"><img src="images/adorn.gif" width="10" height="18"></td>
<td align="left">
<% if url_admin=1 then %><a href="add.asp" onClick='return js_openpage(this.href);'
onMouseOut="javaScript:Image5.src='images/add_off.gif'" onMouseOver="javaScript:Image5.src='images/add_on.gif'">
<img name="Image5" border="0" src="images/add_off.gif" width="60" height="19" hspace="5"></a>
<% end if %>
</td>
<td align="right" >
<% if (currpage > 1) then%>
<a href="index.asp?page=<%=currpage-1%>">上页
<%end if%>
</a>
<% if (currpage < pagesum) then %>
<a href="index.asp?page=<%=currpage+1%>">下页
<% end if %>
</a> 第<%=currpage%>页/共<%=pagesum%>页 共<%=alls%>条
</td>
<td width="3%"><img src="images/adorn.gif" width="10" height="18"></td>
</tr>
</table>
</td>
</tr>
<% if alls>0 then %>
<tr bgcolor="#bfbfbf">
<td width="20%"><b>网站名称 </b></td>
<td width="15%"><b>网址</b></td>
<td width="30%"><b>网站说明</b></td>
<% if url_admin=1 then %>
<td width="10%" align="center"><b>修改</b></td>
<td width="10%" align="center"><b>删除</b></td>
<% end if %>
</tr>
<% for i=1 to maxpage
if rs.eof then
exit for
else %>
<tr>
<td width="20%" bgcolor="#efefef"><%=rs("UrlName")%></td>
<td width="15%" bgcolor="#efefef"><a
<% if instr(rs("urlLink"),"http://")=0 then %> href="http://<%=rs("urlLink")%>"
<% else %> href="<%=rs("urlLink")%>" <% end if %>
target="_blank"><%=rs("urlLink")%></a></td>
<% ShowField "remark", Null %>
<% if url_admin=1 then %>
<td width="10%" align="center" bgcolor="#efefef">
<a href="modify.asp?id=<%=rs("id")%>" onMouseOut="MM_swapImgRestore()" onMouseOver="javaScript:Image<%=i+20%>.src='images/modi_2.gif'" onClick='return js_openpage(this.href);'><img name="Image<%=i+20%>" border="0" src="images/modi_1.gif" width="14" height="16"></a></td>
<td width="10%" align="center" bgcolor="#efefef"><a href="javaScript:del('delete.asp?id=<%=rs("id")%>')" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image<%=i+100%>','','images/dele_2.gif',1)"><img name="Image<%=i+100%>" border="0" src="images/dele_1.gif" width="14" height="16"></a></td>
<% end if %>
</tr>
<% rs.movenext
end if
next%>
<!--记录数为零时-->
<% else %>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="2">
<tr>
<td bgcolor="#efefef" align="right" > 没有找到任何信息 请按
</td>
<td bgcolor="#efefef" align="left"><a href="index.asp?sele=all" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image8','','images/showall_on.gif',1)"><img name="Image8" border="0" src="images/showall_off.gif" width="85" height="19"></a> </td>
</tr>
<% response.end
end if%>
</table>
<!--分页技术-->
<table width="100%" cellpadding="0" cellspacing="0" border="0">
<tr>
<td bgcolor="#BFBFBF" width="11%">
<% if session("sqlstr_url")<>"" then %>
<a href="index.asp?sele=all" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image7','','images/showall_on.gif',1)"><img name="Image7" border="0" src="images/showall_off.gif" width="85" height="19">
<% else %>
</a>
<script language="Javascript">
function ckse()
{
if (sele.selecttext.value=="")
{ alert ("请输入查询内容！");
sele.selecttext.focus();
return false;
}
}
</script>
查询： </td>
<td width="16%" bgcolor="#BFBFBF">
<select size="1" name="seler">
<option value="urlname">网站名称</option>
<option value="remark">网站介绍</option>
</select>
</td>
<td width="4%" bgcolor="#BFBFBF"> 为 </td>
<td width="16%" bgcolor="#BFBFBF">
<!--webbot bot="Validation" B-Value-Required="TRUE"
I-Maximum-Length="12" -->
<input type="text" name="selecttext" size="10" maxlength="12">
</td>
<td bgcolor="#BFBFBF" width="53%">
<a href="javascript:document.sele.submit();" onMouseOut="javaScript:Image8.src='images/search_on.gif'" onMouseOver="javaScript:Image8.src='images/search_off.gif'">
<img name="Image8" border="0" src="images/search_off.gif" align="middle"></a>
<% end if %>
</td>
</tr>
</table>
<br>
</td>
</form>
</tr>
</table>
<!--判断是否要继续添加数据-->
<% if request.querystring("add")="judge" then %>
<script Language="javaScript">
if (confirm(" ** 是否要继续添加网址信息 **"))
{
newwin=window.open("add.asp","NewWin","toolbar=no,resizable=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,top=220,left=220,width=450,height=200");
}
</script>
<% end if %>
</body>
</html>
<%set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -