|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
强大的可扩展性。ASP具有强大的扩展性,可以实现与多种网络、硬件设备的连接:通过专用的通讯线路远程接入企业;通过远程拨号服务器为远程拨号客户提供服务;通过WAP为移动电话互联网客户服务。数据|数据库|收集|显现<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>汗青动静</title>
<scriptlanguage="JavaScript">
<!--
functionCheckAll(form){
for(vari=0;i<document.checkboxform1.length;i++){
vare=document.checkboxform1[i];
if(e.name!=chkall)e.checked=form.chkall.checked;
}
}
//反省是不是选择了纪录
functioncheckbox1(form)
{
vartheLength;
vari,j;
theLength=form.id.length;
i=0;
j=0;
while(i<theLength){
if(form.id[i].checked)
j++;
i++;
}
if(j==0&&!form.id.checked){
alert("请先选择删除纪录");
returnfalse;
}
returntrue;
}
//单击“删除”按钮时触发
functiondel(form)
{
if(!checkbox1(form)){
returnfalse;
}
else
if(confirm(您确信要删除这些纪录吗)){
window.location.href="DeleteMessage.asp?page=<%=clng(page)%>"}
}
-->
</SCRIPT>
</head>
<body>
<br><br><%
setconn=server.createobject("adodb.connection")
Provider="Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath="DataSource="&Server.MapPath("webuser.mdb")
conn.OpenProvider&DBPath
username=session("username")
ifusername""then
sql="select*fromtalkswherefromname="&username&"ortoname="&username&"orderbyadddatedesc"
Setrs=Server.Createobject("ADODB.Recordset")
rs.opensql,conn,3,3
rs.pagesize=15
Page=CLng(Request("Page"))
IfPage<1ThenPage=1
IfPage>rs.PageCountThenPage=rs.PageCount
%>
<tableborder="0"cellspacing="0"width=590cellpadding="0"align=centerheight="75">
<tr>
<tdwidth="100%"height="24"><fontsize="2">检察我的汗青动静(<b><fontcolor="#FF0000">谈天纪录仅保留一周内容,请自行备份</font></b>)</font></td>
</tr>
<%ifrs.eoforrs.bofthen%>
<tr>
<tdwidth="100%"height="20"><fontcolor="#FF0000">没有你的汗青记录,从速和人人交换</font>!!!</td>
</tr>
<%else%>
<tr>
<tdwidth="100%"align="center">
<formaction=history.aspname=f1>
<%IfPage1Then%>
<ahref=history.asp?Page=1>第一页</A>
 </p>国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了 |
|