Passing Value Question

Dthmtlgod · Jan 5, 2005

I am having a little difficulty in passing a value from a page to another
page. I am going to provide excerpts from the code. I think I am close.

This is from Page1.ASP

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=" & Server.MapPath("ncci.mdb")
Conn.Open DSNtest

Set rs = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT Distinct Insured FROM CCI2"
rs.Open strSQL, conn, 3, 3
%>

<TABLE>

<tr>
<td width=200>
<select
onchange="parent.fSearch1.location.href='Search1.asp?Ins='+this.value;"
size="1">

This passes the INS value to Page 2.ASP after something is selected (code
not shown)

This is from Page 2.ASP

insName = Request.QueryString("Ins")

Function sIn(s)
sIn = "'" & Replace(s, "'", "''") & "'"
End Function

Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=" & Server.MapPath("cci.mdb")
Conn.Open DSNtest

Set rs = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT Distinct State FROM CCI2 where Insured = " & sIn(insName) &
";"
rs.Open strSQL, conn, 3, 3

This works as it should up to this point.

I am trying to pass insName to Page 3.ASP
I have tried this inside my form.

<%
response.write"<input type=hidden name=insName value='" & insName & "'>"
%>

This is from Page 3.ASP

insName = Request.form("insName")

Then I am just trying to display it using the below code and it doesn't see
it.

response.write(insName)

Please help.

Ray Costanzo [MVP] · Jan 5, 2005

Does the <form> tag on page2.asp say method="post" or method="get"?
If method="post", all should be okay. (Show us page2.asp if that's
the case.) If it's method="get", then use
Request.Querystring("insName") instead of Request.Form.

Dthmtlgod · Jan 5, 2005

Hi Ray, here you go

Here is Page 2

<body>

<%@ LANGUAGE="VBSCRIPT" %>

<%

insName = Request.QueryString("Ins") ---- This was from a previous page.

Function sIn(s)
sIn = "'" & Replace(s, "'", "''") & "'"
End Function

Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=" & Server.MapPath("cci.mdb")
Conn.Open DSNtest

Set rs = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT Distinct State FROM CCI2 where Insured = " & sIn(insName) &
";"
rs.Open strSQL, conn, 3, 3

%>

<table border="0" cellspacing="0" cellpadding="0">
<form name="formSearch1" action="http://cci/home.html" method="post">
<tr>
<td><b>Filter(s):</b> </td>
<td>
<select name="state"
onchange="parent.fSearch2.location.href='Search2.asp?St='+this.value;"
size="1">
<option value="">Select a State</option>

<%
While NOT RS.EOF
%>
<div><font size=1>
<center>
<option value="<%=RS("State")%>"><%=RS("State")%></option>
</center>
</font>
</div>
<%
RS.MoveNext
WEND
%>

</select>
</td>
</tr>

<%
response.write"<input type=hidden name=insName value='" & insName & "'>"
%>

</form>
</table>

</body>

Page 3

<%@ LANGUAGE="VBSCRIPT" %>


<%

rState = Request.QueryString("St")
insName = Request.Form("insName")

Function sIn(s)
sIn = "'" & Replace(s, "'", "''") & "'"
End Function

response.write("<H3>")
response.write("<CENTER>")
response.write(sIn(insName))
response.write("</center>")
response.write("</H3>")

......

Ray Costanzo [MVP] · Jan 5, 2005

You're posting to a .html page? Do you have IIS configured to
process .html pages with ASP.dll? Page3 in your sample is home.html?

--

Ray at work
Microsoft ASP/ASP.NET MVP

Dthmtlgod · Jan 5, 2005

I was trying to reload the page. I am not sure if it is configured process
HTML as ASP pages, but I just changed my home page to home.asp and changed
the code to reflect "home.asp", but it is still not passing the value.

Home.HTML is my main page

<frameset cols="235,*" framespacing="0">
<frame name="fLeft" src="Left.ASP" frameborder="no">
<frameset rows="2,25" framespacing="0">
<frame name="fSearch1" src="Search1.ASP" frameborder="no" noresize
scrolling="no">
<frame name="fSearch2" src="Search2.ASP" frameborder="no" noresize
scrolling="yes">
<noframes>
<p>This page requires frames, but your browser does not support them.</p>
</noframes>
</frameset>
</frameset>

