[摘要]", "' & chr(124) & '", 0)End FunctionFunction FindFirstFixup(TextIn)...
", "' & chr(124) & '", 0)
End Function
Function FindFirstFixup(TextIn)
Dim Temp
Temp = ReplaceStr(TextIn, "'", "' & chr(39) & '", 0)
FindFirstFixup = ReplaceStr(Temp, "
关键词：处理ASP执行DB查询中的特殊字符问题