overføre mange værdier i samme navn
Mit problem er at jeg har en database med en masse poster - alle disse poster bliver på en af mine sider udskrevet hver med et tilhørende afkrydsningsfelt - det er nu meningen at man skal kunne sætte kryds ved en række poster og så få det opdateret i en anden tal i databsen (dvs man tilmelder posterne til f.eks et arrangement!)Side 1
---------------------
<body>
<!--#include file=\"makeconn.asp\"-->
<form action=\"tilfojtilmaalgruppe.asp\" method=\"post\">
<input type=\"submit\" name=\"tilføj til målgruppe\" style=\"background-color: #FFFFFF; font-size: xx-small; font-family: verdana;\"/>
<select size=\"1\" name=\"IDmaalgruppe\" style=\"text-decoration: none; color: FFFFFF;\" style=\"background-color: #990E5E; font-size: x-small; font-family: verdana;\">
<%
strSQL = \"Select * From maalgruppe Order by Maalgruppenavn\"
set rs2 = Conn.Execute(strSQL)
If Not (rs2.BOF Or rs2.EOF) Then
Do While Not rs2.EOF
%>
<option value=\"<% response.write rs2(\"id\") %>\"><% response.write rs2(\"maalgruppenavn\") %></option>
<% rs2.movenext
Loop
else
%>
<option>Ingen målgrupper</option>
<%
end if
%>
</select>
<h2>
<%
\' SQL forespørgsel
virksomhed = request.form(\"virksomhed\")
strSQL = \"Select * From Stamfil where Virksomhedsnavn Like \'%\" & virksomhed & \"%\'\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
session(\"namenumber\") = 0
If Not (rs.BOF Or rs.EOF) Then
Do While Not rs.EOF
session(\"namenumber\") = session(\"namenumber\") + 1
%>
<input type=\"checkbox\" name\"<% response.write session(\"namenumber\") %>\" value=\"<% response.write rs(\"ID\") %>\"><a href=\"findmaalgruppemodtag.asp?kob=<%= rs(\"kob\") %>\" target=\"indholdbund\"><%= rs(\"Virksomhedsnavn\") %></a><br />
<!--<a href=\"findmaalgruppemodtag.asp?id=<%= rs(\"ID\") %>\" target=\"indholdbund\"><%= rs(\"Virksomhedsnavn\") %></a><br />-->
<% rs.movenext
Loop
else
response.write \"Ingen virksomheder fundet\"
end if
Conn.Close
Set Conn = Nothing
%>
<h2>
</form>
</body>
----------------
side 2
----------------
<body>
<!--#include file=\"makeconn.asp\"-->
<%
dim t
t = 1
do until t = session(\"namenumber\")
namenumber = session(\"namenumber\")
strSQL = strSQL \"Select * From stamfil where ID = \"request.form(\"namenumber\")\";\"
t = t + 1
loop
response.write strSQL
Conn.Close
Set Conn = Nothing
%>
</body>
---------------
dette er mit umiddelbare foreslag, men jeg kan ikke helt finde ud af at gøre det færdigt! Andre foreslag er også meget velkomne!
/Mathias
