Attempting to access an Access Database

<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "D:\Inetpub\wwwroot\home\mhamill\IST-226\Files\database\kitesrus.mdb" set rs=Server.CreateObject("ADODB.recordset") rs.Open "select * from customers", conn for each x in rs.fields response.write(x.name) response.write(" = ") response.write(x.value) response.write("
") next %>