Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it
    Registrato dal
    Dec 2005
    Messaggi
    87

    [VB 6] Crystal Reports 10

    Ciao a tutti,

    innanzi tutto ho VB6 con CR10 e mi collego ad un server sql 2005 con SQL native Client.

    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


    VORREI CHE QUESTA FINESTRA NON FOSSE VISUALIZZATA

    grazie

  2. #2
    Utente di HTML.it
    Registrato dal
    Dec 2005
    Messaggi
    87
    Penso che il problema sia in questa sezione:


    ...
    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
    ....

  3. #3
    Utente di HTML.it
    Registrato dal
    Dec 2005
    Messaggi
    87
    Problema risolto:

    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).ConnectionPropertie s.DeleteAll
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "Provider", "SQLNCLI"
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "Data Source", Reportserver
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "Database", ReportDB
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "User ID", ReportLogin
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "Password", ReportPassw
    Report.Database.Tables.Item(X).ConnectionPropertie s.Add "UseDSNProperties", True
    Next X

  4. #4
    Utente di HTML.it L'avatar di Kahm
    Registrato dal
    Dec 2004
    residenza
    Rome
    Messaggi
    3,584
    è una cosa che noto solo io
    oppure più passa il tempo e più mi accorgo che ai problemi di crystal report non risponde mai nessuno?
    http://forum.html.it/forum/search.ph...by=&sortorder=

    strano ma vero, forse sta diventando fuori uso
    io perfino ho smesso di usarlo 3 anni fa per un'altro tool che (secondo me) è piu facile da usare
    NN vi diro mai chi sono in realta,
    tutti i miei 3D sono orfani, non insistete per farmi rispondere ai 3D aperti da me

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.