|
|
04 MAIO
2007
|
Hotel Marriott Copacabana Rio de Janeiro/RJ
|
|
04 NOVEMBRO 2005
|
Hotel Marriott Copacabana Rio de Janeiro/RJ
|
|
05 de NOVEMBRO 2004
|
São Paulo / SP
|
|
19 Setembro 2003
|
Hotel Renaissance
São Paulo / SP
|
|
23 Setembro 2002
|
Hotel Copacabana Palace
Rio de Janeiro -RJ |
Internacional de Gestão em Saúde
V Jornada Bras. de Internação Domiciliar |
29 e 30
Junho 2001
|
Sheraton Mofarrej Hotel
São Paulo / SP
|
|
15 Abri 2000
|
Grand Hotel Mercure
São Paulo / SP
|
|
17 Abril 2000
|
Grand Hotel Mercure
São Paulo / SP
|
<%
Set con = server.CreateObject("Adodb.Connection")
provider="Provider=Microsoft.jet.OLEDB.4.0;Data Source="&server.MapPath("database/eventos.mdb")
con.Open provider
Set RS = server.CreateObject("ADODB.RECORDSET")
str="select * from clientes where id_cliente=1 or id_cliente=2 or id_cliente=3 or id_cliente=4 or id_cliente=7 or id_cliente=8 or id_cliente=12"
'str="select * from clientes inner join eventos on eventos.id_cliente=clientes.id_cliente"
RS.Open str,con
%><%
do while not RS.EOF
%><%
RS.MoveNext
loop
%><%
RS.Close
Set RS = nothing
con.Close
Set con = nothing
%><%
ELSE
%><%
Set con = server.CreateObject("Adodb.Connection")
provider="Provider=Microsoft.jet.OLEDB.4.0;Data Source="&server.MapPath("database/eventos.mdb")
con.Open provider
Set RS = server.CreateObject("ADODB.RECORDSET")
str="select * from eventos where id_cliente = "&Request.QueryString("id_cliente")&" order by data desc"
RS.Open str,con
%><%
do while not RS.EOF
%><%
RS.MoveNext
loop
%><%
RS.Close
Set RS = nothing
con.Close
Set con = nothing
END IF
%>