文档中心

<%
if Request.QueryString("pageNo")="" then
PageNo=1
elseif IsNumeric(Request.QueryString("pageNo"))=false then
PageNo=1
else
PageNo=clng(Request.QueryString("pageNo"))
end if
打开数据表..不写了哈.
set rs=server.CreateObject("adodb.recordset")
sql="............"
rs.open sql,conn,1,3
%>
<%
if rs.recordcount=0 then
%>
暂无此类物品
<%
else
rs.pagesize=30 '页大小
if PageNo<1 then
PageNo=1
end if
if PageNo>rs.pagecount then
PageNo=rs.pagecount
end if
rs.absolutepage=PageNo
i=0
do while i<rs.pagesize and not rs.eof
%>
内容<%=rs("字段")%>
<%
rs.movenext
i=i+1
loop
end if
%>
<div align="center">
记录总数:<%=rs.recordcount%>条当前页：<%=PageNo%>/<%=rs.pagecount%>页大小：<%=rs.pagesize%> <a href="?PageNo=1">首页</a> <a href="?PageNo=<%=PageNo-1%>">上页</a> <a href="?PageNo=<%=PageNo+1%>">下页</a> <a hre ......

一、修改IIS设置，允许直接编辑配置数据库
二、先在服务里关闭iis admin service服务
找到windows\system32\inetsrv\下的metabase.xml,
打开，找到ASPMaxRequestEntityAllowed 把他修改为需要的值，默认为204800，即200K 把它修改为你所需的大小即可。如：512000（500k）
然后重启iis admin service服务。 ......

今天在公司服务器上看一个老掉牙的asp程序，发现竟然调用了自定义com组件，是vb写的，封装了数据库连接与操作，文档上写这样做是为什么用户到服务器也看不到数据库的用户名与密码，也对啊，这个是财务的服务器，当然不能让我们it随便看了，呵呵！（it忽悠finance，让finance相信it看不到数据库用户名与密码，my god）由于，我们服务器管理人员要服务器，决定要"和谐"这个服务器，只能将这个服务器上的应用全部移到另一个服务器上，于是就要改这个com组件以指定新的db名称，
将com组件源码copy到本机上，改连接，编译dll，再copy到服务器上，regsvr32 注册，一切正常，于是将原db offline，一会儿就有call我了，页面报错，无法访问！打开页面看到错误信息 odbc没有找到数据库，仔细一看，还是原来数据库，心里那个拔凉的，立即google，同时将原db online
原来得将iis重起: iisreset
又加一个com组件方法，
Public Function getData(ByVal sss As Integer) 'as Variant 不能加返回值类型
Dim dd() 'as String 也不能加返回值类型
Dim i As Integer
ReDim dd(sss - 1)
i = 0
Do While i < sss
dd(i) = CStr(i)
i = i + 1
Loop
getData = dd
End Funct ......

Default.aspx:
<%@ Page Language="C#" AutoEventWireup="true"
CodeFile="Default.aspx.cs" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">

<title>无标题页</title>
</head>
<body>

<form id="form1" runat="server">
        <asp:FileUpload
ID="FileUpload1" runat="server" />

<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="Button"
/>
      <asp:RegularExpressionValidator
ID="RegularExpressionValidator1" runat="server"
ControlToValidate="FileUpload1"
            ErrorMessage="必须是 jpg或者gif文件"
ValidationExpression= ......

//TransmitFile实现下载
    protected void Button1_Click(object sender, EventArgs
e)
    {
        /*

微软为Response对象提供了一个新的方法TransmitFile来解决使用Response.BinaryWrite

下载超过400mb的文件时导致Aspnet_wp.exe进程回收而无法成功下载的问题。
        代码如下：
        */
        Response.ContentType = "application/x-zip-compressed";

Response.AddHeader("Content-Disposition",
"attachment;filename=z.zip");
        string filename =
Server.MapPath("DownLoad/z.zip");

Response.TransmitFile(filename);
    }
    //WriteFile实现下载
    pro ......

此处提供的代码用来实现当asp.net页面中的某个Button被点击后disable掉该页面中所有的Button，从而防止提交延时导致的多次提交。基于之前的onceclickbutton脚本.
//ASP.NET中防止页面多次提交的代码:javascript< script language="javascript"> < !-- function disableOtherSubmit() {
var obj = event.srcElement;
var objs = document.getElementsByTagName('INPUT');
for(var i=0; i< objs.length; i++)
{
if(objs[i].type.toLowerCase() == 'submit')
{
objs[i].disabled = true;
}
}
} //--> < /script>//ASP.NET中防止页面多次提交的代码:asp.netpublic class PreventMultiClick : System.Web.UI.Page {
protected System.Web.UI.WebControls.Button Button1; protected System.Web.UI.WebControls.Button Button2;
protected System.Web.UI.WebControls.LinkButton LinkButton1; protected System.Web.UI.WebControls.Button Button3; private void Page_Load(object sender, System.EventArgs e)
{
this.GetPostBackEventReference(this.Button3);
//保证 __doPostBack(eventTarget, eventArgument) 正确注册 if ......

asp长文章分页收集存档

解除ASP上传200KB的限制

asp vb com组件开发与调试

asp vb com组件开发与调试

ASP.NET FileUpload应用实例

在ASP.NET中下载文件

ASP.NET中防止页面多次提交的代码实现