Links i combi-box?
Hej igen igen.Jeg har en combie box hvor indholdet er udtræk fra en DB. De skulle gerne blive til links, men det virker ikke!?!?!?!
Er i tvivl om hvad der skal stå i action feltet.
URL bliver også hentet fra DB.
Code:
<form action="" method="post">
<tr>
<td colspan="2">
<select id="select01" name="Pages" >
<%
Dim oRSp, strSQL, oConn
Set oRSp = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM Pages ORDER BY Id "
oRSp.Open strSQL, oConn
oRSp.MoveFirst
Do Until oRSp.EOF
Response.Write "<option value=" & oRSp.fields("Pages") & ">"
Response.Write "<a href='" & oRSp.fields("URL") & "'>" & oRSp.fields("Pages") & "</a>"
Response.Write "</option>"
oRSp.MoveNext
Loop
oRSp.Close
oConn.Close
Set oRSp = Nothing
Set oConn = Nothing
%>
</select>
</td>
</tr>
</form>
