Insert Null if parameter does not exist

Hello quick question. I have a page that takes a parm from a link and inserts the parm into a SQL database before the page loads. the problem is that if the Parm does not exisit I get an error

Microsoft VBScript runtime  error '800a0009'

Subscript out of range: 'i'

/../WA_DataAssist/WA_AppBuilder_VB.asp, line 238

The page is here

BVDM.asp

I want this URL to work with or without the ".asp?myparm=" in there and just insert NULL into the database... anyone know how to accomplish this?


thanks
-X

You could create an application variable and set it to Blank if the Querystring is not set:
<%
dim myparam
If Request.QueryString("myparam") = "" Then
myparam = " "
Else
myparam = Request.QueryString("myparam")
End If
%>


and use the application variable in the database insert instead of the query string variable.

Hey thanks for the response. Jason... just one last question.. in the Insert Record wizard i would type in

<% Response.write(myparm) %>

but it is still not working.. i see that when I just type the code into the page I see the parm and Null when there is no parm but when I put that into the wizard I still get the same error


any ideas?

Sounds like it wont take a blank string.

try using:
<%
dim myparam
If Request.QueryString("myparam") = "" Then
myparam = "N/A"
Else
myparam = Request.QueryString("myparam")
End If
%>



this will insert "N/A" in the database if the string does not exist.

Yup I got that part working.. and I did see it on the page when I did a quick test with the ASP

<% Response.Write(myparm) %>

The problem comes here where the WA application is iserted

WA_fieldValuesStr = "" & cStr(cStr(Response.Write(myparm))) & ""

I think i am just typing it wrong or something in there....

I think this should just be:

WA_fieldValuesStr = "" & cStr(cStr(myparm)) & ""

Correct!

Thanks Jason

You're welcome.