CRYSTAL REPORTS

DUHHH 09/05/2011 11:34:56
#373501

Bom dia galera.

Estou utilizando o vs2010. Quando eu chamo um relatorio, ele da um erro [Ô]Falha ao abrir a conexão[Ô]. Meu codigo para usar é esse :

Dim crtableLogoninfos As New TableLogOnInfos()
Dim crtableLogoninfo As New TableLogOnInfo()
Dim crConnectionInfo As New ConnectionInfo()
Dim CrTables As Tables
Dim CrTable As Table


Dim crReportDocument As New ReportDocument()



crReportDocument.Load([Ô]C:\Relatorio\Pessoas_Param.rpt[Ô])

crReportDocument.SetDatabaseLogon([Ô]skgi_lag[Ô], [Ô]4321[Ô])

With crConnectionInfo

.ServerName = [Ô]SQL2008[Ô]
.DatabaseName = [Ô]teste[Ô]
.UserID = [Ô]teste[Ô]
.Password = [Ô]4321[Ô]

End With


CrTables = crReportDocument.Database.Tables


For Each CrTable In CrTables

crtableLogoninfo = CrTable.LogOnInfo

crtableLogoninfo.ConnectionInfo = crConnectionInfo

CrTable.ApplyLogOnInfo(crtableLogoninfo)

Next

CrystalReportViewer1.ReportSource = crReportDocument


Nesse relatorio tem um parametro, mais só que o proprio CrystalReportViewer1 traz ele numa caixa com os valores de parametros. Eu não consigo fazer funcionar de forma alguma.

att.