sqlstr.asp

企业办公自动化管理系统 asp+sql server 2005

<%
function sqlstr(str)
	if isnull(str) then
		sqlstr="''"
		exit function
	end if
	if str="" then
		sqlstr="''"
		exit function
	end if
	str=trim(str)
	str=replace(trim(str),"'","`")
	str=replace(trim(str),"--","__")
	sqlstr="'" & str & "'"
end function
%>