Crystal 6: Relatório não abre banco
Pessoal,Quando rodo no meu micro, tá tudo certo. Quando rodo o setup e rodo a aplicação em outro micro, dá o erro: 20533 - Unable to open database.O fonte tá assim:With RptValMon.ReportFileName = CaminhoRelatorio.Password = "xxxxxxx"sSelection = sSelection & "{Emp.Rzs} = '" & gsSite_Name & "'"'com ou sem produto selecionadoIf CmbProd.ListIndex > 0 ThensSelection = sSelection & " and {Ps.ChvPs} = " & CmbProd.ItemData(CmbProd.ListIndex)End IfIf txtCod.Text <> "" And txtDesc.Text <> "" ThensSelection = sSelection & " and {Ps.Cod} = '" & txtCod.Text & "'"End If'materia-prima e produto acabadoIf ChkMatPrima.Value = vbChecked ThensSelection = sSelection & " and {Ps.Tipo_Ps} = 'M'"End IfIf ChkProdAcab.Value = vbChecked ThensSelection = sSelection & " and {Ps.Tipo_Ps} = 'P'"End If'com estoque abaixo de zeroIf ChkAbaixoZero.Value = vbUnchecked ThensSelection = sSelection & " and {Ps.QtdDisp} >= 0"End IfIf Trim(sSelection) <> Empty Then.SelectionFormula = sSelectionEnd If.Formulas(1) = "Empresa = '" & gsSite_Name & "'".Formulas(2) = "CaminhoArquivo = '" & CaminhoRelatorio & "'"' .Connect = "DSN=;UID=;PWD=xxxxxxx"' .Password = "xxxxxxx".Action = 1End WithAlguma dica???www.letrasdemusicas.k6.com.br
Discussão (2)
Carregando comentários...