[VB 6] Crystal Reports 10 DEV + SQL 2005

mercoledì 02 aprile 2008 - 15.34

anza Profilo | Newbie

Ciao a tutti,

innanzi tutto ho VB6 con CR10DEV e mi collego ad un server sql 2005 con SQL native Client. Prima avevo CR8,5 e nessun problema, adesso sono passato alla 10

Quando cerco di aprire il report mi si apre sempre una finestra aggiuntiva che mi richiede delle informazioni di connessione (deve essere di cr10)

cmq vi posto il codice

Dim crAPP As New CRAXDDRT.Application
Dim Report As CRAXDDRT.Report
Dim tbl As CRAXDDRT.DatabaseTable

Set Report = crAPP.OpenReport("c:\pianificazione.rpt")


For Each tbl In Report.Database.Tables

With Report.Database.Tables(1).ConnectionProperties
.Item("Provider") = "SQL Native Client"
.Item("Data source") = Reportserver
.Item("Initial Catalog") = ReportDB
.Item("User ID") = ReportLogin
.Item("Password") = ReportPassw
End With

Next
Report.RecordSelectionFormula = "{Report_Pianificazione.Identificativo} = '" & Text1 & "'"
Report.PaperOrientation = crLandscape
cr1.ReportSource = Report
cr1.ViewReport

Ogni volta mi viene sempre chiesto in fase esecutiva di inserire nuovamente i dati per la connessione. Deve essere errata la sezione di connessione. Potete aiutarmi ?????

freeteo Profilo | Guru

ciao,
potrebbe essere un problema di "Location", ovvero è rimasta settata quella proprieta' della Tabella del report, prova ad impostarla a "", oppure al nuovo path, come spiego qui:
http://www.dotnethell.it/forum/messages.aspx?ThreadID=5303


ps: per problemi di reportistica meglio che posti qui:
http://www.dotnethell.it/forum/Crystal-Reports.aspx
cosi' hai maggiore visibilita'.

grazie

ciao.

Matteo Raumer
[MCAD .net]
http://blogs.dotnethell.it/freeteo

anza Profilo | Newbie

Ho letto gli altri post, ma niente non sono riuscito.

Dev o spostare la discussione ??

freeteo Profilo | Guru

>Ho letto gli altri post, ma niente non sono riuscito.
quindi impostando la location corretta non va ugualmente?


>Dev o spostare la discussione ??
no no era solo per le prossime

ciao.

Matteo Raumer
[MCAD .net]
http://blogs.dotnethell.it/freeteo

anza Profilo | Newbie

Non sono riuscito ad impostarlo

anza Profilo | Newbie

OK Trovato !!!!!!!!!!!!!!!!!


Set Report = crApp.OpenReport("c:\esempio.rpt")
Report.EnableAsyncQuery = True
Report.DiscardSavedData

Me.cr1.ReportSource = Report

For X = 1 To Report.Database.Tables.Count
Report.Database.Tables.Item(X).ConnectionProperties.DeleteAll
Report.Database.Tables.Item(X).ConnectionProperties.Add "Provider", "SQLNCLI"
Report.Database.Tables.Item(X).ConnectionProperties.Add "Data Source", Reportserver
Report.Database.Tables.Item(X).ConnectionProperties.Add "Database", ReportDB
Report.Database.Tables.Item(X).ConnectionProperties.Add "User ID", ReportLogin
Report.Database.Tables.Item(X).ConnectionProperties.Add "Password", ReportPassw
Report.Database.Tables.Item(X).ConnectionProperties.Add "UseDSNProperties", True
Next X

freeteo Profilo | Guru

ok,
quindi il problema era impostare questi dati per tutte le tabelle, oppure il fatto di cancellare e aggiungere le proprieta' di connessione?

ciao.

Matteo Raumer
[MCAD .net]
http://blogs.dotnethell.it/freeteo
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5