Função de classe. Substitua a sequência passada em uma expressão após a palavra -chave WHERE na instrução SQL:
Pesquisa de palavras [por exemplo: Xiao Ming]
Pesquisa de frase
Cada palavra na frase será recuperada
Por exemplo: Xiaoqiang 1 apelido 1 xiaoqiang 1 xiaoqiang xiaoqiang
Pesquisa lógica
Suporta e / ou operadores.
Por exemplo: Xiao Ming e Xiao Qiang e Xiao Qiang
Condições compostas:
Por exemplo: (Xiao Xiaoming ou Xiaoming) e (Xiaoqiang ou Xiaoxiaoqiang)
Por exemplo: (Xiao Xiaoming ou apelido) e Xiao Xiaoqiang
Por exemplo: root1 e (Guangdong ou Pequim)
-------------------------------------------------------------
A cópia do código é a seguinte:
ClassCreatEqueryString
PublicObJreg
PublicIntstart
Publicstrfield
PrivatebjNode2
PrivateStText
PublicPropertyLetQueryString (strvalue)
strText = lcase (strvalue)
EndProperty
Privatesubclass_initialize ()
SetObjreg = newRegexp
strfield = "(título + artigo)"
Endsub
Privatesubclass_terminate ()
Setobjreg = nada
Endsub
PublicDefaultFunctionText ()
Dimblnres
Dimstrsky
Sembjreg
.Ignorecase = true
.Global = true
.Pattern = "/s"
blnres = .test (strText)
ENDWITH
Se (NotblnRes) então
intstart = 2
GetText = strfield & "como '%" e strtext & "%'"
Outro