VB6 & MYSQL, Interfaz para el manejo de la BD

[asitudela]

Hola, después de leerme la FAQ y el otro aviso importante, también he buscado y leído cada post del tema...

Ya que tanta gente ha escrito sobre cómo crear una interfaz para el manejo de una BD de MYSQL, porque no se brinda alguien a pasar el código fuente.

También hay la posibilidad que ya esté puesto por algún lado, alguien sabe?

Saludos

[GeoAvila]

bueno yo lo realizo de la siguiente manera:

Código:

Dim AdoS As New Recordset
Dim Cxn As Connection
Dim CxnFac as String
CxnFac = "Driver={MySQL ODBC 3.51 Driver};Server=192.168.0.1;Port=3306;Option=131072;Stmt=;Database=TuBASE;Uid=TuUsuario;Pwd=TuContrasena";"
Cxn.Open CxnFac ' Abrimos la conexion
Set AdoS = New Recordset 
AdoS.Open "SELECT `cxc`.`no_factura`, `cxc`.`nit_cliente`, `cxc`.`no_ingreso`, `cxc`.`fecha`, `cxc`.`total`, `cxc`.`descripcion`, `cxc`.`observaciones`, `cxc`.`cancelado` FROM `cxc` WHERE (`cxc`.`cancelado` = 0) AND (`cxc`.`nit_cliente` = '" & Nit & "') ORDER BY `cxc`.`fecha`", Cxn, adOpenStatic, adLockOptimistic ' Abrimos el REcordset y esta listo para usar

nos vemos espero te sirva el ejemplo..

[polielb]

GEOAVILA, te comento que instale un SQLserver Personal Edition en mi maquina con WIN98 y me tira error de autenticacion. En el service manager se conecta con sql server y otro que dice agent o algo asi, lo que necesito es crear una coneccion en el dentro del Enterprise Manager, cual es el problema cuando se crea ese nuevo group y da error de autenticacion y demas ???? GRACIAS

[GeoAvila]

Instala mejor el Mysql es gratis y ademas es en el que trabajo yo te puedo echar una mano con ese, y slqserver te servira unicamente mientras tu maquina no tenga virus por otra parte el mysql lo pode poner en unix.

aunque podrias describir mas acerca del error que da..