分类存档: Web - 第5页

[ASP] 在JScript中使用RecordSet对象的GetRows方法

作者: 日期: 3月 11, 2007 1 条评论

写ASP程序时，一般情况总是使用的VBScript，不过也不只是这一种选择，也可以用JScript。但在用JScript作为ASP的语言时，比用VBScript有一些小小的不方便，比如RecordSet的GetRows方法。

在ASP中操作数据库，一般都要用到RecordSet对象，如果注重程序效率的话，可能就会用到RecordSet对象的GetRows方法，把记录集对象转换成数组，而操作数组在速度上将比用RecordSet对象的MoveNext方法快很多，而且可以在取出数组后尽早释放RecordSet对象，从而减少资源的占用，这也是优化ASP性能的一个方法。

在VBScript里，用RecordSet.GetRows方法取到的是一个二维数组，里面的数据可以通过遍历数组的方式来取得。

假设现在有一个数据库，其中有一个表名为mytable，有3个字段，名称分别为id,first,second。

程序代码：[ 复制代码到剪贴板 ]
  • ' code by xujiwei
  • ' http://www.xujiwei.cn/
  • ' 定义变量
  • Dim conn,rs,data,recN,i
  • ' 连接数据库
  • Set conn=Server.CreateObject("ADODB.Connection")
  • conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &_
  • Server.MapPath("data.mdb")
  • ' 获取记录集
  • Set rs=conn.Execute("SELECT id,first,second FROM mytable")
  • ' 获取数据数组
  • data=rs.GetRows()
  • ' 关闭记录集，释放对象
  • rs.Close()
  • Set rs=Nothing
  • ' 获取记录数
  • recN=UBound(data,2)
  • ' 循环输出数据
  • For i=0 To 
…

阅读全文 »

[JavaScript] setTimeout和setInterval的浏览器兼容性

作者: 日期: 2月 15, 2007 1 条评论

无意中测试AJAXRequest浏览器兼容性的时候，发现AJAXRequest.update方法在某些情况下在IE里有问题，经过测试找到是setTimeout和setInterval的问题。

问题出现在当调用AJAXRequest.update方法时，如果带了更新间隔及更新次数，那么在IE下面就会出现问题，具体表现为带了更新间隔时是函数工作，带上更新次数时函数无法在更新指定次数后停止执行。

测试几个例子之后找到了问题所在，在IE里，setTimeout和setInterval是不支持参数传递的。

演示地址：http://www.xujiwei.cn/demo/usetimer/

在Netscape的JavaScript参考中找到setTimeout的语法如下：

setTimeout

Evaluates an expression or calls a function once after a specified number of milliseconds elapses.

语法

setTimeout(expression, msec)

setTimeout(function, msec, arg1, ..., argN)

参数

expression  A string containing a JavaScript expression.

msec  A numeric value or numeric string, in 

…

阅读全文 »

设计的选择：window.onload or other

作者: 日期: 1月 31, 2007 没有评论

在网页设计中，总要用到一些动态效果，而这些效果之中，有一些是需要页面加载完成时才可以做的，比如要给页面中的每一个链接加上hover时的特效，那么就需要在页面的所有代码已经下载完毕时再进行特效，这样才能保证页面里的每一个链接都不会遗漏。如果这步工作放在head中，那么，做与不做一个样。

再者，现在网页设计讲究行为、结构、表现分离，比如在最近的一次改版中，我把我的blog侧边栏的展开与折叠的功能放在了JS中添加，并不是在源代码里直接设置onclick事件添加好的。因为函数调用不是直接直接而是后来添加的，我就要考虑什么时候来用JS添加侧边栏的展开与折叠了。

功能的添加函数所在的脚本放在了head区引入，当然不能在脚本里直接调用这个函数来进行功能的添加，因为那个时候边栏还没有加载，用document.getElementById会出现找不到对象的错误，然后边栏的展开与折叠功能就没有。

那么，从这一点知道，功能的添加是需要在要处理的内容已经加载完成的情况下才能添加。

那什么时候侧边栏已经加载完毕了呢，许多人自然而然地就想到了window.onload。是的，在window.onload被调用时，整个页面已经加载完成，那么边栏也一定加载完毕，这个时候做添加onclick响应函数是肯定不会出现找不到对象的错误的。

<html>
<head>
<meta name="author" content="www.xujiwei.cn" />
<meta name="description" content="ue test from xujiwei" />
<title>ue test1</title>
<style type="text/css">
#blockHead {
background: blue; color: white; width: 300px; padding: 1em; cursor: pointer; border: 1px solid blue;
}
#blockContent {
border: 1px solid blue; width:
…

阅读全文 »

VBScript中变量作用域

