Newbie, Display "Get" data in HTML Page 1

[SmokeyJoe]

I am trying to learn Using ASP with MySQL. I can build a database, insert new data into it and get data from it. However I have not been able to figure out how to use the data I have retrieved.

What I want to do is to display the data retrieved in cells on a web page, when the user selects the record wanted display the selected record in a web page for viewing or modifying. The code for getting the selected data is:



x = request.querystring("LName&quot
If x = "" Then ' Get all records if blank
cmndString="select * from generic"
Else ' get only those records beginning with data entered
cmndString="select * from generic WHERE LName like '" & request.querystring("LName&quot & "%" & "'"
END IF
Response.Write(cmndString)
set rs=cn.Execute(cmndString)
do until rs.eof
REM what I would like to do here is to pull up selected records and display certain data in cells
REM then allow the user to select the desired name and display all data for thst record
REM in a .htm form so the user could modify them if needed. How do I do this???
REM For Example, I can pull out the first name as shown here but I am lost as to what to do then.
FName = rs.fields("FName&quot
Response.Write(&quot;<TR>&quot
Response.Write(&quot;<TD>&quot; & FName & &quot;</TD></TR>&quot
Response.Write(&quot;<TR>&quot
Response.Write(&quot;<TD>&quot; & rs.fields(&quot;FName&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;LName&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;Street1&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;Street2&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;City&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;State&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;Zip&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;HPhone&quot & &quot;</TD><TD>&quot; & rs.fields(&quot;Fax&quot & &quot;</TD>&quot
Response.Write(FName & Street1)
rs.MoveNext
Response.Write(&quot;</TR>&quot
loop
%>


</BODY>
</HTML>


Thanks in advance

SmokeyJoe

 

[Tarwn]

What you will want to do is to build a href each time you loop, with the LName attribute in the address back to this page:

Do Until rs.EOF
	FName =  rs.fields("FName")
	Response.Write &quot;<tr>&quot;
	Response.Write &quot;<td><a href='mypagename.asp?LName=&quot; & rs.fields(&quot;LName&quot;) & &quot;'> Show Details </a></td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;FName&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;LName&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;Street1&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;Street2&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;City&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;State&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;Zip&quot;) & &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & rs.fields(&quot;HPhone&quot;) &quot;</td>&quot;
	Response.Write &quot;<td>&quot;  & & rs.fields(&quot;Fax&quot;) & &quot;</td>&quot;
	Response.Write &quot;</tr>&quot;
Loop

If you only wanted to show all of the details when the person is viewing a single record (or subset of records) than you could accomplish that like so:

Do Until rs.EOF
	If Request.QueryString(&quot;LName&quot;) <> &quot;&quot; Then
		Response.Write &quot;<tr>&quot;
		Response.Write &quot;<td><a href='mypagename.asp?LName=&quot; & rs.fields(&quot;LName&quot;) & &quot;'> Details </a></td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;FName&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;LName&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;Street1&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;Street2&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;City&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;State&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;Zip&quot;) & &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & rs.fields(&quot;HPhone&quot;) &quot;</td>&quot;
		Response.Write &quot;<td>&quot;  & & rs.fields(&quot;Fax&quot;) & &quot;</td>&quot;
		Response.Write &quot;</tr>&quot;
	Else
		FName =  rs.fields(&quot;FName&quot;) & &quot; &quot; & rs.fields(&quot;LName&quot;)
		Response.Write &quot;<tr>&quot;
		Response.Write &quot;<td><a href='mypagename.asp?LName=&quot; & rs.fields(&quot;LName&quot;) & &quot;'>&quot;  & FName & &quot;</a></td>&quot;
		Response.Write &quot;</tr>&quot;
	End If
Loop

Hope that helps,
-Tarwn ------------ My Little Dictionary ---------
Reverse Engineering - The expensive solution to not paying for proper documentation

 

[SmokeyJoe]

Thanks, Tarwn

SmokeyJoe