CRYSTAL MYSQL

    Private Sub GerarRelatorio()
        [ô]definir as variáveis de conexão
        Dim dsPc As New RelClientes
        [ô]definir a string de conexão e as instruções sql para cada tabela
        Dim sqlCliente As String = [Ô]Select * From cadcli[Ô]
        Try
            [ô]Criar os objetos dataadatper
            Conexao.Conectar()
            Conexao.da = New MySqlDataAdapter(sqlCliente, Conexao.Conexao)
            [ô]Preenche as tabelas do dataset usando o dataadapter
            Conexao.da.Fill(dsPc, [Ô]cadcli[Ô])
            [ô]Preencher o relatório e exibí-lo no visualizador
            Dim rptCliente As New RelxCliente
            rptCliente.SetDataSource(dsPc)
            CrystalReportViewer.ReportSource = rptCliente
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        End Try
    End Sub

Citação:

Crio um DataSet para cada Relatorio, ou um unico DataSet contendo a representação completa do meu Banco, e depois uso ele em todos os meus rpts, filtrando somente o que desejo usar???

Citação:

Mais uma coisa....como fica se eu trocar o nome do DataBase na String de Conexao??? Pois o meu banco é identico em TODOS os meus Clientes....mas o Nome dos bancos sao todos diferentes...tem algum detalhe que eu tenha que me atentar nesse caso????