exportar a pdf multiples consultas

[JuanRAPerez]

nuna he creado pdf

<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=sqloledb ;user id=sa;Data Source=.; initial catalog=dblibreria"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select titulo, precio, stock from libro" , conn

Set Obj = Server.CreateObject("nonnoi_ASPExport2PDF.ASPExpor t2PDF")

' return PDF to browser
Obj.ShowCaption = True
Obj.ShowPDF rs

rs.Close
conn.Close
'aqui las otras consultas
rs.open
do while rs.eof
y aqui otro rs y mostrar otros datos dependiendo de algun dato de arriba...
next


set rs = nothing
set Obj = nothing
%>