Link/database problem
Jeg har sat og rodet med noget kode i noget ( efterhånden lang tid ) tid.Det jeg har forsøgt på er at en familie kan oprette sig med alle de personer der nu er i den familie. Hver person i familien skal have mulighed for at skrive 10 ønsker.
Så er mit spørgsmål, hvordan gør jeg det nemmest??
Lige nu har jeg dette her
------- Database (dom hedder jul)------
I den database er der en tabel (som hedder log)
I tabellen ”log” har jeg dette:
ID
Efternavn
Pass
By
Navn
Onske1
Onske2
Onske3
til
Onske10
-------Default.asp------
på Default.asp siden er der en menu som skal trække de familier ud som der nu er blevet oprettet
Set tempConn = Server.CreateObject("ADODB.Connection")
tempConn.Open = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("jul.mdb") & ";"
strSQL = "SELECT * FROM log WHERE ja = ja”
Set rs = tempConn.Execute(strSQL)
%><%Do While Not rs.EOF%>
<%
if rs.EOF then
Response.write "<center><b><font face=""Arial"" size=""2"" color=""990000"">Ingen bruger.</font></b></center>"
else%>
<table cellspacing="0" cellpadding="0" border="1" bordercolor="#ffffff" width="136" align="center">
<tr>
<td colspan="2" bgcolor="990000" width="133" align="center"><font color="FFCC99"><b>
<a href="default1.asp?pass=<%=rs("efternavn")%>" style="color: FFCC99; text-decoration :none;"><%= rs("efternavn") %> (<%= rs("by") %>) </a>
</b></font></td>
</tr>
</table>
<% End If %>
<% rs.MoveNext
Loop
tempConn.Close
Set tempConn = Nothing
%>
når man så har trykket på linket til den familie som man gerne vil se, skal den næste side kun vise den familie som man har valgt.
----default1.asp------
Set tempConn = Server.CreateObject("ADODB.Connection")
tempConn.Open = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("jul.mdb") & ";"
strSQL = "SELECT * FROM log WHERE efternavn=" & request.querystring("efternavn")
Set rs = tempConn.Execute(strSQL)
%>
<table cellspacing="0" cellpadding="0" border="1" bordercolor="#ffffff" width="136" align="center">
<tr>
<td colspan="2" bgcolor="990000" width="133" align="center"><font color="FFCC99"><b>
<%= rs("navn") %> (<%= rs("by") %>)
</b></font></td>
</tr>
</table><%Do While Not rs.EOF%>
<table>
<tr>
<td width="24"> </td>
<td>
<a href="person.asp?pass=<%= rs("id") %>" style="color: 990000; font-weight: bold; text-decoration: none;"><%= rs("far") %></td>
</tr>
</table>
<%
rs.MoveNext
Loop
tempConn.Close
Set tempConn = Nothing
%>
----person.asp-----
Og det er her jeg får mit problem, når man vil se hvad en af de personer som der er i familien ønsker sig.
Set tempConn = Server.CreateObject("ADODB.Connection")
tempConn.Open = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("jul.mdb") & ";"
strSQL = "SELECT * FROM log WHERE id=" & request.querystring("id")
Set rs = tempConn.Execute(strSQL)
%><%Do While Not rs.EOF%>
<table cellspacing="0" cellpadding="0" border="0">
<tr>
<td colspan="2"><img src="images/julemand.gif" alt="" width="195" height="85" border="0"></td>
</tr>
<tr>
<td colspan="2">Her kan du se hvad <%= rs("navn") %> Ønsker sig.</td>
</tr>
<tr>
<td colspan="2"></td>
</tr>
<tr>
<td>Onske 1</td>
<td><%= rs("mor") %></td>
</tr>
<tr>
<td>Onske 2</td>
<td><%= rs("mor1") %></td>
</tr>
<tr>
<td>Onske 3</td>
<td><%= rs("mor2") %></td>
</tr>
<tr>
<td>Onske 4</td>
<td><%= rs("mor3") %></td>
</tr>
<tr>
<td>Onske 5</td>
<td><%= rs("mor4") %></td>
</tr>
<tr>
<td>Onske 6</td>
<td><%= rs("mor5") %></td>
</tr>
<tr>
<td>Onske 7</td>
<td><%= rs("mor6") %></td>
</tr>
<tr>
<td>Onske 8</td>
<td><%= rs("mor7") %></td>
</tr>
<tr>
<td>Onske 9</td>
<td><%= rs("mor8") %></td>
</tr>
<tr>
<td>Onske 10</td>
<td><%= rs("mor9") %></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><!--bund--></td>
</tr>
</table>
<%
rs.MoveNext
loop
tempConn.Close
%>
er det den måde jeg gemmer det i databasen på eller hvad er problemet??
Som i kan se er der ret gode point til den som kan løse det
