?? del_page.asp
字號(hào):
<link href="25175_1.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
margin-top: 0px;
}
-->
</style><table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="754" valign="top" bgcolor="#A0A4AC" style="line-height:140%;"> 網(wǎng)站名稱(chēng)：<font color="#0000FF"><a href="http://www.25175.com">SP.25175</a></font><br>
網(wǎng)站LOGO：<a href="http://www.25175.com/logo1.GIF">http://www.25175.com/logo1.GIF</a><br>
演示地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/">http://www.25175.com/asp/test_20050825_v161/</a><br>
</font>下載地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar">http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar</a><br>
</font> 在線(xiàn)聊天：<a href="http://wpa.qq.com/msgrd?V=1&Uin=29752345&Site=www.25175.com&Menu=yes">29752345</a></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#A0A4AC"><a href="index.asp">首頁(yè)</a> <a href="add.asp">添加試題</a> <a href="delete_all.asp">刪除試題</a> <a href="SEARCH.ASP">列出試題答案</a> <a href="change_password.asp">修改密碼</a> <a href="login.asp">登入</a> <a href="20050130_logout.asp">退出</a></td>
</tr>
</table>
<%if session("password")<>"" then%>
<script language="JavaScript">
function test(){
if (document.form2.page.value=="" || isNaN(document.form2.page.value)) {
alert("輸入頁(yè)數(shù)必須為數(shù)值型");
document.form2.page.focus();
return false;
}
return true;
}
</script>
<script>
function del () //用于判斷記錄有沒(méi)有選中的函數(shù)
{
var flag=true;
var temp="";
var tmp;
if((document.form1.answer.length+"")=="undefined") {tmp=1}else{tmp=document.form1.answer.length}
if (tmp==1){
if (document.form1.answer.checked){
flag=false;
temp=document.form1.answer.value
}}else
{
for (i=0;i<document.form1.answer.length;i++) {
if (document.form1.answer[i].checked){
if (temp=="")
{
flag=false;
temp=document.form1.answer[i].value
}
else
{flag=false;
temp = temp +","+ document.form1.answer[i].value
}}}}
if (flag){ alert("對(duì)不起，你還沒(méi)有選擇！")}
else
{name=document.form1.name.value
if (confirm("確定要批量刪除？")){ window.location="delnews_all.asp?id=" + temp;}}
return !flag;
}
</script>
<script language="javascript">
function confirmDel(id){
if (confirm("確定這個(gè)刪除？"))
{
window.location.href = "delnews.asp?id=" + id
}
}
</script>
<script language=Javascript>
function checkall(all)//用于判斷全選記錄的函數(shù)
{
var a = document.getElementsByName("answer");
for (var i=0; i<a.length; i++) a[i].checked = all.checked;
}
</script>
<!--#include file="conn.asp" -->
<%
sql="select * from test order by id desc"
rs.open sql,conn,1,3
if rs.EOF then
Response.Write "沒(méi)記錄"
else
%>
<title>www.25175.com 在線(xiàn)考試系統(tǒng)v1.61</title>
<link href="css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="conn1.asp"-->
<%
page = CLng(request("page")) '利用CLng函數(shù)把page值轉(zhuǎn)換為L(zhǎng)ong型
judge=request("judge")
judge2=request("judge2")
judge3=0
sqlcmd="select * from test Order By id Desc"
rs1.Open sqlcmd,newconn,1,2
%>
<%
if not (rs1.EOF or rs1.BOF) then
rs1.MoveFirst
rs1.PageSize = 10 '每頁(yè)顯示的條數(shù)
If page < 1 Then page = 1
If page > rs1.PageCount Then page = rs1.PageCount
rs1.AbsolutePage = page
For ipage = 1 To rs1.PageSize
%>
<% 'do while not rs.EOF%>
<%
rs1.MoveNext
If rs1.EOF Then Exit For
Next
%>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<form method="POST" id=form1 name=form1>
<tr>
<td width="50" height="25"><%=rs("id")%></td>
<td width="190"><%=rs("question")%></td>
<td width="25"><a href='javascript:confirmDel(<%= rs("id") %>)'>刪除</a> </td>
<td width="25"><div align="center">
<input type="checkbox" name="answer" value="<%=rs("id")%>" id="Checkbox1">
</div></td>
</tr>
</form>
</table>
<%
rs.MoveNext
'loop
end if
rs.Close
set rs=nothing
set conn=nothing
%>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" valign="top">
<div align="right">
<table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="1" bgcolor="#A0A4AC"><div align="center"></div></td>
</tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="3"><div align="center"></div></td>
</tr>
</table>
<input type="checkbox" name="chkall" value="on" onClick="checkall(this)" id="Checkbox2">
選中所有的顯示信息
<input type="button" name="btnDelete" value="刪除" onClick="del()" id="Button1">
</div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<form onSubmit="return test();" method="get" action="del.asp" id=form2 name=form2>
<td width="200" height="20">頁(yè)數(shù)：
<%Response.Write "<input type=text size=2 maxlength=4 name=page class=editbox1><input type=hidden name=judge value=1>" '顯示輸入頁(yè)數(shù)框并將page,judge參數(shù)傳遞下去%></td>
<td>
<%
If page = 1 Then
Response.Write "第一頁(yè) 上一頁(yè)"
End If
If page <> 1 Then
Response.Write "<a href=del.asp?page=1 class='yellow'>第一頁(yè)</a>"
Response.Write " <a href=del.asp?page=" & (page - 1) & " class='yellow'>上一頁(yè)</a>"
End If
If page <> RS1.PageCount Then
Response.Write "<a href=del.asp?page="&(page + 1)&" class='yellow'>下一頁(yè)</a>"
Response.Write "<a href=del.asp?page="&RS.PageCount&" class='yellow'>最后一頁(yè)</a>"
End If
If page = RS1.PageCount Then
Response.Write "下一頁(yè) 最后一頁(yè)"
End If
%>
</td>
</form>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="350" height="20"> 記錄總數(shù)：<%=rs1.recordCount%> 總頁(yè)數(shù)：<%=rs1.PageCount%> 當(dāng)前頁(yè)次：<%=page%> </td>
<td>
<table width="350" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><%else%></td>
<td><table border="0" align=center cellpadding="0" cellspacing="0" >
<td >對(duì)不起，還沒(méi)有記錄！</td>
</table></td>
<td><%end if%></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" bgcolor="#A0A4AC"><div align="center" class="style1">
<div align="center"><a href="http://www.25175.com">powered by 25175</a></div>
</div></td>
</tr>
</table>
<%else
Response.Redirect "20050130_loginagine.asp"
end if%>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -