ASP : VbScript – Escape Single and Double Quotes
FUNCTION PreSubmit(p_sTargetString)
PreSubmit = REPLACE(p_sTargetString,”textarea”,”")
PreSubmit = REPLACE(PreSubmit,”%”,”%”)
PreSubmit = REPLACE(PreSubmit,”‘”,”’”)
PreSubmit = REPLACE(PreSubmit,”"”",”””)
PreSubmit = Trim(PreSubmit)
END FUNCTION

Thanks. It is working for me.
Yoga Meditation Guru
January 30, 2009 at 11:55 pm