É relativamente complexo e pode suportar uma variedade de caracteres lógicos, incluindo espaços +-ndor, etc., e pode ser adicionado conforme necessário. Você pode escolher qual tabela pesquisar de acordo com as condições, e a velocidade foi otimizada, o que pode ser considerado muito rápido. Claro, porque foi escrito antes, há muitos problemas. Quase todos os recursos do SQLServer são usados em procedimentos armazenados, como cursor (paginação de conjunto de registros), etc. Ok, não se gabarem mais, apenas assista ao programa.
função asp
A cópia do código é a seguinte:
functionAnalyseKeyword (a_strsource)
Dimm_strdest, m_intloop
DIMM_INTBEGINPOS, M_INTENDPOS
Dimm_strhead, m_strmiddle, m_strtail
m_strdest = a_strsource
'-----------------------------------------------------------------------------------------------------------------------------------
'Primeiro remova os espaços no final
m_strdest = ltrim (rtrim (m_strdest))
'Substituir & "e etc. com +, -, espaços
m_strdest = substituir (m_strdest, "&", "+")
m_strdest = substituir (m_strdest, "e", "+")
m_strdest = substituir (m_strdest, "ou", chr (32))
m_strdest = substituir (m_strdest, "não", "-")
'Inicialize a variável para fazer o seguinte loop ir
m_intbeginpos = 1
Dowhilem_intbeginpos <> 0
M_INTBEGINPOS = Instr (m_strdest, Chr (32))
ifm_intbeginpos <> 0Then'Ep Space for encontrado
m_strhead = rtrim (ltrim (esquerda (m_strdest, m_intbeginpos)))
callprint ("[analseKeyword ()]: espaço de processo m_strhead ="+m_strhead)
M_STRATH = RTRIM (LTRIM (direita (m_strdest, len (m_strdest) -m_intbeginpos)))
CallPrint ("[AnalyseKeyword ()]: Space Process M_STRATHRATH ="+M_STRATH)