预览模式: 普通 | 列表

上传参数(1)出错的解决方法。

作者:cmscn  日期:2008-09-08

借用goffice老大的一个sub:


Code:
sub ClearCache
  application.Contents.RemoveAll()
  Session.Contents.RemoveAll()

查看更多...

分类:Cms | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 470

伪静态

作者:cmscn  日期:2008-09-08

'//* 文章浏览 *//
Public Function ShowChannelView(Vid,IsHtml)
    '初始载入
   'If Cls.Is_Null(vid)="" Then vid=Cls.Code_ID("id")
   '--------------伪静态--------------------------
   Dim rkurls
vid=Trim(Request.Querystring("id"))

查看更多...

分类:Asp | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 456

高校黄页查询仿百度

作者:cmscn  日期:2008-09-05

http://www.sxeduzx.com/search.asp?cls=31

已实现

模糊查询

关键词加亮

查看更多...

分类:Asp | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 416

怎么让搜索出来的关键字变红色？

作者:cmscn  日期:2008-09-05

result= replace(result,search,"<font color=red>"&search&"</font>")




'用正则表达式突出显示字符串中查询到的单词的函数
Function BoldWord(strContent,word)

查看更多...

分类:Asp | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 394

用split实现多关键字的搜索

作者:cmscn  日期:2008-09-05

<HTML>
<HEAD>
<TITLE>用split实现多关键字的搜索</TITLE>
<style type="text/css">
BODY {
    SCROLLBAR-FACE-COLOR: #293863;
    FONT-SIZE: 9pt;

查看更多...

分类:Asp | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 344

加亮搜索关键字

作者:cmscn  日期:2008-09-05

HTML代码


[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

查看更多...

分类:Js | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 442

一个搜索条效果

作者:cmscn  日期:2008-09-05

HTML代码


[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

查看更多...

分类:Js | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 409

一个页内搜索代码

作者:cmscn  日期:2008-09-05

HTML代码


[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

查看更多...

分类:Js | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 485

QQ邮箱里的一个效果

作者:cmscn  日期:2008-09-05

HTML代码


[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

查看更多...

分类:Js | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 412

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除

作者:cmscn  日期:2008-09-05

if rs.eof or rs.bof then
response.write "没有记录"
response.end
end if

eof 指针到达尾部
bof 指针到达顶部

查看更多...

分类:Asp | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 384