Untitled Document

<% cnpath="DBQ=" & Server.MapPath("noticias.mdb") DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DataSource 'Abre o Recordset Set RS = Server.CreateObject( "ADODB.Recordset" ) RS.ActiveConnection = conn RS.open "SELECT * FROM Noticias" 'Abre o Recordset Set RS2 = Server.CreateObject( "ADODB.Recordset" ) RS2.ActiveConnection = conn RS2.open "SELECT * FROM Data" 'Abre o Recordset Set RS3 = Server.CreateObject( "ADODB.Recordset" ) RS3.ActiveConnection = conn RS3.open "SELECT * FROM Letreiro" 'Abre o Recordset Set RS4 = Server.CreateObject( "ADODB.Recordset" ) RS4.ActiveConnection = conn RS4.open "SELECT * FROM Anexo" 'Abre o Recordset Set RS5 = Server.CreateObject( "ADODB.Recordset" ) RS5.ActiveConnection = conn RS5.open "SELECT * FROM Apresentacao" 'Abre o Recordset Set RS6 = Server.CreateObject( "ADODB.Recordset" ) RS6.ActiveConnection = conn RS6.open "SELECT * FROM Manchete" 'Abre o Recordset Set RS7 = Server.CreateObject( "ADODB.Recordset" ) RS7.ActiveConnection = conn RS7.open "SELECT * FROM Anexodir" 'Abre o Recordset Set RS8 = Server.CreateObject( "ADODB.Recordset" ) RS8.ActiveConnection = conn RS8.open "SELECT * FROM Edicao" %> Untitled Document

<%=rs2("data")%>

<% while not rs5.EOF %>

" border=0 align="left">

<%rs5.Movenext wend %>

Expediente

Rua Pres. Antônio Carlos, 17 - Centro - Ponte Nova/MG - 35.430-003

Periódico de circulação semanal - Tiragem: 3.000 exemplares
Fundado em 22/12/1988
Diretor e Jornalista Responsável: José Carlos Itaborahy Filho - Reg. Prof. 2.300/MG
e Reg. DRT/Proc. 24.771.242/89
Gerente: Amariles Paoli Itaborahy
Representante Publicitário exclusivo em todo o país: Ulisses Nascimento Publicidade
e Representações Ltda. - BH/MG
Filiado a: ABRAJORI, ADJORI e SINDJORI.
As matérias assinadas não correspondem, necessariamente, ao posicionamento deste jornal, e as matérias publicitárias são circuladas com fio.

Edições Anteriores