impresion de reporte de crystal en vb.net

Hola usa un dataset como fuente de datos del reporte y de esta manera no
necesitaras nada de
usuario, claves tec tec
Crea un XSD donde creas el formato de tu tabla y que de este XSL el report
obtenga los datos:

Dim DataSetReport as new mi_dataset.xsl

reportsource=DataSetReport

con eso ya tienes la solucion porque para el reporte no importa de donde o
que server o base de datos vienen los datos, el solo nira dentro del dataset
XSD.

Al XSD le haces un Fill como si fuera un dataset normal, claro, para llenar
este XSD debes utilizar el sqlcommand,sqldatareader.o su equivalente
para oledb.

Bueno, espero haberte sido claro, cualquier duda me escribes y te paso mi
codigo por mail
Saludos




wrote in message
news:477501c47355$3ba3ee30$
Por favor echenme la mano!!!!
Hola a tODOS TENGO EL SIGUIENTE CODIGO EN UN BOTON :


Dim tbCurrent As
CystalDecisions.CrystalReports.Engine.Table
Dim tliCurrent As
CrystalDecisions.Shared.TableLogOnInfo

Dim rptExpensiveProducts As New ReportDocument()

Try
' Load the report
rptExpensiveProducts.Load
("c:\siigaeportespttacticos.rpt")

' Set the connection information for all the
tables used in the report
' Leave UserID and Password blank for trusted
connection

For Each tbCurrent In
rptExpensiveProducts.Database.Tables
tliCurrent = tbCurrent.LogOnInfo
With tliCurrent.ConnectionInfo
.ServerName = ServerName
.UserID = ""
.Password = ""
.DatabaseName = "Ventasdbd"
End With
tbCurrent.ApplyLogOnInfo(tliCurrent)
Next tbCurrent

' Set the report source for the crystal
reports
' viewer to the report instance.

CrV.ReportSource = rptExpensiveProducts

' Zoom viewer to fit to the whole page so the
user can see the report
CrV.Zoom(2)


Pero cuando lo ejecuto me sale la siguiente ventana

informe principal
nombre de la tabla :rpttacticos;1
nombre del servidor :localhost
bases de datos :
id de inicio de sesion:reporte
contraseña :


completo los datos pero no me conecta siempre me dice
intente de nuevo
¿que me faltara para imprimir el reporte?