syntax errors

Adam H-W · July 1st, 2004, 11:31 AM

Hi there

I've got a couple of syntax errors that I was hoping someone could help me with:

1) I'm using ASP with MS SQL Server 2000 and I've got some varchar entries with a ' in them - i.e L'equipe. When the ASP spits them out I get an error - can I use the replace method to stop this? if so, how would it be written for the '?

2) I get a syntax error with this code.

response.Write("<a href=""submitworld.asp?Country='" & request.Form("Country") & "'&Beach='" & request.Form("Beach") & "' BeachID= '" & request.Form("BeachID"))

can anyone see how I can rectify either/both of these?

Many thanks

Adam

shahchi1 · July 1st, 2004, 01:59 PM

(1)
It depends on how you build your Response.Write statement.
Yes, Replace apostrophe with chr(39)

<script language="VBScript" type="text/VBScript">
Function Fix_String(varString)
    if isnull(varString) then
        Fix_String = ""
    else
        Fix_String = trim(varString)
        Fix_String = Replace(Fix_String,"'",chr(39))
    end if
End function
</script>
(2)
Response.Write("<a href='submitworld.asp?country="& Request.form("Country") & "Beach="&Request.Form("Beach") & "BeachID=" & Request.form("beachID") &"'></a>")

Let me know

happygv · July 1st, 2004, 09:37 PM

Hi shahchi1,

You are missing & in the querystring.

Adam, you can use this modified one.

Code:

Response.Write "<a href='submitworld.asp?country=" & Request.form("Country") & "&Beach=" & Request.Form("Beach") & "&BeachID=" & Request.form("beachID") &"'></a>"

Cheers!

_________________________
- Vijay G
Strive for Perfection

happygv · July 1st, 2004, 09:49 PM

Adam,

I am not sure if shahchi1's Replace code works. So try this.

Code:

ELSE
    Fix_String = trim(varString) ''' Do not use this. Remove this line
    'Once something is assigned to the FUNCTION name, the value that is assigned is returned to the calling code. 
    'You cannot do that twice. And the next line would never be executed as the control switches out of FIX_STRING function after this. 
    'So the above line should return control to calling code, and you would not get the replace of "'" with chr(39) effected.
    Fix_String = Replace(trim(varString),"'",chr(39))
END IF

Hope that helps.
Cheers!

_________________________
- Vijay G
Strive for Perfection

shahchi1 · July 2nd, 2004, 07:44 AM

Vijay,
My bad, but thank you for corrections