作者: 日期: 1月 26, 2007 没有评论

下午在写程序的时候，碰到个变量重定义的问题，具体是在一个函数中的两个地方定义了相同的变量，两个变量分别放在IF语句的两部分中，本来以为这两次定义在语句中不同的块，应该没有影响，然而在运行中IIS却提示变量重定义，把重复定义去掉即正确。

解决了问题之后突然想到在Fdream的blog看过一篇文章《JavaScript变量无块级作用域》，似乎这两个是差不多的，在VBScript中变量同样没有块级作用域。

再次去看了那篇文章之后我也做了下试验，得到结果：在VBScript中，函数中定义的变量的作用域是整个函数，而不是块级，不管这个变量是在函数中哪个位置定义的。因此，函数中一个变量不管在函数的哪个位置定义，它在整个函数中都可以使用。

下面用一些例子来说明这个问题。

Option Explicit
Sub foo()
Dim var
var="hello,world!"
MsgBox var
End Sub
Call foo()

下面的代码跟上面的代码等效，但是var的定义放在了函数的最后：

Option Explicit
Sub foo()
var="hello,world!"
MsgBox var
Dim var
End Sub
Call foo()

下面的例子说明变量不管在哪定义，在整个函数中都是可以使用的，当然如果把定义的位置放的特殊一点有利于代码的清晰，阅读起来比较方便，修改时也比较方便。

Option Explicit
Sub foo()
Dim var1
var1="YES"
MsgBox "var1: "&var1&vbCrLf&"var2: "&var2
IF var1="YES"

…

阅读全文 »

[ASP] 用Server.Transfer实现博客日志的永久链接

作者: 日期: 12月 17, 2006 没有评论

在许多博客日志阅读页面里的尾部都能看到一个永久链接，这个链接一般是持久在在的，即使博客程序换了，也可以用这个链接来访问原来的日志，而不会出现找不到页面的情况，这对于一个博客的确是一个比较实用的功能。

在修改blog程序时，也考虑了这个问题，决定也给我的博客日志加上永久链接功能。

IIS6中如果请求一个目录后面跟上参数时，会把这个参数传给默认文档，即如果请求我的博客首页http://www.xujiwei.cn/blog/?id=500，那么id=500将会传递给默认文档default.asp。利用这点就可以实现博客日志的永久链接了。当然了，这个永久链接是建立在博客目录不改变的情况下，如果目录改了，就需要另外处理了。

在ASP中可以利用Response.Redirect，其原理是服务器向客户端发送一个302 Object Moved的响应，然后客户端根据响应进行转向，但这个会增加额外的带宽开销，并且不利用搜索引擎收录，所以推荐使用Server.Transfer来转向。Server.Transfer则是直接停止当前脚本的执行，转而执行指定的脚本，并且当前的一些变量如会话等均可在新脚本里直接使用，而毋须再重新进行参数传递了，而Response.Redirect则不可以。

两种方法的另外一个比较明显的区别就是使用Response.Redirect客户端显示的URL会改变，而Server.Transfer则不会，使用Server.Transfer时客户端不会感到当前URL其实已经改变。其实这个区别也可以通过两种方法的调用方法来看出来，一个是Response.Redirect由客户端做出改变，而Server.Transfer则是由服务端做出改变。

了解了这些就可以开始做了，打开博客的默认文档，一般就是博客程序的首页，如default.asp、index.asp等，然后在其有输出内容之前加上以下代码：

<%IF Request.QueryString("id") Then Server.Transfer("article.asp")%>

当然了，article.asp是要根据博客程序来做相应改变的，id即为要做为永久链接时的参数，需要注意这个参数必须为article.asp所能识别的，即article.asp可以根据这个参数来显示日志，如果不行的话就要做相应的改变，即把article.asp中的参数名称改为id，或者把id改成其他名称。

ok，完成！其实这个东西是很简单的，这么大篇幅大都是废话，真正有用的就那么一句代码^_^。

AJAX应用之草稿自动保存

作者: 日期: 8月 28, 2006 没有评论

相信用过Gmail的人都知道Gmail有一个草稿自动保存的功能，每过一段时间，Gmail都会自动保存邮件草稿，这样在一些突发情况下就能快速地恢复工作，免得写了半天的邮件眨眼之间就没有了。在学了AJAX之后，我也给自己的blog加上了这个功能。当然，这个应用并不只限于blog上，应该说还是比较通用的。

PS.为了开发的方便，我用了一个自己写的AJAX类，具体内容和下载在这里。

演示地址

仍旧以代码加注释的方式来说明怎么编写。

