hola buenas
tengo el siguiente error:
---------------------------
Logon failed.
Details: HY000:[MySQL][ODBC 3.51 Driver]Acceso negado para usuario: 'root'@'192.168.0.238' (Usando clave: SI)
---------------------------
el codigo q estoy utilizando es el siguiente:
----------------------------------------------------
Dim CrxInfor As CRAXDRT.Report
Dim CrxApp As New CRAXDRT.Application
Form1.rs.Open "SELECT lote_id FROM lote WHERE lote_nombre='" & agruparlotes.listalotes.Text & "'", Form1.conn, adOpenStatic, adLockOptimistic
idlote = Form1.rs.Fields("lote_id")
Form1.rs.Close
Set CrxApp = CreateObject("CrystalRuntime.Application")
Set CrxInfor = CrxApp.OpenReport("c:\reportes\Lotes.rpt")
CrxInfor.DiscardSavedData
With CrystalActiveXReportViewer1
.ReportSource = CrxInfor
.EnableExportButton = True
.DisplayGroupTree = False
.EnablePopupMenu = False
.EnableDrillDown = False
.EnableSelectExpertButton = False
.ViewReport
.Zoom 100
End With
-----------------------------------------------------------
como puedo evitar que aparesca este error...
muchas gracias
