<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("./database/database.mdb")) set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select ID,Type,Navn,Link from meny ORDER BY ID", conn %>