首先是表单填写页面，用一个ID为AutoSaveMsg的DIV来显示返回信息，并且用一个ID为Draft_AutoSave的CheckBox来确定是否进行自动保存，然后将Textarea的ID命名为message。同时为了应对多用户同时使用的需要，加上用户名，每个用户的草稿分开保存。为了说明方便，我把一些修饰性的东西去掉，这样看起来比较明了：

程序代码：[ 复制代码到剪贴板 ]
  • AJAX应用之草稿自动保存<br />
  • <!-- 用户名默认为NONAME -->
  • 用户名：<input type="text" name="memName" id="memName" size="20" value="NONAME" />&nbsp;&nbsp;&nbsp;&nbsp;
  • <!-- 在自动保存选项的onclick事件中调用自动保存状态设置函数 -->
  • <input onclick="SetAutoSave();" type="checkbox" id="Draft_AutoSave" value="1" checked="true"  />自动保存？<br />
  • 内容：
  • <textarea id="message"></textarea><br />
  • <!-- AutoSaveMsg显示返回信息 -->
  • <div id="AutoSaveMsg"></div>
  • <input type="submit" value="提交内容" />&nbsp;&nbsp;
  • <!-- 调用函数恢复最后保存的草稿 -->
…

阅读全文 »

一个简单的AJAX请求类

作者: 日期: 8月 6, 2006 没有评论

在给blog加上无刷新搜索和即时验证检测后，又看了下代码，感觉太过麻烦，就把XMLHttpRequest请求封装到一个类里面，用起来方便多了，不用记那么多代码，什么创建XMLHttpRequest对象什么的，这部分代码也是重用性比较高的～已经打包，在日志的末尾下载。

要看效果的话点开侧边栏里的日志搜索，里面有一个无刷新搜索，就是了，或者在阅读日志或留言簿里的注册码那里有即时检测，如果不输入验证码或者输错了验证码，输入框都会变红的^_^

类名：AJAXRequest

创建方法：var ajaxobj=new AJAXRequest;，如果创建失败则返回false

属性：method  -  请求方法，字符串，POST或者GET，默认为POST

url         -  请求URL，字符串，默认为空

async     -  是否异步，true为异步，false为同步，默认为true

content -  请求的内容，如果请求方法为POST需要设定此属性，默认为空

callback  - 回调函数，即返回响应内容时调用的函数，默认为直接返回，回调函数有一个参数为XMLHttpRequest对象，即定义回调函数时要这样：function mycallback(xmlobj)

方法：send     -  发送请求，无参数

一个例子：

程序代码：[ 复制代码到剪贴板 ]
  • <script type="text/javascript" src="ajaxrequest.js"></script>
  • <script type="text/javascript">
  • var ajaxobj=new AJAXRequest;    // 创建AJAX对象
  • ajaxobj.method="GET";   // 设置请求方式为GET
  • ajaxobj.url="default.asp"  // URL为default.asp
  • // 设置回调函数，输出响应内容
…

阅读全文 »

AJAX初体验之实战篇——打造博客无刷新搜索

作者: 日期: 7月 28, 2006 没有评论

如果你对AJAX不是很了解，可以先看看这篇教程的前篇《AJAX初体验之上手篇》。

现在博客很流行，相信应该上网时间稍微长点的朋友都会在这或者在那的有一个自己的博客。对于一些有一定能力的朋友，可能更喜欢自己去下载一个博客程序来架设一个自己的博客，而不是使用一些博客网站提供的服务。而大部分博客程序所带的搜索功能是提交查询关键字到搜索页面，然后在后台生成搜索结果，再呈现给用户，这过程之中浪费了一些带宽，如博客的侧边栏。要节约这一些带宽，我们可以用AJAX来打造自己的无刷新日志搜索。

在本篇教程中，数据库的表名和日志查看页面以L-Blog为例，因为我的博客程序是从L-Blog修改而来^_^。

本教程中的例子已经通过实际测试，可以直接在L-Blog或FBS中使用。当然，要真正应用的话还是需要做一些美化及完善的。

在数据库中日志内容数据表名为blog_Content，其中日志ID为log_ID，日志标题为log_Title，日志查看页面为blogview.asp，参数为日志logID。有了这些资料，就可以开始创建搜索结果的XML文档模板了。在显示搜索结果时，需要显示日志的标题，以及日志的ID来创建到查看日志的链接。

搜索结果模板sample.xml

程序代码：[ 复制代码到剪贴板 ]
  • <?xml version="1.0" encoding="utf-8"?>
  • <blogsearch>
  •     <!-- 每一个reslut就是一个搜索结果 -->
  •     <result>
  •         <!-- 日志的ID -->
  •         <logid>1</logid>
  •         <!-- 日志的标题 -->
  •         <logtitle>AJAX初体验之上手篇</logtitle>
  •     </result>
  • </blogsearch>

