alle

Hej,

Denne udskriver hele din DB \"rådt\":

Lav en connection til din db

SQL = \"select * from din_tabel\"
Set rs = conn.execute(SQL)

for each field in rs.fields
Response.Write \"<b>\" & field.name & \"</b><br>\"
Response.Write rs(field.name) & \"</p>\"
next

Hilsen
Claus

Skulle være et svar...

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};\"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"dindb.mdb\")
Conn.Open DSN

strSQL = \"SELECT * FROM tabel\"
Set rs = Conn.Execute(strSQL)

Do

  Response.Write rs(\"1\") & \"<br>\"
  Response.Write rs(\"2\")

  rs.MoveNext

Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing

%>

Takker