标签存档: JScript

在JScript中使用ADODB.Stream判断文件编码

作者: 日期: 5月 31, 2008 没有评论

在实现TextStraem的时候，找到判断文件编码的代码是VBS的，但是在JScript中是没有ASC等函数的，也不能对二进制数据进行处理，因此需要通过一个特别的方法来获取文件开关的编码标识。

一开始使用ASCII编码来读取文本数据，模拟读取二进制数据，但是发现如果字符编码大于127时，只会得到小于128的值，相当于和128取余了，因此ASCII编码是不行的。

继续寻找，在CodeProejct.com找到一篇文章《Reading And Writing Binary Files Using JScript》，里面刚好有我需要的内容。

其实说来也简单，就是把编码换一下，使用437，这个是IBM扩展过的ASCII编码，把ASCII编码的最高位也利用起来，将字符集中的字符从128个扩展到256个，而使用这个字符集读取的字符数据就相当于原始二进制数据了。

解决了障碍后，就要开始识别文件的编码了，通过使用ADODB.Stream对象来读取文件的开始两个字节，然后根据这两个字节就可以判断文件编码是什么了。

UTF-8文件如果带BOM的话，那么头两个字节就是0xEF、0xBB，再例如Unicode文件的开始两个字节是0xFF、0xFE，这些就是判断文件编码的依据。

需要注意的是，在ADODB.Stream读取字符时，并不是一一对应的，也就是说，如果二进制数据是0xEF，读取出来的字符经过charCodeAt之后，并不是0xFE，而是另外的值，这个对应表可以在上面提到的文章里查到。

