public static List <string> GetKeywordPhraseArray(string keywords)
{
string remainingKeywords, keyword;
List <string> result = new List <string>();
//' do a keyword/phrase split
remainingKeywords = VB.trim(keywords);
for (; remainingKeywords != "";)
{
remainingKeywords = VB.trim(remainingKeywords) + " ";
if (VB.left(remainingKeywords, 1) == "\"") //' strip off quote
{
remainingKeywords = VB.mid(remainingKeywords, 2);
//' look for end quote
int endQuotePos;
endQuotePos = VB.instr(remainingKeywords, "\"");
if (endQuotePos > 0)
{
//' take this token
keyword = VB.left(remainingKeywords, endQuotePos - 1);
//' remove these from the keywords To Process
remainingKeywords = VB.mid(remainingKeywords, endQuotePos + 1);
}
else
{
//' no end quote so just assume end
keyword = remainingKeywords;
remainingKeywords = "";
}
}
else
{
//' does not start with a quote, so take first word
int endWordPos;
endWordPos = VB.instr(remainingKeywords, " ");
//' take this token
keyword = VB.left(remainingKeywords, endWordPos - 1);
//' remove these from the keywords To Process
remainingKeywords = VB.mid(remainingKeywords, endWordPos + 1);
} //end if
keyword = VB.trim(keyword);
if (keyword != "")
{
result.Add(keyword);
} //end if
} //loop
return(result);
}
