accessxp/2003版本以前是不支持replace函数的。其它替代方法都不是很理想,LZ可以偿试其它方法,程序员脑要灵活,不要钻牛角尖(虽然有时是好事)。
<%
Dim Str,Sql
Str="查询或其它变量:例如果:兽医"
if Trim(Str)='兽医' then
Sql="select * from worker where worker_Title='兽 医'"
end if
%>
select * from worker where left(worker_Title,1)="兽" and right(worker_Title,1)="医"
select * from worker where worker_Title like '%兽%医%'
这个好一些
select * from [worker] where replace(worker_Title,' ','')='兽医'
select * from worker where worker_Title like '%兽%医%'