none
Ajuda no Report RRS feed

  • Pergunta

  • Bom dia, entao e o seguinte,

    Vou iniciar agora com reports, mas nunca trabalhei com isto.
    Tive a Explorar no Visual Studio e a pesquisar na internet e falam em Crystal Reports, mas como tenho uma versao express do Visual Studio 2010 nao tenho o Crystal Reports, mas Tenho o Report Wizard.

    A minha duvida e a seguinte, tenho uma conectionstring num documentos txt dentro da pasta bin, na raiz da aplicaçao, mas quando eu crio um novo Report Wizard aquilo pede-me para criar uma conectionString nova, como posso fazer para utilizar a connectionString que já tenho? Como posso fazer para efectuar os selects para poder colocar os valores no Report Viewer.

    Cumprimentos

    • Tipo Alterado Ricardo Oneda quinta-feira, 27 de janeiro de 2011 12:50
    • Movido Eder Costa quinta-feira, 17 de fevereiro de 2011 12:17 Processos de relatorios (De:VB.NET e Visual Basic)
    quinta-feira, 27 de janeiro de 2011 11:59

Respostas

Todas as Respostas

  • Cara, tire uma base desse codigo abaixo... 

     

    Tente setar a conexão via codigo...

     

     Private Sub SetDBLogonForReport(ByVal Conexao As ConnectionInfo)

     

            CRreport.SetDatabaseLogon(Conexao.UserID, Conexao.Password, _

                                        Conexao.ServerName, Conexao.DatabaseName)

     

            'Tabela ou procedure do relatório principal

            For Each tab As Table In CRreport.Database.Tables

                tableLogon = tab.LogOnInfo

                tableLogon.ConnectionInfo = Conexao

                tab.ApplyLogOnInfo(tableLogon)

                If (tab.Location <> Conexao.DatabaseName & ".dbo." & tab.Name) Then

                    tab.Location = Conexao.DatabaseName & ".dbo." & tab.Name

                End If

            Next

     

            'Tabela ou procedure dos sub-reports (se existir)

            For Each subrep As ReportDocument In CRreport.Subreports

     

                subrep.SetDatabaseLogon(Conexao.UserID, Conexao.Password, _

                                            Conexao.ServerName, Conexao.DatabaseName)

                For Each tab As Table In subrep.Database.Tables

                    tableLogon = tab.LogOnInfo

                    tableLogon.ConnectionInfo = Conexao

                    tab.ApplyLogOnInfo(tableLogon)

                    If (tab.Location <> Conexao.DatabaseName & ".dbo." & tab.Name) Then

                        tab.Location = Conexao.DatabaseName & ".dbo." & tab.Name

                    End If

                Next

     

            Next

     

        End Sub

    segunda-feira, 14 de fevereiro de 2011 11:54
  • Marco,

    Sugiro que você dê uma olhada no site http://www.gotreportviewer.com ... Lá você vai encontrar diversos tutoriais sobre o Report Viewer e acredito que você vai conseguir solucionar sua dúvida seguindo os exemplos lá disponíveis...


    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima
    quinta-feira, 17 de fevereiro de 2011 14:15
    Moderador