加入收藏 | 设为首页 | 会员中心 | 我要投稿 银川站长网 (https://www.0951zz.com/)- 云通信、基础存储、云上网络、机器学习、视觉智能!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

相较不错的asp单表单字段多条件查询

发布时间:2023-07-28 13:08:50 所属栏目:Asp教程 来源:
导读:用途:文章表内文章关键字查询查询格式: 百度 google 百度好还是google好 百度+google (也可不输入条件全部查询)<!--#include file="conn.asp"--><%Function SearshSQL(Tname,Lname,Str) &#39;Tname-表名 Lname

用途:文章表内文章关键字查询

查询格式: 百度 google 百度好还是google好 百度+google (也可不输入条件全部查询)

<!--#include file="conn.asp"-->

<%

Function SearshSQL(Tname,Lname,Str) 'Tname-表名 Lname-列名 Str-查询的字符

If Trim(Str)="" then

        MySql="Select * From "&Tname

Else        

        Str=SqlEncode(Str)                         '预处理查询字符串

        ArrStr=split(Str," ")                '用空格分割处理后字符串

        Umax=Ubound(ArrStr)                        '分割后数组上维,确定分割成关键词的个数

        If Umax>0 Then                                '关键词中多个空格的处理,从第2维开始处理

                For i=1 to Umax

                 StrTemp=ArrStr(i)

                 If Trim(StrTemp)="" Then StrTemp="/~~~~~/" '分割成的元素为空用特殊字符代替

                 Sql=Sql &" Or "& Lname &" like '%"& StrTemp &"%'"

                Next

        End If

        MySql="Select * From "& Tname &" where "& Lname &" like '%"&ArrStr(0)&"%'"&Sql

        Do

          j=InStr(1,MySql, "%/~~~~~/%",1)

          If j=0 Then

                Exit Do

          End If

          MySql=Replace(MySql," Or "&Lname&" like '%/~~~~~/%'","")

(编辑:银川站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章