📄 list.asp
字号:
<!--#include File='login.asa'--><% If Session(SiteID) <> true Then Response.Redirect("Login.asp?requester=list.asp") End If%>
<html>
<head>
<% ' FP_ASP -- FrontPage 组件自动产生 ASP 。请勿编辑。FP_CharSet = "gb2312"FP_CodePage = 936 %>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>结果 -- 列表</title>
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>
<body bgcolor="#FFFFFF">
<script Language="JavaScript"><!--
var sAction = "form";
var NoRecordsChecked = true;
function OnClickBtn( el )
{
if( el.name != "form_list" )
{
if( el.value == "添加新记录" )
{
document.form_list.target = "detail";
document.form_list.action = "new.asp";
sAction = "btn"
}
else if( el.value == "删除选中的记录" )
{
for (i=0;i<document.form_list.elements.length;i++)
{
if (document.form_list.elements[i].checked)
{
NoRecordsChecked = false;
}
}
if (NoRecordsChecked)
{
sAction = "form";
alert("选择您需要删除的记录并选择“删除选中的记录”。");
return;
}
document.form_list.target = "detail";
document.form_list.action = "delete.asp";
sAction = "btn"
}
}
else
{
if( sAction != "btn" )
{
document.form_list.target = "_self";
document.form_list.action = "list.asp";
}
sAction = "form";
}
}
-->
</script>
<table width="100%" align=left>
<tr>
<td width="50%">
<b><font size=+3 color="#000080"> 数据库编辑器 - <i>结果</i></font></b>
</td>
<td width="50%" align=right>
<table>
<tr>
<td>
<a href="../results_page.asp" target="_top">结果网页</a> | <a href="submission_form.asp" target="_top">提交表单</a> | 数据库编辑器
</td>
</tr>
</table>
</td>
</tr>
</table>
<br clear=all>
<form name="form_list" target="_self" action="list.asp" method="POST" OnClick="OnClickBtn(this)">
<table>
<td>
<p><input name="btnAction" type="submit" value="添加新记录" OnClick="OnClickBtn(this)"></p>
</td>
<td>
<p><input name="btnAction" type="submit" value="删除选中的记录" OnClick="OnClickBtn(this)"></p>
</td>
</table>
<hr>
<table border="0">
<thead>
<tr>
<td></td>
<td bgcolor="black"><font color="white" size="2"><b>主键</b></font></td><td bgcolor="black"><font color="white" size="2"><b>名称</b></font></td><td bgcolor="black"><font color="white" size="2"><b>选项</b></font></td>
</tr>
</thead>
<tbody>
<!--webbot bot="DatabaseRegionStart" s-columnnames="主键,名称,选项," s-columntypes="3,202,2," s-dataconnection="database" b-tableformat="TRUE" b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="FALSE" b-tableexpand="FALSE" b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE" i-ListFormat="0" b-makeform="TRUE" s-RecordSource="Results" s-displaycolumns="主键,名称,地址,选项" s-criteria s-order s-sql="SELECT * FROM Results ORDER BY 主键 ASC" b-procedure="FALSE" clientside SuggestedExt="asp" s-DefaultFields s-NoRecordsFound="无返回记录。" i-MaxRecords="256" i-GroupSize="5" u-dblib="../../../_fpclass/fpdblib.inc" u-dbrgn1="../../../_fpclass/fpdbrgn1.inc" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" Tag="TBODY" startspan BOTID="0" preview="<tr><td colspan=64 bgcolor="#FFFF00" width="100%"><font color="#000000">这是数据库结果区域的开始。 必须用浏览器从 Web 服务器获取该网页，才能正确显示该网页。当前网站存储于本地硬盘或网络上。</font></td></tr>" --><!--#include file="../../../_fpclass/fpdblib.inc"-->
<% if 0 then %>
<SCRIPT Language="JavaScript">
document.write("<div style='background: yellow; color: black;'>该网页的“数据库结果”组件不能显示数据库内容。网页名称必须是以 .asp 结尾，并且网站必须位于支持 Active Server Pages 的服务器。</div>");
</SCRIPT>
<% end if %>
<%
fp_sQry="SELECT * FROM Results ORDER BY 主键 ASC"
fp_sDefault=""
fp_sNoRecords="<tr><td colspan=4 align=""LEFT"" width=""100%"">无返回记录。</td></tr>"
fp_sDataConn="database"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=5
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_sColTypes="&主键=3&名称=202&选项=2&"
fp_iDisplayCols=4
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file="../../../_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" endspan -->
<tr>
<td><input type="checkbox" name="<%=FP_FieldURL(fp_rs,"主键")%>" value="ON"></td>
<td><a href="detail.asp?Field1=<%=FP_FieldURL(fp_rs,"主键")%>" target="detail">
<!--webbot bot="DatabaseResultColumn" s-columnnames="主键,名称,地址,选项" s-column="主键" b-tableformat="TRUE" b-hasHTML="FALSE" clientside startspan b-makelink b-MenuFormat preview="<font size="-1">&lt;&lt;</font>主键<font size="-1">&gt;&gt;</font>" --><%=FP_FieldVal(fp_rs,"主键")%><!--webbot bot="DatabaseResultColumn" endspan --></a></td><td>
<!--webbot bot="DatabaseResultColumn" s-columnnames="主键,名称,地址,选项" s-column="名称" b-tableformat="TRUE" b-hasHTML="FALSE" clientside startspan b-makelink b-MenuFormat preview="<font size="-1">&lt;&lt;</font>名称<font size="-1">&gt;&gt;</font>" --><%=FP_FieldVal(fp_rs,"名称")%><!--webbot bot="DatabaseResultColumn" endspan --></td><td>
<!--webbot bot="DatabaseResultColumn" s-columnnames="主键,名称,地址,选项" s-column="选项" b-tableformat="TRUE" b-hasHTML="FALSE" clientside startspan b-makelink b-MenuFormat preview="<font size="-1">&lt;&lt;</font>选项<font size="-1">&gt;&gt;</font>" --><%=FP_FieldVal(fp_rs,"选项")%><!--webbot bot="DatabaseResultColumn" endspan --></td>
</tr>
<!--webbot bot="DatabaseRegionEnd" b-tableformat="TRUE" b-menuformat="FALSE" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" i-groupsize="5" clientside Tag="TBODY" startspan preview="<tr><td colspan=64 bgcolor="#FFFF00" width="100%"><font color="#000000">这是数据库结果区域的结束。</font></td></tr><TR><TD VALIGN=MIDDLE COLSPAN=64><NOBR><INPUT TYPE=Button VALUE=" |< "><INPUT TYPE=Button VALUE=" < "><INPUT TYPE=Button VALUE=" > "><INPUT TYPE=Button VALUE=" >| "> [1/5]</NOBR><BR></td></tr>" --><!--#include file="../../../_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" endspan -->
</tbody>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -