Ver Mensaje Individual
  #6 (permalink)  
Antiguo 06/07/2005, 16:44
Avatar de GeoAvila
GeoAvila
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 20 años, 5 meses
Puntos: 53
si lo bas a hacer con ado seria algo asi...

esta una conexion hacia mysql
Código:
    Dim AdoS As New Recordset
    Dim Cxn As Connection
    Dim CxnFac As String
    Set Cxn = New Connection
    Cxn.CursorLocation = adUseClient
    CxnFac = "Driver={MySQL ODBC 3.51 Driver};Server=10.10.10.50;Port=3306;Option=131072;Stmt=;Database=recepfac;Uid=miusert;Pwd=mipass;"
    Cxn.Open CxnFac ' Abrimos la conexion
    Set AdoS = New Recordset
    AdoS.Open "Select * From clientes", Cxn, adOpenStatic, adLockOptimistic ' Abrimos el REcordset y esta listo para usar
    MsgBox AdoS!nombre
nos vemos..
__________________
* Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila