<%@ LANGUAGE=JavaScript %> <% // Uma função que pode dar jeito alhures function obterConnection(BD){ var myConnection = Server.CreateObject("ADODB.Connection"); path = Server.MapPath("\\dwii\\db\\"+BD); myConnection.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + path) return myConnection; } myConnection = obterConnection("NorthWind.mdb"); instrucaoSQL= "SELECT * FROM EMPLOYEES" myRecordSet = myConnection.Execute(instrucaoSQL) while(!myRecordSet.eof){ for(Index=0; Index < (myRecordSet.fields.count); Index++) { Response.Write(myRecordSet(Index)); } Response.Write("

---

"); myRecordSet.MoveNext() } myRecordSet.Close(); myConnection.Close(); %>