Ray Costanzo [MVP] · Jan 5, 2005

You're not trying to get that value after your location.href code
executes, are you?

Put this in home.asp:

<%
Response.write Request.ServerVariables("request_method") & "<hr>"
For each thing in REquest.form
Response.write thing & " = " & request.form(thing) & "<br>"
Next
%>

Please post back the results that appear in the browser.

--

Ray at work
Microsoft ASP/ASP.NET MVP

Dthmtlgod said:
I was trying to reload the page. I am not sure if it is configured process
HTML as ASP pages, but I just changed my home page to home.asp and changed
the code to reflect "home.asp", but it is still not passing the value.

Home.HTML is my main page

<frameset cols="235,*" framespacing="0">
<frame name="fLeft" src="Left.ASP" frameborder="no">
<frameset rows="2,25" framespacing="0">
<frame name="fSearch1" src="Search1.ASP" frameborder="no" noresize
scrolling="no">
<frame name="fSearch2" src="Search2.ASP" frameborder="no" noresize
scrolling="yes">
<noframes>
<p>This page requires frames, but your browser does not support

Dthmtlgod · Jan 5, 2005

Yes, I was eventually, maybe I am doing it the wrong way.

I put the code in and "GET" comes up.

Dthmtlgod · Jan 5, 2005

What I am trying to accomplish is have two option boxes, the second box
bring up data based on what is selected in the first box. I was trying to
do this over three frames.

I have modified my code a bit, the two option boxes are in the same frame
and I want to return the results into another frame, cut out the second
frame altogether. So I should probably use a submit button maybe to
accomplish this?

Thanks for your patience.

Ray Costanzo [MVP] · Jan 5, 2005

Alright, in that case, there is no request.form collection, because
you're not posting data. You're just making another GET request to
the server. The hidden input value will not exist in the form (or
the querystring for that matter) if a form is not submitted. Instead
of putting insName in a hidden input, put it in the querystring of
the location.href argument. Example:

onchange="parent.fSearch2.location.href='insname=<%=insName%>&Search2
..asp?St='+this.value;"

--

Ray at work
Microsoft ASP/ASP.NET MVP

Dthmtlgod · Jan 5, 2005

Thanks

Ray Costanzo said:
Alright, in that case, there is no request.form collection, because
you're not posting data. You're just making another GET request to
the server. The hidden input value will not exist in the form (or
the querystring for that matter) if a form is not submitted. Instead
of putting insName in a hidden input, put it in the querystring of
the location.href argument. Example:

onchange="parent.fSearch2.location.href='insname=<%=insName%>&Search2
.asp?St='+this.value;"

Dthmtlgod · Jan 6, 2005

Hi Ray,

I am trying to use your statement below and I am getting a Page Can't Be
Displayed error

onchange="parent.fSearch2.location.href='insname=<%=insName%>&Search2
..asp?St='+this.value;"

Search2.ASP exists.

Any ideas?

Ray Costanzo [MVP] · Jan 6, 2005

I guess that means that what I post should be proof-read. Notice
that I forgot to inclue a page name in the .href property.
..href='PAGE.ASP?insname...'

--

Ray at work
Microsoft ASP/ASP.NET MVP

Dthmtlgod said:
Hi Ray,

I am trying to use your statement below and I am getting a Page Can't Be
Displayed error

Too few parameters. Expected 1.	9	Oct 20, 2004
ASP Access Recordset Paging	6	Aug 5, 2008
DB not unlocking?	2	Sep 9, 2004
simple (?) connection problem	18	Dec 8, 2003
error with javascript in ASP	11	May 30, 2004
DataAdd Error: Arguments are wrong type or are out of acceptable r	1	Dec 14, 2004
asp and sql statement in sql server db	3	Sep 22, 2004
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another ER	2	Mar 11, 2005

Passing Value Question

Dthmtlgod

Ray Costanzo [MVP]

Dthmtlgod

Ray Costanzo [MVP]

Dthmtlgod

Ray Costanzo [MVP]

Dthmtlgod

Dthmtlgod

Ray Costanzo [MVP]

Dthmtlgod

Dthmtlgod

Ray Costanzo [MVP]

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads