seguinte, todo o sistema esta legal, so esta faltando os relatorios. preciso conseguir isto urgente...
vb6 + mysql + crystal 8,5
tenho o relatorio no crystal, e toda vez q eu clico no botao para chama-lo, retorna a seguinte mensagem:
Run-time error '20599':
Cannot open SQL Server
'-----------------------------------------------------
ainda nao consegui fazer abrir o rel....
minha string é:
Dim usr_id As String
Dim pass As String
Dim mySqlIP As String
Dim opt As String
Dim drv As String
Dim db As String
mySqlIP = Base_Dados.Recordset!ip
usr_id = Base_Dados.Recordset!Nome
pass = Base_Dados.Recordset!Senha
opt = Base_Dados.Recordset!Option
drv = Base_Dados.Recordset!Drive
'db = Base_Dados.Recordset!Database
db = "clientes"
StrCliente.Text = "DRIVER=" & drv & ";user=" & usr_id & ";password=" & pass & ";server=" & mySqlIP & ";option=" & opt & ";database=" & db & ""
'=======================================================
e o comando q esta chamando o rel está assim:
CrystalReport1.Connect = frmBase.StrCliente.Text
CrystalReport1.WindowState = crptMaximized
CrystalReport1.Destination = 0
CrystalReport1.ReportFileName = "c:sistemacliente_total_alfabetica.rpt"
CrystalReport1.SortFields(0) = "+{ado.nome}"
CrystalReport1.Action = 1
'======================================================
como devo fazer neste comando para chamar este relatorio, para fazer ele abrir corretamente sem dar este erro...
por favor, se alguem puder me ajudar...
obrigado...