clean string function in ASP.

[monte96]

Ok... assuming that the six input tags are the only text input tags inside the form:

Sub frmMyForm_onsubmit
	Dim intLoop
	Dim objInput
	Dim strTemp
	
	Set objInput = frmMyForm.tags("INPUT")
	
	for intLoop = 0 to objInput.length - 1
		if objInput(intLoop).type = "text" Then
			strTemp = objInput(intLoop).value
			objInput(intLoop).value = CleanSQL(strTemp)
		end if
	Next
End Sub