程序代码：[ 复制代码到剪贴板 ]
  • function CheckEncoding(filename) {
  • var stream = new ActiveXObject("ADODB.Stream");
  • stream.Mode = 3;
  • stream.Type = 2;
  • stream.Open();
  • stream.Charset = "437";
  • stream.LoadFromFile(filename);
  • var bom = escape(stream.ReadText(2));
  • switch(bom) {
  • // 0xEF,0xBB => UTF-8
…

阅读全文 »

[ASP] 解决 JScript 中使用日期类型数据时出现类型错误的问题

作者: 日期: 3月 4, 2008 没有评论

在服务端JScript中，有些时候需要使用日期类型的数据，比如说设置一个cookie的到期时间，更新数据库中的日期字段等。但是按照平常的方法来用js里的date类型数据时，运行时就会发生错误。

例如以下代码：

程序代码：[ 复制代码到剪贴板 ]
  • <%@LANGUAGE="JScript" CODEPAGE="65001"%>
  • <script language="JScript" runat="server">
  • Response.Cookies("xujiwei")("name") = "xujiwei";
  • Response.Cookies("xujiwei")("gender") = "male";
  • var expiredDate = new Date(2008, 11, 31);
  • Response.Cookies("xujiwei").Expires = expiredDate;
  • </script>

在浏览器中打开之后，就会出现以下错误：

Microsoft JScript 运行时错误 错误 '800a000d'

类型不匹配

/temp/test.asp，行 6

这就意味着，我们按照类似在VBScript里的使用日期类型数据的方法在JScript不再行得通，但是我们总是需要在服务端中使用日期类型数据的，如果操作数据库是采用参数化Command的方式的话，那么需要使用日期类型数据的地方会更多，总不能因为不能使用常规方法来添加一个日期参数而把它放在SQL语句里吧。

幸好，JScript的设计者们考虑到了这一点。JScript在服务端使用时，往往是做为ASP的另一种脚本语言，而JScript则是微软在JavaScript上发展而来的微软自己的东西，考虑到这一点也是应该的。

在JScript中，解决这一问题的关键就是，Date类型的对象提供了一个函数getVarDate，它在JScript语言参考的说明如下：

当与 COM 对象、ActiveX® 对象或其他以 VT_DATE 格式接受和返回日期值的对象（例如 Visual Basic 

…

阅读全文 »

在ASP里面创建GUID

作者: 日期: 1月 6, 2008 没有评论

GUID在许多时候做为唯一标识符都很方便，但是在ASP里并没有现成的函数来创建GUID，其实可以使用Scriptlet的类型库来创建一个GUID，代码如下：

JScript

程序代码：[ 复制代码到剪贴板 ]
  • function GenerateGuid() {
  • var TypeLib = new ActiveXObject("Scriptlet.TypeLib");
  • return (TypeLib.Guid);
  • }

VBScript

程序代码：[ 复制代码到剪贴板 ]
  • Function GenerateGuid()
  • Dim TypeLib
  • Set TypeLib = Server.CreateObject("Scriptlet.TypeLib")
  • GenerateGuid = TypeLib.Guid
  • End Function

如果要在客户端使用的话，VBScript的代码需要稍做修改，即把：

Set TypeLib = Server.CreateObject("Scriptlet.TypeLib")

修改为：

Set TypeLib = CreateObject("Scriptlet.TypeLib")

但是在客户端使用ActiveX的时候，IE默认的安全设置会提示是否允许使用ActiveX，所以并不推荐使用。

希望对你有所帮助。

[ASP] 《在JScript中使用缓存技术》补遗

作者: 日期: 7月 16, 2007 没有评论

在《在JScript中使用缓存技术》一文中，在JScript中实现了基于Application.StaticObjects的缓存技术，并且实现一个类用于缓存的操作，但在实际使用过程中仍需要注意一些问题。

在JScript的函数中，如果参数类型是number或者string，那么是按值传递的，但如果是object，那么就是按引用传递了。另外，数组在JScript中也是作为一个特殊的对象对待，因此，数组的类型也是object，同样是按引用传递的。

使用xbsCache类进行保存和获取数据操作即put和get时，不管是按值还是按引用，都没有问题，但是在使用过程中，对数据操作的效果由数据类型不同而不同。

如果数据是number或string类型的，那么在get数据时，返回值是按值的，也就是说，我们得到的数据是缓存数据的一份copy，对变量的操作并不会影响到缓存中的数据，例：

程序代码：[ 复制代码到剪贴板 ]
  • // code by xujiwei
  • // from www.xujiwei.cn
  • var myname="my name is xujiwei";
  • xbsCache.put("name",myname);
  • // 从缓存中获取name，值为"my name is xujiwei"
  • var myname2=xbsCache.get("name");
  • // 给myname2赋值"xujiwei"
  • myname2="xujiwei";
  • // 从缓存中获取name，值仍为"my name is xujiwei"
  • var myname3=xbsCache.get("name");

但是在数据类型为object的情况下，我们就需要注意，在从缓存中获取数据之后，我们得到的只是一个指向缓存数据的引用而已，并不是缓存数据的copy，因此，对数据的修改是直接影响到缓存的，例：

程序代码：[ 复制代码到剪贴板 ]
  • // code by xujiwei
  • // 
…

阅读全文 »

[ASP] 在JScript中使用缓存技术

作者: 日期: 7月 11, 2007 没有评论

在编写ASP程序时，通常为了提高ASP程序的运行效率及减少对数据库的连接和查询，会使用缓存技术来缓存一些需要从数据库读取的数据。而在ASP中实现缓存的方法常用的就是使用Application对象。在编写ASP程序时，我们有两种语言可以选择，分别是VBScript和JScript。

在使用VBScript时，我们可以用Application缓存数组来实现缓存，例：

程序代码：[ 复制代码到剪贴板 ]
  • Dim rs,arr
  • rs.Open conn,sql,1,1
  • arr=rs.GetRows()
  • Application.Lock()
  • Application("cache")=arr
  • Applicatoin.UnLock()

在VBScript里，数组是可以存到Application对象里的，但是如果ASP的语言选择为JScript的话，那么就有些不妙了，我们在使用Application储存一个数组时，会出现以下错误：

Application object, ASP 0197 (0x80004005)

Disallowed object use

Cannot add object with apartment model behavior to the application intrinsic object.

在微软的知识库可以找到具体原因如下：

JScript arrays are considered to be "Apartment" COM components. Only Component Object Model (COM) 

…

阅读全文 »

[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 
…

阅读全文 »