Indsætte post fra db som link
Hvordan får man indsat en post fra db'en og gjort den til et link. Nedenstående er et uddrag af et bookingsystem, som viser om et lokale er optaget eller ledigt. Desuden er der et link tilbage til en side som viser forskellige oplysninger om reservationen, bl.a. initialer på den person som har booket. Disse initialer vil jeg gerne have indsat i skemaet, og de skal så virke som et link.En del af mit script ser sådan ud:
%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("/reservation/data.mdb")
Conn.Open DSN
lektion = Request.Querystring("lektion")
dag = Request.Querystring("dag")
lokale = Request.Querystring("lokale")
'Mandag 1. lektion ****************************************************
strSQL = "SELECT initialer,klasse FROM reserver WHERE lokale='data' AND dag='Mandag' AND lektion='1' AND uge='" & uge & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=18% height=40><font color=#FFFFFF><img src='greenball.gif' alt='Lokalet er ledigt'></font></td>"
Else
Response.Write"<td width=18% height=40><font color=#FFFFFF><img src='redball.gif' alt='Lokalet er optaget'><img src='blank2.gif'><A HREF='vis_reservation.asp?lokale=data&lektion=1&dag=mandag&uge=" & uge &"'>link</A></font></td>"
rs.MoveNext
End if
