Adodb.Stream 组件的使用说明
2008年01月2日
by 江小邪
0 comments
2008年01月2日
by 江小邪
0 comments
2007年12月29日
by 江小邪
0 comments
2007年12月29日
by 江小邪
0 comments
2007年12月29日
by 江小邪
0 comments
今天我给大家讲一下如何提高ASP提速技巧的五则方法希望能对大家有所帮助!
技巧之一:提高使用Request集合的效率
访问一个ASP集合来提取一个值是费时的、占用计算资源的过程。因为这个操作包含了一系列对相关集合的搜索,这比访问一个局部变量要慢得多。因此,如果打算在页面中多次使用Request集合中的一个值,应该考虑将其存贮为一个局部变量。例如将代码写成下面的形式以加快脚本引擎处理速度:
strTitle=Request.Form(“Title”)
strFirstName=Request.Form(“FirstName”)
strLastName=Request.Form(“LastName”)
If Len(strTitle) Then strTitle=strTitle & ” “
If strFirstName=”" Then strFullName=strTitle & ” ” & strLastName
Elseif Len(strFirstName)=1 Then
strFullName=strTitle & strFirstName & “. ” & strLastName
Else
strFullName=strTitle & strFirstName & ” ” & strLastName
End If
(更多…)
2007年12月29日
by 江小邪
1 comment
2007年05月8日
by 江小邪
0 comments
2007年03月21日
by 江小邪
0 comments
全球唯一标识符 (GUID) 是一个字母数字标识符,用于指示产品的唯一性安装。在许多流行软件应用程序(例如 Web 浏览器和媒体播放器)中,都使用 GUID。
GUID 的格式为“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx”,其中每个 x 是 0-9 或 a-f 范围内的一个十六进制的数字。例如:6F9619FF-8B86-D011-B42D-00C04FC964FF 即为有效的 GUID 值。
世界上的任何两台计算机都不会生成重复的 GUID 值。GUID 主要用于在拥有多个节点、多台计算机的网络或系统中,分配必须具有唯一性的标识符。在 Windows 平台上,GUID 应用非常广泛:注册表、类及接口标识、数据库、甚至自动生成的机器名、目录名等。
ASP生成GUDI的实现
<%
Dim objTypeLib
Set objTypeLib = CreateObject("Scriptlet.TypeLib")
Response.Write objTypeLib.Guid
%>
在本机及网络主机均测试通过。
2007年02月10日
by 江小邪
1 comment
检索实现如下功能:
1、单关键字查询,并突出显示查询关键字
2、多关键字查询
1、如何突出显示关键字:
用Replace函数,格式如下:
要替换的字符串:strA=trim(request("keyword"))
要替换成的字符串:strB="<font color=red>"+strA+"</font>"
content是文章的内容
Response.Write Replace(content,strA,strB)
或者
Response.Write(Replace(content,strA,strB))
2、如何实现多关键字搜索
我在搜索的时候增加了一个checkbox,当用户选中该checkbox的时候为多关键字搜索。用户要搜索多关键字,可以这样输入:综合受理+文书流转 就是用一个半角加号来连接多个关键字。接下来用到split函数
dim keywords
keywords=split(request("keyword"))
经过上述步骤,可以得到一个包含“综合受理”和“文书流转”两个字符串的数组(一维),如果我们用
response.write(keywords)来输出,得到的显示结果是:Array(很奇怪吧)
然后利用一个for循环语句来将数组的内容转做where子句的查询条件
dim i,temp
for i=LBound(keywords) to UBound(keywords) step 1 //LowBound是获取数组的下标,UpBound是获取数组的上标
temp=temp+"content like '%"+Cstr(keywords(i))+"%' and "
next
通过上述语句,最终的temp的内容是:
content like '%综合受理%' and content like '%文书受理%' and
后面多了一个and
因此在where子句可以增加多一个条件来结束查询语句。sql语句如下:
sql="select id,title,content from [table1] where "&temp&" id>0"
//表中的id是自动编号,肯定大于0,只是用来补充完成子句
(更多…)