结合asp和存储过程做的搜索程序(3)

               call print ("[AnalyseKeyword()]:处理引号m_strDest = " + m_strDest)
               m_strHead   = left(m_strDest , m_intBeginPos - 1)
               call print ("[AnalyseKeyword()]:处理引号m_strHead = " + m_strHead)
               m_strMiddle = mid(m_strDest , m_intBeginPos + 1 , m_intEndPos - m_intBeginPos - 1)
               call print ("[AnalyseKeyword()]:处理引号m_strMiddle = " + m_strMiddle)
               m_strTail   = right(m_strDest , len(m_strDest) - m_intEndPos) 
               call print ("[AnalyseKeyword()]:m_strTail = " + m_strTail)

               '如果在引号中有+号则作为字符处理，暂时替换成其他字符
               m_strMiddle = replace(m_strMiddle , "+" , "|")
               m_strDest = m_strHead + replace(rtrim(ltrim(m_strMiddle)) , chr(32) , "#") + m_strTail                  

            else
               exit do  
            end if
         else
            exit do   
         end if      
      loop
      m_strDest = replace(m_strDest , chr(34) , "+")
      call print ("[AnalyseKeyword()]:处理引号完毕后m_strDest = " + m_strDest)

      '-------------------------------引号处理完毕-------------------------------------------------