Hejsa!
Du må undskylde at jeg først svarer tilbage nu, men jeg har ikke haft tid før nu!
Men her kommer der lige et eksempel på en kode du kan bruge:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("DinDatabase.mdb")
strSQL = "select * from DinTabel"
set rs = Conn.execute(strSQL)
if NOT rs.EOF then
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="1">
<tr>
<td width="50%">Beskrivelse:</td>
<td width="50%">Link:</td>
</tr>
<%
Do Until rs.EOF
des = "" & rs("beskrivelse") & ""
Hlink = "" & rs("link") & ""
%>
<tr>
<td width="50%"><%="" & des & ""%></td>
<td width="50%"><a href="<%="" & Hlink & ""%>" target="_blank"><%="" & Hlink & ""%></a></td>
</tr>
<%
RS.MoveNext
Loop
%>
</table>
<%
end if
Conn.Close
Set Conn = Nothing%>
- FORKLARING:
Der er nogle ting du selv lige må rette til... Det er ting hvor der skal bruges oplysninger som jeg ikke er bekendt med.
Nedenstående ting skal rettes til:
- DinDatabase
skal rettes til navnet (og evt. stien) på databasen vi skal se på.
- DinTabel
skal rettes til navnet på den tabel vi skal kigge på i databsen.
- rs("beskrivelse")
skal rettes til navnet på den kolonne i tabellen hvor beskrivelsen af linket for eksempel er (eks. rs("EtAndetNavn")).
- rs("link")
skal rettes til navnet på den kolonne i tabellen hvor stien på linket er (eks. rs("EtAndetNavn"))
---------------------------------------
Jeg kan selvfølgelig godt rette disse ting til hvis det er... Og der kan selvfølgelig også sagtens komme flere ting med i tabellen i dit output end lige to kolonner...
- Håber du kan bruge dette til noget!
Med venlig hilsen
Dan
