<%
SQL = "Select * from garotas"
ConnString="DBQ=e:\inetpub\wwwroot\ccsp\tvano50\televisao.mdb;Driver={Microsoft Access Driver (*.mdb)}"
' ConnString="DBQ=D:\InetPub\wwwroot\web_prod\tvano50\televisao.mdb;Driver={Microsoft Access Driver (*.mdb)}"
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open ConnString
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conexao
y=0
response.write ""
%>
