想加个功能？哪位高手帮帮小弟我多谢了
日期：2014-05-17 浏览次数：21300 次
想加个功能？谁帮帮我谢谢了
<%
if session("SjAdminName") = "" then
response.Redirect "Admin_Login.asp"
end if
%>
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
dim rs, sql,iCount
dim Action,FoundErr,ErrMsg
Action=Trim(request("Action"))
%>
<html>
<head>
<title>手机管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/Admin_Style.css" rel="stylesheet" type="text/css">
<SCRIPT language=javascript>
function unselectall()
{
if(document.myform.chkAll.checked){
document.myform.chkAll.checked = document.myform.chkAll.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll"&&e.disabled!=true)
e.checked = form.chkAll.checked;
}
}
</script>
</head>
<body leftmargin="2" topmargin="0" marginwidth="0" marginheight="0">
<table width="63%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
<tr class="topbg">
<td height="22" colspan="2" align="center"><strong>手 机 取 料 管 理</strong></td>
</tr>
<tr class="tdbg">
<td width="70" height="30"><strong>管理导航：</strong></td>
<td height="30"><a href="Admin_sj.asp">手机管理首页</a> <a href="Admin_Admin.asp?Action=Add">管理员添加</a> | <a href="Admin_Admin.asp">管理</a> <a href="Admin_Logout.asp">退出管理</a></td>
</tr>
</table>
<%
if Action="Del" then
call Delsj()
else
call main()
end if
if FoundErr=True then
call WriteErrMsg()
end if
call CloseConn()
sub main()
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from sj order by id"
rs.Open sql,conn,1,1
iCount=rs.recordcount
%>
<div align="center">
<table width='794' border="0" cellpadding="0" cellspacing="0">
<tr><td align="center" width="419" bgcolor="#008000">
<FORM action="http://www.ip138.com:8080/search.asp" method=post name="mobileform" target="_blank">
<INPUT class=tdc name="mobile" maxLength="11" size=20>
<INPUT name="action" type="hidden" value=mobile>
<INPUT class=bdtj name=B1 type=submit value="手机地址查询">
</TD>
</form>
<td align="center" width="375" bgcolor="#008000">
<form method=post action="http://www.ip138.com/ips8.asp" name="ipform" target="_blank">
<input type="text" name="ip" size="20">
<input type="hidden" name="action" value="2">
<input type="submit" value="IP 地址 查询">
</TD>
</FORM>
</TR>
<%
if session("SjAdminName") = "" then
response.Redirect "Admin_Login.asp"
end if
%>
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
dim rs, sql,iCount
dim Action,FoundErr,ErrMsg
Action=Trim(request("Action"))
%>
<html>
<head>
<title>手机管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/Admin_Style.css" rel="stylesheet" type="text/css">
<SCRIPT language=javascript>
function unselectall()
{
if(document.myform.chkAll.checked){
document.myform.chkAll.checked = document.myform.chkAll.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll"&&e.disabled!=true)
e.checked = form.chkAll.checked;
}
}
</script>
</head>
<body leftmargin="2" topmargin="0" marginwidth="0" marginheight="0">
<table width="63%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
<tr class="topbg">
<td height="22" colspan="2" align="center"><strong>手 机 取 料 管 理</strong></td>
</tr>
<tr class="tdbg">
<td width="70" height="30"><strong>管理导航：</strong></td>
<td height="30"><a href="Admin_sj.asp">手机管理首页</a> <a href="Admin_Admin.asp?Action=Add">管理员添加</a> | <a href="Admin_Admin.asp">管理</a> <a href="Admin_Logout.asp">退出管理</a></td>
</tr>
</table>
<%
if Action="Del" then
call Delsj()
else
call main()
end if
if FoundErr=True then
call WriteErrMsg()
end if
call CloseConn()
sub main()
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from sj order by id"
rs.Open sql,conn,1,1
iCount=rs.recordcount
%>
<div align="center">
<table width='794' border="0" cellpadding="0" cellspacing="0">
<tr><td align="center" width="419" bgcolor="#008000">
<FORM action="http://www.ip138.com:8080/search.asp" method=post name="mobileform" target="_blank">
<INPUT class=tdc name="mobile" maxLength="11" size=20>
<INPUT name="action" type="hidden" value=mobile>
<INPUT class=bdtj name=B1 type=submit value="手机地址查询">
</TD>
</form>
<td align="center" width="375" bgcolor="#008000">
<form method=post action="http://www.ip138.com/ips8.asp" name="ipform" target="_blank">
<input type="text" name="ip" size="20">
<input type="hidden" name="action" value="2">
<input type="submit" value="IP 地址 查询">
</TD>
</FORM>
</TR>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
