WET
|
TABOÃO DA SERRA
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 03/01/2008 10:54 hs
Amigos bom dia. Gostaria de ajuda de vocês mais uma vez. Tenho uma aplicação em VB6 com base em Access, meus reletórios estão em Crystal 8.0. Bom neste relatório fiz a conexão via ODBC ( não sei se foi a melhor escolha ),na minha máquina onde fiz o projeto funciona normal, mas quando instalo em outro PC me aparece a mensagem "Server has not yet been opened". Tentei registrar ODBC mas mesmo assim continua o problema. Alguem poderia me ajudar ? Segue o código que chama o relatório : Obrigado a todos. : Private Sub cdmImprimir_Click()
Set crApplication = New CRAXDRT.Application
Set Vg_Report = crApplication.NewReport
Set Vg_Report = crApplication.OpenReport(App.Path & "RelatoriosRelClientes.rpt")
Vg_Report.RecordSelectionFormula = "Not IsNull({Cliente.Data_Admissao}) And Year({Cliente.Data_Admissao}) <> 1900"
frmVisao.Show vbModal
Set Vg_Report = Nothing
Set crApplication = Nothing
End Sub |
|
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
Postada em 03/01/2008 12:56 hs
posta como você fez essa conexão pois o problema está nela e não no botão imprimir |
|
|
|
|
|
Postada em 03/01/2008 13:26 hs
Ok. No Windows : Painel de Controle Ferramentas Administrativas Fontes de Dados (ODBC) Fonte de dados do sistema Adicionar Driver MS Access(*.mdb) Selecionei o caminho No Crystal exolhi a Base ODBC Desculpe é isso que gostaria de saber ? |
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/01/2008 17:34 hs
tenta fazer essa conexão no braço ex: ' no general Dim CNN As ADODB.Connection
Dim RST As ADODB.Recordset ' agora no load do form: Set CNN = New ADODB.Connection
Set RST = New ADODB.Recordset
CNN.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\testecabeca.mdb"
tenta dessa forma e retorne ppra dizer se deu certo lógico adpte ao seu programa até + |
|
|
|
WET
|
TABOÃO DA SERRA
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/01/2008 21:03 hs
Ok Treze, muito obrigado pela atenção, como é no trabalho amanha cedo testarei e aviso. Obrigado mais uma vez. |
|
|
|
WET
|
TABOÃO DA SERRA
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 04/01/2008 08:35 hs
Treze, bom dia. Encontrei o problema, na verdade era o nome do ODBC que coloquei no Windows que estava errado, mudei agora esta funcionando. Só não sei se esta é a melhor maneira, trabalhar com o ODBC, antes eu programava com Clipper ainda estou meio com a visão antiga, preciso me desvencilhar logo (rsrsrs) Mas obrigado pela atenção. Aproveitando vc. sabe como trabalhar com Logotipo em relatório ? ou seja, no cadastro de cliente informar qual é o logotipo e este sair no relatório ? Obrigado mais uma vez. |
|
|
|
