uups,
jetzt hast du mich kalt erwischt,
die Datenbank spreche ich so an:
<%
DBPath = "cgi-bin/toplist.mdb"
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath(DBPath)
Set aConn = Server.CreateObject("ADODB.Connection")
aConn.open strConn
MyURL = "http://" & Request.ServerVariables("SERVER_NAME") & "/"
%>
zur Ausgabe der Datensätze habe ich bisher folgendes Fragment:
<%
DIM selSQL, brs, LinkAusgabe, Count
If brs.BOF Then
LinkAusgabe = "<tr><td> </td><td><span>Noch keine Einträge vorhanden</span></td><td> </td><td> </td></tr>"
Else
Count = 0
do while NOT brs.EOF
If brs("Status") = 1 then trproperty = " bgcolor=""#CEC6D7"""
Count = Count + 1
LinkAusgabe = LinkAusgabe & "<tr" & trproperty & "><td><span>" & Count & "</span></td>"
LinkAusgabe = LinkAusgabe & "<td><span><a href=""topliste_redirect.asp?id=" & brs("ID") & """ target=""_blank"">" & "<img src='../../_medien/icon/i_pdf.gif' width='16' height='16' border='0' alt='alternativ-text'> " & brs("Name") & "</a> " & brs("Beschreibung") & "</span></td>"
LinkAusgabe = LinkAusgabe & "<td><span>" & brs("OUTk") & "</span></td></tr>"
brs.movenext
loop
End If
brs.Close
set brs = nothing
%>
So viel habe ich bisher. Aber das läuft natürlich noch nicht.
mfg cooki