每个result就是一个搜索结果，为了处理没有找到相关内容的情况，我定义了当搜索结果为空时logid为#。

在完成XML文档模板之后，就可以用ASP来动态生成搜索结果需要的XML文档了。搜索的关键字采用POST方式来传递。

搜索结果输出ajaxsearch.asp

程序代码：[ 复制代码到剪贴板 ]
  • <!-- #include file="commond.asp" -->
  • <!-- #include file="include/function.asp" -->
  • <%
  • ' commond.asp为数据库连接文件
  • ' function.asp中有要用到的函数CheckStr
  • Dim Search_Word,XML_Result,rsSearch,sqlSearch
  • Set rsSearch=Server.CreateObject("ADODB.RecordSet")
  • ' 获取搜索关键字
  • Search_Word=CheckStr(Trim(Request.Form("searchword")))
  • ' XML文档头
  • XML_Result="<?xml version=""1.0"" encoding=""utf-8""?><blogsearch>"
  • IF Search_Word<>Empty Then
  •     ' 创建查询SQL语句
  •     sqlSearch="SELECT log_ID,log_Title,log_Content FROM blog_Content WHERE log_Title"_
  • &" LIKE '%"&Search_Word&"%' AND log_IsShow=True ORDER BY log_ID DESC"
  •     ' 打开记录集
  •     rsSearch.open sqlSearch,Conn,1,1
…

阅读全文 »

XML+XSL+CSS+ASP打造留言簿

作者: 日期: 7月 17, 2006 没有评论

前段时间无意间看到一个博客的RSS可以用XSL格式输出并且能在Firefox里浏览，想到自己以前写的一个XML留言簿因为不兼容Firefox所不了了之了，现在看到他的能在Firefox浏览就觉得很好奇，看了一下代码，一句一句的比对，最后终于找到了原因，也就把这个留言簿给完成了。因为是一个简单的XML留言簿，所以取名SXGB(Simple XML GuestBook)。

查看留言本演示，管理密码为test：

首先定义留言簿的XML文档的格式。作为一个留言簿，不需要太复杂的内容，于是我就给留言内容分为3个部分：留言者姓名、留言者主页和留言内容。另外，一个留言簿还需要有使用者的一些信息，包括用户名和用户主页。再有，在留言比较多时还需要分页信息。大致结构完成后就可以开始写XML文档模板了。

XML文档根元素定义为gbook

XML文档模板gbook.xml

<?xml version="1.0" encoding="utf-8"?>
<!-- DTD file -->
<!DOCTYPE gbook SYSTEM "sxgb.dtd">
<!-- XSL file -->
<?xml-stylesheet type="text/xsl" href="gbook.xsl"?>
<gbook>
<!-- 留言簿相关信息 -->
<info>
<!-- 用户名 -->
<user>HotHeart</user>
<!-- 用户主页 -->
<home>http://www.xujiwei.cn</home>
<!-- 分页信息，分别为目前所在页，总页数，上一页，下一页 -->
<pagenow>1</pagenow>
<pagetotal>1</pagetotal>
<pageprev>1</pageprev>
<pagenext>2</pagenext>
<!-- 是否已经登陆，用来处理是否显示登陆框 -->
<logined>NO</logined>
…

阅读全文 »

AJAX初体验之上手篇

作者: 日期: 6月 12, 2006 没有评论

AJAX是这两年蛮热的东西，我也凑凑热闹，前些天去找了些教程学学，下面就按整个处理过程把自己学的东西写写，不过，因为是初学，所以有错误就请见谅啦，也欢迎指正，vipxjw#163.com。

PS.写完了之后看了下，结果再次验证自己写教程真是乱得可以，东说一块西说一块，条理不太清楚的说：）。

1.创建 XMLHttpRequest 对象

现在的浏览器有很多种，创建 XMLHttpRequest 的方法也不相同，所以为了兼容各种浏览器，在创建 XMLHttpRequest 时也应该考虑到各种浏览器的情况。目前主流的浏览器在Windows下有IE、Firefox及Opera，所以我们写的代码要尽量兼容这几个浏览器。在参考了一些资料后，我用下面的方法来创建 XMLHttpRequest 对象：

// 先定义一个变量，并赋初值为 false，方便后面判断对象是否创建成功
var xmlObj = false;
// 使用 try 来捕获创建失败，再换个方法来创建
try {
// 在 Mozilla 中使用这种方式来创建 XMLHttpRequest 对象
xmlObj=new XMLHttpRequest;
}
catch(e) {
try {
// 如果不成功，那么尝试在较新 IE 里的方式
xmlObj=new ActiveXObject("MSXML2.XMLHTTP");
}
catch(e2) {
try {
//
…

阅读全文 »