搜索(前台后台)时内存溢出问题解决方案-领先建站CMS提供服务商我们专注于CMS建站产品的研发

4001 查看	8 回复

主题：搜索(前台后台)时内存溢出问题解决方案 [收藏主题]

转到：

nantiange 当前离线

14 主题	0 广播	0 粉丝

级别:学前班

用户积分:401 分
登录次数:130 次
注册时间:2007/3/20
最后登录:2014/9/18

nantiange 发表于：2007/5/28 13:43:00 | 只看该作者查看该作者主题楼主

做线上考试培训就选#科汛网校

有些用户会发现自己的前台搜索功能search.asp这块，以及后台搜索“搜索小助理”，使用搜索时，会出现内存溢出的错误。

原因：因为你的网站文章或下载等的标题/内容里产生了日文片假名。

26个日文片假名导致Access搜索(80040e14/内存溢出)的解决办法==

ゴガギグゲザジズヅデドポベプビパヴボペブピバヂダゾゼ

解决方法：使用LCase和InStr函数来解决。解决方法很简单，方法如下：
1.只需用记事本打开search.asp(前台搜索程序)，Admin_Article.asp（后台搜索小助理）：
2.搜索：And Title Like '%" & KeyWord & "%'
   改为：And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0

方法会了吧？

如果还不会，说明你的ASP水平还需提高。。。。。

解决文案：
打开Admin_Article.asp，第593行：

将select case searchtype 到 end select的内容替换为以下内容：

    Select Case SearchType
      Case 0
      Param = Param & " And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0 Or InStr(1,LCase(SubTitle),LCase('"&KeyWord&"'),0)<>0)"
      Case 1
      Param = Param & " And InStr(1,LCase(ArticleContent),LCase('"&KeyWord&"'),0)<>0"
      Case 2
      Param = Param & " And InStr(1,LCase(keywords),LCase('"&KeyWord&"'),0)<>0"
      Case 3
      Param = Param & " And InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0"
      Case 4
      Param = Param & " And InStr(1,LCase(ArticleInput),LCase('"&KeyWord&"'),0)<>0"
    End Select

打开search.asp文件 156行：

将select case searchtype 到 end select的内容替换为以下内容：

Select Case SearchType
   Case 1
     Param=Param & " And InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0"
   Case 2
     Param=Param & " And InStr(1,LCase(PictureContent),LCase('"&KeyWord&"'),0)<>0"
   Case 3
     Param=Param & " And InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0"
   Case 4
     Param=Param & " And InStr(1,LCase(PictureInput),LCase('"&KeyWord&"'),0)<>0"
   Case 5
     Param=Param & " And InStr(1,LCase(KeyWords),LCase('"&KeyWord&"'),0)<>0"
Case else: Param=Param & " And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0 Or InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0)"
End Select

[此贴子已经被作者于2007-5-28 13:48:01编辑过]

科汛商学院助您快速入门

支持(0) |

反对(0)

顶端

底部

kesion333 当前离线

168 主题	0 广播	0 粉丝

级别:一年级

用户积分:1550 分
登录次数:75 次
注册时间:2008/8/28
最后登录:2010/12/29

kesion333 发表于：2009/9/23 20:07:00 | 只看该作者查看该作者主题沙发

做线上考试培训就选#科汛网校

fffffffff

做新职业技能培训平台就选#科汛网校

支持(0) |

反对(0)

顶端

底部

ks1w 当前离线

2796 主题	4 广播	1 粉丝

级别:大一

用户积分:14338 分
登录次数:665 次
注册时间:2006/11/3
最后登录:2019/7/26

ks1w 发表于：2008/12/19 22:32:00 | 只看该作者查看该作者主题藤椅

一分钟快速开通线上知识店铺

有些用户会发现自己的前台搜索功能search.asp这块，以及后台搜索“搜索小助理”，使用搜索时，会出现内存溢出的错误。

原因：因为你的网站文章或下载等的标题/内容里产生了日文片假名。

26个日文片假名导致Access搜索(80040e14/内存溢出)的解决办法==

ゴガギグゲザジズヅデドポベプビパヴボペブピバヂダゾゼ

解决方法：使用LCase和InStr函数来解决。解决方法很简单，方法如下：

1.只需用记事本打开search.asp(前台搜索程序)，Admin_Article.asp（后台搜索小助理）：
2.搜索：And Title Like '%" & KeyWord & "%'
   改为：And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0

方法会了吧？

如果还不会，说明你的ASP水平还需提高。。。。。

解决文案：
打开Admin_Article.asp，第593行：

将select case searchtype 到 end select的内容替换为以下内容：

    Select Case SearchType
      Case 0
      Param = Param & " And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0 Or InStr(1,LCase(SubTitle),LCase('"&KeyWord&"'),0)<>0)"
      Case 1
      Param = Param & " And InStr(1,LCase(ArticleContent),LCase('"&KeyWord&"'),0)<>0"
      Case 2
      Param = Param & " And InStr(1,LCase(keywords),LCase('"&KeyWord&"'),0)<>0"
      Case 3
      Param = Param & " And InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0"
      Case 4
      Param = Param & " And InStr(1,LCase(ArticleInput),LCase('"&KeyWord&"'),0)<>0"
    End Select

打开search.asp文件 156行：

将select case searchtype 到 end select的内容替换为以下内容：

Select Case SearchType
   Case 1
     Param=Param & " And InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0"
   Case 2
     Param=Param & " And InStr(1,LCase(PictureContent),LCase('"&KeyWord&"'),0)<>0"
   Case 3
     Param=Param & " And InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0"
   Case 4
     Param=Param & " And InStr(1,LCase(PictureInput),LCase('"&KeyWord&"'),0)<>0"
   Case 5
     Param=Param & " And InStr(1,LCase(KeyWords),LCase('"&KeyWord&"'),0)<>0"
Case else: Param=Param & " And (InStr(1,LCase(Title),LCase('"&KeyWord&"'),0)<>0 Or InStr(1,LCase(Author),LCase('"&KeyWord&"'),0)<>0)"
End Select