一个简单的方法是：



把如下的语句：



Sql = "select * From [tablename] Where tableTitle like '%"&word&"%' Order By id Desc"



换成：



Sql = "select * from [tablename] where InStr(1,LCase(tableTitle),LCase('"&word&"'),0)<>0 order by tableid desc"