<%@ Language=VBScript %> <% Set db = Server.CreateObject("ADODB.Connection") db.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../db/college.mdb") & ";" set rs=db.execute("SELECT * FROM feedback") rs.MoveFirst %> <%Do Until rs.EOF%> <% rs.MoveNext Loop %>

<% Response.Write rs("emailid") %>

<% Response.Write rs("name") %>

<% Response.Write rs("address") %>

<% Response.Write rs("city") %>

<% Response.Write rs("phone") %>