ASP 相关文章或者相关产品
来源:asp之家 时间:2011-03-30 11:12:00
在后台添加中一般我们都设置了一个“关键字”,而且一般输入可能如下:
娃娃,毛绒娃娃,日本充气娃娃
我们将根据这个来做,具体实现如下:
先看一条SQL语句:
代码如下:
select top 3 sid,sname from product where keywords like '%娃娃%' or keywords like '%毛绒娃娃%' or keywords like '%日本充气娃娃%'
那么我们根据这条语句就可以搜索到相关产品或者相关文章了(其实有更复杂以及更好的实现,但这里暂时不提及了),以下是关键代码:
代码如下:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<% Response.Charset="gb2312" %>
<%
Dim A:A = "娃娃,毛绒娃娃,日本充气娃娃"
'obj为值,filed为字段名
Function sqlKeyWord(obj,field)
Dim temp:temp = split(obj,",")
For i = 0 To ubound(temp)
sqlKeyWord = sqlKeyWord & field&" like '%"&temp(i)&"%' or "
Next
sqlKeyWord = left(sqlKeyWord,len(sqlKeyWord)-3)
End Function
Dim mysql:mysql = "select top 3 sid,sname from product where " + sqlKeyWord(A,"keywords")
Response.Write(mysql)
'Set objRs = objConn.execute(mysql)
'Do while not objRs.Eof
'Response.Write(objRs("sname"))
'Loop
'objRs.close
'set objRs = nothing
'objConn.close
'set objConn = nothing
%>
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
互联网产品设计师职业生涯
css网页下拉菜单制作方法(4):定位问题
服务端XMLHTTP(ServerXMLHTTP in ASP)基本应用(下)
ASP分页类(支持多风格变换)
![](https://img.aspxhome.com/file/UploadPic/20112/5/201125112048960.jpg)
《设计网事》前言
Web2.0 的视觉设计
![](https://img.aspxhome.com/file/UploadPic/200710/24/20071024223710131s.jpg)
css基础教程属性篇之盒子模型
![](https://img.aspxhome.com/file/UploadPic/20087/29/2008729121433524s.jpg)
详细讲解如何为MySQL数据库添加新函数
sql server 带列名导出至excel
关于ASP中脚本执行顺序的讲解
SQL Server 数据库索引其索引的小技巧
在Vista IIS 7 中用 vs2005 调试 Web 项目的注意事项
![](https://img.aspxhome.com/file/UploadPic/20112/5/20112511198969s.jpg)
使用FSO把文本信息导入数据库
Oracle 异构服务实践
![](https://img.aspxhome.com/file/UploadPic/20078/17/200781710426148s.gif)
SQL Server 2005中利用xml拆分字符串序列
利用xslt对xml进行缩进格式化处理
asp如何获知并显示文件的大小?
讲解SQL Server 2005数据库的同义词Bug
Access中的模糊查询
Ethnique公司logo设计过程和思路
![](https://img.aspxhome.com/file/UploadPic/20099/19/01-79s.jpg)