程序设计中会经常碰到一种情况,就是事先无法得知用户会需要哪些数据,必须根据用户选择后再从服务器重新提取数据后反馈给用户。比如一简单的情况,用户选择省份以后,我们立即会在市里边将这个省的所有市重新显示出来。这种情况一般需要将整个页面刷新后才可以重新读取,但这样不仅效率不高外,也显得不太优雅。其实用javascript结合微软件的XMLHTTP对象,我们可以不用刷新,“稍稍”的就可以将数据从服务器上读取出来,显得既专业,又高效。 下面我们就以一个验证用户是否被注册的情况来演示这种技术。 '程序设计:环球万维,专业域名注册,虚拟主机服务商 '网址:http://www.netInter.cn '此程序为环球万维原创程序,所以如果您需转载,请注明出处,谢谢。 '以上信息与文章正文是不可分割的一部分,所以如果您要转载本文章,您必须保留以上信息. 1.首先在服务器上建立一个CheckUser.asp文件,用来检测用户是否存在,根据用户是否存在分别反馈0和1 u_name=Request.QueryString("u_name") if u_name 存在 then Response.write "0" else Response.write "1" end if 2.客户端HTML设计: 一、JavaScript代码:
二、HTML表单设计:
经过以上三步,一个不需要页面刷新的数据更新程序就完成了,按此方法,可以实现很多会很酷的应用:) |
rs.open参数含义
作者:admin 日期:2010-08-24
JS对象属性集锦
作者:admin 日期:2010-08-15
js实现无刷新更新数据
作者:admin 日期:2010-07-14
程序设计中会经常碰到一种情况,就是事先无法得知用户会需要哪些数据,必须根据用户选择后再从服务器重新提取数据后反馈给用户。比如一简单的情况,用户选择省份以后,我们立即会在市里边将这个省的所有市重新显示出来。这种
ASP下载功能实现
作者:admin 日期:2010-06-21
将下边的文件保存为Download.asp就可以了,然后根据需要传要下载的文件过来就可以了。
使用格式:Download.asp?FileName=要下载的文件名
注意:FileName后边只能是要下载的文件名,文件所在的路径要在源代码里设置FilePath变量。当然这个变量也可以动态设置,方法两种:一、也是使用URL传递过来;二、从数据库中读去。至于如何设置,根据需要了。
1 <%
2 Dim Stream
3 Dim Contents
4 Dim FileName
5 Dim FileExt
6 Dim FilePath
7
8 Rem 设置下载文件所在的路径,默认空,要下载的文件与当前文件在同一目录
9 FilePath = ""
10
11 Const adTypeBinary = 1
12 FileName = Request.QueryString("FileName")
13 if FileName = "" Then
14 Response.Write "无效文件名."
15 Response.End
16 End if
17
18 Rem 下面是不希望下载的文件
19 FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
20 Select Case UCase(FileExt)
21 Case "ASP", "ASA", "ASPX", "ASAX", "MDB"
22 Response.Write "受保护文件,不能下载."
23 Response.End
24 End Select
25
26 Rem 下载这个文件
27 Response.Clear
28 Response.ContentType = "application/octet-stream"
29 Response.AddHeader "content-disposition", "attachment; filename=" & FileName
30 Set Stream = server.CreateObject("ADODB.Stream")
31 Stream.Type = adTypeBinary
32 Stream.Open
33 Stream.LoadFromFile Server.MapPath(FileName)
34 While Not Stream.EOS
35 Response.BinaryWrite Stream.Read(1024 * 64)
36 Wend
37 Stream.Close
38 Set Stream = Nothing
39 Response.Flush
40 Response.End
41 %>
2 Dim Stream
3 Dim Contents
4 Dim FileName
5 Dim FileExt
6 Dim FilePath
7
8 Rem 设置下载文件所在的路径,默认空,要下载的文件与当前文件在同一目录
9 FilePath = ""
10
11 Const adTypeBinary = 1
12 FileName = Request.QueryString("FileName")
13 if FileName = "" Then
14 Response.Write "无效文件名."
15 Response.End
16 End if
17
18 Rem 下面是不希望下载的文件
19 FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
20 Select Case UCase(FileExt)
21 Case "ASP", "ASA", "ASPX", "ASAX", "MDB"
22 Response.Write "受保护文件,不能下载."
23 Response.End
24 End Select
25
26 Rem 下载这个文件
27 Response.Clear
28 Response.ContentType = "application/octet-stream"
29 Response.AddHeader "content-disposition", "attachment; filename=" & FileName
30 Set Stream = server.CreateObject("ADODB.Stream")
31 Stream.Type = adTypeBinary
32 Stream.Open
33 Stream.LoadFromFile Server.MapPath(FileName)
34 While Not Stream.EOS
35 Response.BinaryWrite Stream.Read(1024 * 64)
36 Wend
37 Stream.Close
38 Set Stream = Nothing
39 Response.Flush
40 Response.End
41 %>
asp获取真实ip
作者:admin 日期:2010-06-04
Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" or InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then
strIPAddr = Request.ServerVariables("REMOTE_ADDR")
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",")-1)
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";")-1)
Else
strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
End If
getIP = Trim(Mid(strIPAddr, 1, 30))
End Function
使用这个函数能获得真实的ip地址,而不会是http代理服务器的地址
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" or InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then
strIPAddr = Request.ServerVariables("REMOTE_ADDR")
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",")-1)
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";")-1)
Else
strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
End If
getIP = Trim(Mid(strIPAddr, 1, 30))
End Function
使用这个函数能获得真实的ip地址,而不会是http代理服务器的地址
一句话木马的多种写法
作者:admin 日期:2010-04-04
在HTML中用JS获取GET的参数
作者:admin 日期:2010-03-26
Asp中CreateObject对象汇总
作者:admin 日期:2010-03-26
IIS7和ASP的安装配置和使用
作者:admin 日期:2010-03-26
有些高端用户也许会用到IIS,Win7和Vista一样都内置了最新的IIS7,那么ISS7要如何安装配置和使用呢?在IIS7下ASP又该如何配置呢?本站整理了相关操作步骤,如下。
不过在操作之前请将Win7的UAC设置到最低,否则会它会非常讨厌的跳出来。 1.进入Win7的控制面板,选择“程序”然后在点击“程序和功能”,在左侧选择的“打开或关闭Windows功能”在出现的列表中选择IIS7然后确定。
2.安装完成后,再次进入控制面板,选择“管理工具”,双击 Internet(IIS)管理器选项,进入IIS设置。
3.进入到IIS7控制面板。
4.选择Default Web Site,并双击ASP的选项。
5.IIS7中ASP父路径是没有启用的,要开启父路径,选择True即可。
6.配置IIS7的站点, 单击右边的“高级设置”选项,可以设置网站的目录。
7、点击右侧的“绑定”,然后设置网站的端口。
8、点击“默认文档”, 设置网站的默认文档完成即可。
不过在操作之前请将Win7的UAC设置到最低,否则会它会非常讨厌的跳出来。 1.进入Win7的控制面板,选择“程序”然后在点击“程序和功能”,在左侧选择的“打开或关闭Windows功能”在出现的列表中选择IIS7然后确定。
2.安装完成后,再次进入控制面板,选择“管理工具”,双击 Internet(IIS)管理器选项,进入IIS设置。
3.进入到IIS7控制面板。
4.选择Default Web Site,并双击ASP的选项。
5.IIS7中ASP父路径是没有启用的,要开启父路径,选择True即可。
6.配置IIS7的站点, 单击右边的“高级设置”选项,可以设置网站的目录。
7、点击右侧的“绑定”,然后设置网站的端口。
8、点击“默认文档”, 设置网站的默认文档完成即可。
ASP备份数据库
作者:admin 日期:2010-03-26
asp备份sql数据库
作者:admin 日期:2010-03-26
ASP连接SQL数据库
作者:admin 日期:2010-03-26
在ASP中使用SQL语句
作者:admin 日期:2010-03-26
Select 语句
五花八门的SQL产品多得要命,或许你早顾不得其它甩开袖子就动手干了。但你要同时采用ASP和SQL的话就可能会头晕。MySQL、sql server和mSQL都是绝佳的SQL工具,可惜,在ASP的环境下你却用不着它们来创建实用的SQL语句。不过,你可以利用自己掌握的Access知识以及相应的Access技能,再加上我们的提示和技巧,相信一定能成功地在你的ASP网页中加入SQL。
在SQL的世界里,最最基础的操作就是Select 语句了。在数据库工具下直接采用SQL的时候很多人都会熟悉下面的操作:
Select what
五花八门的SQL产品多得要命,或许你早顾不得其它甩开袖子就动手干了。但你要同时采用ASP和SQL的话就可能会头晕。MySQL、sql server和mSQL都是绝佳的SQL工具,可惜,在ASP的环境下你却用不着它们来创建实用的SQL语句。不过,你可以利用自己掌握的Access知识以及相应的Access技能,再加上我们的提示和技巧,相信一定能成功地在你的ASP网页中加入SQL。
在SQL的世界里,最最基础的操作就是Select 语句了。在数据库工具下直接采用SQL的时候很多人都会熟悉下面的操作:
Select what
asp execute 详解
作者:admin 日期:2010-03-26
ASP session的用法具体解说
作者:admin 日期:2010-03-26
Session 对象 可以使用 Session 对象存储特定用户会话所需的信息。这样,当用户在应用程序的 Web 页之间跳转时,存储在 Session 对象中的变量将不会丢失,而是在整个用户会话中一直存在下去。
当用户请求来自应用程序的 Web 页时,如果该用户还没有会话,则 Web 服务器将自动创建一个 Session 对象。当会话过期或被放弃后,服务器将终止该会话。
Session 对象最常见的一个用法就是存储用户的首选项。例如,如果用户指明不喜欢查看图形,就可以将该信息存储在 Session 对象中。有关使用 Session 对象的详细信息,请参阅“ASP 应用程序”部分的“管理会话”。 注意 会话状态仅在支持 cookie 的浏览器中保留。
当用户请求来自应用程序的 Web 页时,如果该用户还没有会话,则 Web 服务器将自动创建一个 Session 对象。当会话过期或被放弃后,服务器将终止该会话。
Session 对象最常见的一个用法就是存储用户的首选项。例如,如果用户指明不喜欢查看图形,就可以将该信息存储在 Session 对象中。有关使用 Session 对象的详细信息,请参阅“ASP 应用程序”部分的“管理会话”。 注意 会话状态仅在支持 cookie 的浏览器中保留。
解析ASP的Application和Session对象
作者:admin 日期:2010-03-26
Using Web.Config in ASP.NET and ASP
作者:admin 日期:2010-03-26
Introduction:
Web.config acts as a central location for storing the information to be accessed by web pages. This information could be a Connection String stored at a centralized location so that it can be accessed in a data-driven page. If the connection string changes its just a matter of changing it at one place.
In classic ASP such global information was typically stored as an application variable.
Web.config acts as a central location for storing the information to be accessed by web pages. This information could be a Connection String stored at a centralized location so that it can be accessed in a data-driven page. If the connection string changes its just a matter of changing it at one place.
In classic ASP such global information was typically stored as an application variable.
asp server.mappath 方法
作者:admin 日期:2010-03-26
asp for(ASP脚本循环语句)
作者:admin 日期:2010-03-26
循环语句的作用就是重复执行程序代码,循环可分为三类:一类在条件变为“假”之前重复执行语句,一类在条件变为“真”之前重复执行语句,另一类按照指定的次数重复执行语句。在 VBScript 中可使用下列循环语句:
Do...Loop: 当(或直到)条件为“真”时[b]循环[/b]。
While...Wend: 当条件为“真”时[b]循环[/b]。
[b]For[/b]...Next: 指定[b]循环[/b]次数,使用计数器重复运行语句。
[b]For[/b] Each...Next: 对于集合中的每项或数组中的每个元素,重复执行一组语句。 我们先来看看 Do...Loop,它是可以多次(次数不定)运行语句块。当条件为“真”时或条件变为“真”之前,重复执行语句块。请看下例: < html>< head>
Do...Loop: 当(或直到)条件为“真”时[b]循环[/b]。
While...Wend: 当条件为“真”时[b]循环[/b]。
[b]For[/b]...Next: 指定[b]循环[/b]次数,使用计数器重复运行语句。
[b]For[/b] Each...Next: 对于集合中的每项或数组中的每个元素,重复执行一组语句。 我们先来看看 Do...Loop,它是可以多次(次数不定)运行语句块。当条件为“真”时或条件变为“真”之前,重复执行语句块。请看下例: < html>< head>