%
'string de conexão com o banco de dados
ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("https://www.abed.org.br/databases/seminario2008.mdb")
Set DB = Server.CreateObject("ADODB.Connection")
DB.Open ConnString
'consulta inscrições
Comando = "SELECT registro,nome,datainscricao,nomeemp,cidade,uf FROM cadastro order by registro"
Set rs1 = DB.Execute(Comando)
%>
6º
Seminário
Nacional
ABED de
Educação a
Distância