有的时候需要计算出中英文混合字符串的长度，下边提供一个思路：

<%
Dim str,i,n
str="我是china"

查看更多...

公司有一套ASP+ACCESS的后台程序,我要尽快了解,在了解其数据库结构的时候对着ACCESS非常的不直观,便想将所有表名称及其字段名称打印出来,输出这些内容便成问题,有没有办法用ASP将这些内容输出到一个页面呢?搜索了相关资料后总算是实现了,下边是程序:

<%
Dim conn,rs,rs2,sqlstr,t_count,table_name,i
On error resume next

查看更多...

昨天对事务处理进行了深入的了解一番，之后突然冒出一个问题：什么时候需要事务处理？众所周知，使用事务处理能使一系列操作"同生共死"，在很在程度上保证了程序的可用性，但却不能因此而滥用，如下程序：

<%
Dim conn,sqlstr
Set conn=server.createobject("ADODB.connection")

查看更多...

一、Javascript中使用正则表达式

创建:
    var reg=/正则文本/[ig];
    reg=new RegExp("正则文本",[ig]);

查看更多...

故障：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。

解决：

查看更多...

1.把表B中的字段，插入到表A中；

Insert INTO 表A(字段名1, 字段名2, ……) Select 字段名1, 字段名2, …… FROM 表B

2.把表B复制一份为A

查看更多...

将符合条件的记录读取出来保存于一个记录集中，然后分N行显示，每行显示M个记录，以前我总是这么写：

查看更多...

On Error 语句的作用是：启用或禁用错误处理程序。一般用法如下：

On Error Resume Next
On Error GoTo 0

查看更多...

近日一直在研究如何才能写出高效的分页算法，大概整理了一下，思路如下：

首先数据库里需要有一个自动编号字段(ID)。然后第一次访问的时候，取出所有记录，定制好每页的记录数PageSize，计算出页数，然后根据页数建立一个一维数组PageId(PageCount)，PageId(0)保存记录初试条件，然后对应每个元素保存每页对应的ID边界码。
ID边界码：
如果数据库记录ID记录序列如下 1，2，3，4，5，6，7，8，9，10，11，12，13，14，15，16假设需要按照ID 顺序排序的话 ，PageSize = 5, Pagecount = 4 ，PageId(4)，数组PageId的值分别为PageId(0) = 1, PageId(1) = 5, PageId(2) = 10, PageId(3) = 15, PageId(4) = 16，当访问第 i 页的时候就直接找 [PageId(i-1) , PageId(i))之间的记录，这样可以保证每次取的记录都只是PageSize 条记录。

查看更多...

Function ToLink(Str)
Dim RE '正则表达式对象
Dim strContent
If IsNull(Str) Then Str=""
Set RE = New RegExp '创建正则表达式对象

查看更多...