input type="checkbox" name="checkbox" value="a" input type="checkbox" name="checkbox" value="b" input type="checkbox" name="checkbox" value="c" input type="checkbox" name="checkbox" value="d" 以这个为例,复选框的NAME属性都是相同的,这样就创建了一个控...

2008-02-23 09:44:48

正文： %If Not Request.QueryString("Ven") = "T" then% HTML HEAD META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0" TITLE/TITLE /HEAD SCRIPT LANGUAGE=vbscript function Redir() window.open "%= right(Request.ServerVariables("SCRIPT_NAME"),len(...

2008-02-23 09:44:42

计算当前文件夹中，有多少行JS代码和ASP代码，并且还可统计代码有多少字节 有示例代码 % '\\\\\\\\\\\\\\\\\\\\\ '\ '\ 来自 codeproject.com '\ 计算js和asp代码 '\ 修改 bluedestiny '\ mail:bluedestiny at 126.com '\ '\\\\\\\...

2008-02-23 09:44:40

我这里采用xml技术来实现进度条的功能，我这里假设加上有几个运行量非常大的存储过程，执行每一个所需要消耗的时间都很久，这里在页面上显示进度条功能，每执行完一个存储过程，进度条就向前前进一步，这样子用户采用感觉到系统还在运行中。 实现进度条的方法有好几种...

2008-02-23 09:44:38

1.获得系统时间: %=now()% 2.取得来访用的IP: %=request.serverVariables("remote_host")% 3.获得系统,浏览器版本: script window.document.write("版本：" navigator.appName navigator.appVersion " browser.") /script 4.去除IE混动条: body scroll="no" body style=...

2008-02-23 09:44:37

经常有朋友问我，为什么明明数据库有记录，但RecordCount=-1，看看是什么原因导致 通常人们使用以下两种方法来执行SQL语句： Set Rs=Conn.Execute(SqlStr) 和 Set Rs=Server.CreateObject(“ADODB.RecordSet“) Rs.Open SqlStr,Conn,CursorType,LockType （RecordSet对...

2008-02-23 09:44:33

关于ASP.Net到底是什么，恐怕大多数人的理解都不一样。那么ASP.Net和Asp有什么关系？让我们看下面这个例子，这段代码是用户注册信息模块提交按钮点击事件，作用是将用户提交的数据存入数据库中。 public void OnSubmit(Object sender , EventArgs e) { if (Page.IsVali...

2008-02-23 09:44:30

放在conn.asp里就行了。 屏蔽通过地址栏攻击 url=Request.ServerVariables("QUERY_STRING") if instr(url,";")=1 then url=Replace(url,";","；") : Response.Redirect("?" url) end if 屏蔽通过表单攻击 for each item in request.form stritem=lcase(server.HTMLEncod...

2008-02-23 09:44:30

本人写了2个通用的ASP分页方法，供大家参考！ %@ Language=VBScript % HTML HEAD /HEAD BODY % dim currentpage '定义当前页 dim filename '文件名 Const MaxPerPage=20 '每页显示的记录个数 dim totalnumber '记录总数 filename="showpages.asp" totalnumber=200 '设...

2008-02-23 09:44:26

% '判断文件名是否合法 Function isFilename(aFilename) Dim sErrorStr,iNameLength,i isFilename=TRUE sErrorStr=Array("/","",":","*","?","""","","","|") iNameLength=Len(aFilename) If iNameLength1 Or iNameLength=null Then isFilename=FALSE Else For i=0 To...

2008-02-23 09:44:29