Qual é o comando para conectar o relatório ao banco de dados dentro da chamada no VB 6?
Meu fonte está assim:
Dim crAppl As CRAXDRT.Application
Dim crRep As CRAXDRT.Report
Set crAppl = New CRAXDRT.Application
Set crRep = crAppl.OpenReport(GS_Path & "Relatorio\" & PS_NomeRelatorio, 0)
crRep.Database.LogOnServer "p2ssql.dll", GS_Server, GS_Database, GS_Login, GS_Pass
crRep.RecordSelectionFormula = "{EMPRESA.EMP_CODIGO} = '" & GS_Empresa & "'"
CRViewer.ReportSource = crRep
CRViewer.ViewReport
Quando eu altero algum registro, o relatório é impresso desatualizado. Eu preciso do comando que atualiza os dados do relatório no momento da chamada (em execução).
Ahh, meu banco é o SQL Server 2000.
Espero que alguém possa me ajudar com esse problema.
Question
Arles Júnior
Qual é o comando para conectar o relatório ao banco de dados dentro da chamada no VB 6?
Meu fonte está assim:
Dim crAppl As CRAXDRT.Application Dim crRep As CRAXDRT.Report Set crAppl = New CRAXDRT.Application Set crRep = crAppl.OpenReport(GS_Path & "Relatorio\" & PS_NomeRelatorio, 0) crRep.Database.LogOnServer "p2ssql.dll", GS_Server, GS_Database, GS_Login, GS_Pass crRep.RecordSelectionFormula = "{EMPRESA.EMP_CODIGO} = '" & GS_Empresa & "'" CRViewer.ReportSource = crRep CRViewer.ViewReportQuando eu altero algum registro, o relatório é impresso desatualizado. Eu preciso do comando que atualiza os dados do relatório no momento da chamada (em execução).
Ahh, meu banco é o SQL Server 2000.
Espero que alguém possa me ajudar com esse problema.
Abraços
Arles Júnior
Link to comment
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.