<%
function ASCIICode(strInput)
strOutput = ""
For i = 1 To Len(strInput)
strOutput = strOutput & "&#" & ASC(Mid(strInput, i, 1)) & ";"
Next
ASCIICode = strOutPut
End function
%>
A1 Speedy Rooter- Serving Orange county, Los Angeles, Riverside, San Bernardino
