디비 에러 방지위한 문자열 처리 함수

'----------------------------------------------------------------------------------------- ' DB에 문자를 저장할 때, 특수문자에 대한 에러 방지를 위해 사용하는 함수. '----------------------------------------------------------------------------------------- Function ToDatabase( sData ) if isNull(sData) or sData = "" then else sData = replace(sData, "\", "&ys") sData = replace(sData, "'" , "&yq") sData = replace(sData, Chr(34), "&ydq") sData = replace(sData, chr(13) & chr(10), "") sData = replace(sData, "