problema na Sql

[Arrasted 0]

to tentando fazer uma pqna busca no meu db.

mas esta dando erro... as malditas aspas novamente..creio

 

<%

Function busca_inteligente(str)

Dim v

v = lcase(str)

v = Replace(v,"%","")

...

...

Prepara_busca = v

End Function

%>

<%

Set Conn = Server.CreateObject("ADODB.CONNECTION")

Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=F:\Box\blackbox.mdb"

Set rs = Conn.Execute ("SELECT * FROM dados WHERE nome Like='%" & busca_inteligente(v) & "%'")

%>

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe (operador faltando) na expressão de consulta '* dados WHERE nome Like='%%''.

[birobirosk8 0]

esse sinal de igual "=" nao existe, pode tirar ele q vai funcionar:Set rs = Conn.Execute ("SELECT * FROM dados WHERE nome Like '%" & busca_inteligente(v) & "%'")

[Mário Monteiro 179]

só tem um detalhea saida tem de ser no nome da functionFunction busca_inteligente(str)Dim vv = lcase(str)v = Replace(v,"%","")......busca_inteligente = vEnd Function