Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it
    Registrato dal
    Oct 2008
    Messaggi
    173

    [vb.net] reporting services express di Microsoft

    Ho trovato nel forum il seguente codice

    codice:
    Imports System.Data
    Imports Microsoft.Reporting.WinForms
    
    Public Class Form1
        
    Private Sub ReportViewerOledb(ByVal strRep, ByVal strProv)
            Dim MyReport As New Microsoft.Reporting.WinForms.ReportViewer
    
            ''Set RDL file. 
            MyReport = ReportViewer1
            MyReport.LocalReport.ReportPath = strRep
    
            '' Supply a DataTable corresponding to each report 
            '' data source. 
            Dim cmdReport As New OleDb.OleDbCommand
            Dim drReport As OleDb.OleDbDataReader
            Dim conReport = New OleDb.OleDbConnection
            Dim dsReport As New ClientiDataSet
            conReport.ConnectionString = strProv
            cmdReport.CommandType = CommandType.Text
            cmdReport.CommandText = "Select codice, Nome, codice & space(1) & Nome as [File Excel]from clienti where nome=" & "'" & TextBox1.Text & "'"
            cmdReport.Connection = conReport
            conReport.Open()
            drReport = cmdReport.ExecuteReader()
            dsReport.Tables(0).Load(drReport)
            drReport.Close()
            conReport.close()
            MyReport = ReportViewer1
            Dim rds As New ReportDataSource
            rds.Name = "DataSource1"
            rds.Value = dsReport.Tables(0)
            MyReport.LocalReport.DataSources.Add(rds)
            If conReport.state = ConnectionState.Open Then
                conReport.close()
            End If
            Me.ReportViewer1.RefreshReport()
        End Sub
        
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            ReportViewerOledb(My.Application.Info.DirectoryPath & "\Report2.rdl", Me.ClientiTableAdapter.Connection.ConnectionString)
        End Sub
    
        
    End Class
    che valori devono avere i parametri; o meglio dove li prendo?

    Grazie
    Massimiliano

  2. #2
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244
    A parte che i parametri dichiarati così

    codice:
    ByVal strRep, ByVal strProv
    non vanno bene, in quanto non essendo tipizzati si rischia di passare valori non corretti senza accorgersene, si capisce comunque che dovrebbero essere di tipo String.

    Ora, è sufficiente guardare il codice della routine per capire cosa sono:

    codice:
    MyReport.LocalReport.ReportPath = strRep
    conReport.ConnectionString = strProv
    non ci vuole molto a capire cosa sono e a cosa servono .

    Riguardo al sapere
    dove li prendo?
    noi di certo non possiamo dirtelo.
    Dovrai prepararteli PRIMA, in base agli Oggetti e Proprietà con cui andranno utilizzati.


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.