I need the code for a asp submission form that submits multiple input
fields at one time. The webpage I would need to have listing a from a
query that lists their name,address, and email address, (40 or more
results from a MSaccess database) next to this I would need a drop
down box(yes,no or maybe) and a text field for comments.
Clarification:
I need the asp code that would do this: The name,address, and
email address, would come from a query named qryuserinfo. The query
may be 12 users one time and 30 users the next. At the end of user
line of information I need a drop down menu and a text box next to
that for each users. And to have all the information from all the
users listed to be submitted to the database. I been able to submit
indivdual users on a simple form but not multiple users at once. |
Clarification of Question by
swykpisz-ga
on
29 Oct 2003 15:45 PST
The code I have is from a page that produces the results from a query
in a MSaccess database. I want to use these results and have a drop
down and text box at the end of each line,this is the code I currently
have,what would I need to do to accomplish this?:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>My Results Report</title>
<style>
A {color:white;text-decoration:none}
</style>
</head>
<body bgcolor="C0C0C0">
<table align=center width=100%>
<tr><td align=left><a href='ReportMenu.asp'><font face=Verdana
color="0000A0" size=1><b>< Report Menu</b></a></font></td>
<td align=right><a href='http://www.yahoo.com/'><font face=Verdana
color="0000A0" size=1><b>Yahoo > </b></a></font></td>
</tr></table>
<p align=center><font face="Verdana" size=6 color="0000A0"><b>
M</b></font><font face="Verdana" size=5 color="0000A0">y </font>
<font face="Verdana" size=6 color="0000A0"><b>R</b></font><font
face="Verdana" size=5 color="0000A0">esults </font>
<font face="Verdana" size=6 color="0000A0"><b>R</b></font><font
face="Verdana" size=5 color="0000A0">eport </font>
<font face="Verdana" size=6 color="0000A0"><b>P</b></font><font
face="Verdana" size=5 color="0000A0">age</font></p>
<br>
<%
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" &
Server.MapPath("mydata.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn
set rs = server.createobject("adodb.recordset")
strsql = "SELECT DISTINCT AM, AMLogin FROM qryResultsRoster WHERE
AMLogin LIKE '" & _
Request.Form("AMLogin") & "' "
rs.open strsql, strconn, 2, 2
%>
<% While Not rs.EOF%>
<table border=0 width=90% align=center bgcolor="white"
bordercolorlight="#006699" cellspacing="1" cellpadding="1">
<tr><td colspan=6 align=left valign=top width=35%><font
face="Verdana" size="3" ><b>Results Report For:</b>
<%=rs("AM")%></font></td></tr>
<tr><td colspan=6><br><hr></td></tr> <%rs.MoveNext%>
<%Wend%>
<%
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" &
Server.MapPath("mydata.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn
set rs = server.createobject("adodb.recordset")
strsql = "SELECT * FROM qryResultsReport WHERE AMLogin LIKE '" & _
Request.Form("AMLogin") & "' "
rs.open strsql, strconn, 2, 2
%>
<tr>
<td><font face="Verdana" size="2" ><b>Name</b></font></td>
<td><font face="Verdana" size="2" ><b>Address</b></font></td>
<td><font face="Verdana" size="2" ><b>Email Address</b></font></td>
<td align=center><font face="Verdana" size="2" ><b>Last
Updated</b></font></td>
</tr>
<% While Not rs.EOF%><tr>
<td width=30% ><font face="Verdana" size="2"
><%=rs("Name")%></font></td>
<td width=30% ><font face="Verdana" size="2"
><%=rs("Address")%></font></td>
<td width=20%><font face="Verdana" size="2"
><%=rs("Email")%></font></td>
<td width=20% align=center><font face="Verdana" size="2"
><%=rs("LastDate")%></font></td>
</tr>
<%rs.MoveNext%>
<%Wend%>
</table>
<br>
</body>
|
