Elaborei um relatório no crystal 8.0 acessando o banco sql server 2000, pelo cristal esta tudo ok, mas quando tento abrir ele pelo vb6 esta dando erro, estou usando esses comandos para abrir o relatório no vb:

rptRelatorio.ReportFileName = App.Path & "Apropriação de Homem-Hora.rpt"
rptRelatorio.Action = 1

E o Erro que esta dando na linha de baixo é:

Run-Time error '20599':

Cannot open SQL Server.

 

Mas quando eu usava o access para fazer os relatórios esse comando para abrir os relatórios dava certo, estranho

 

Obrigado

Paulo Ricardo

Olá,

 

Para trabalhar com o Crystal usando SQL Server você deverá especificar a conexão na propriedade Connect do controle do Crystal:

 

rptRelatorio.Connect = "<Sua String de Conexão>"

 

um abraço,

Sandro.

Coloquei a string de conexão conforme abaixo, mesmo assim continua dando o mesmo erro.

VARSERVER = "192.168.0.101"

VARBANCO = "SMO"

rptRelatorio.Connect = "Provider=SQLOLEDB.1;Password=96160635;Persist Security infotec=True;User ID=sa;Initial Catalog=" & VARBANCO & ";Data Source=" & VARSERVER
rptRelatorio.ReportFileName = App.Path & "Apropriação de Homem-Hora.rpt"
rptRelatorio.Action = 1

Obrigado

Paulo Ricardo