Cómo conectarse a la base de datos MySQL usando vb

Cómo conectar datos MYSQL con VB

Categoría de blog:

VB

VBMySQLSQLServerSQLSocket

Paso uno: Internet como nuevo ADODB.Connection

Dim rs como nuevo ADODB.Recordset

' Definir variable de cadena de conexión de base de datos

Dim strCn como cadena

' Definir variables de parámetros de conexión de base de datos

Atenuar db_host como cadena

Atenuar db_user como cadena

Atenuar db_pass como cadena

Atenuar db_data como Cadena

' Definir variables de instrucción SQL

Atenuar sql como cadena

' Inicializar variables de conexión de base de datos

db_host = "localhost" < / p>

db_user = "root"

db_pass = ""

db_data = "erqiuda"

' Parámetros de conexión MySQL ODBC

'+----------------+---------------------+------- --- ------------------------+

'| Nombre del parámetro | Valor predeterminado | p>' +------------+--------------------------------- --- ------------------–+

'| usuario ODBC (en Windows) | nombre de usuario MySQL| '| servidor | localhost | Dirección del servidor MySQL |

'| Base de datos predeterminada

'| p>

'| puerto | 3306 | Puerto de conexión |

'| Una declaración, que se puede ejecutar después de conectarse a la base de datos | | contraseña de usuario de MySQL |

'| socket | (omitido)

'+------------+------- --------- -+------------------------------ ----+

' Ver instrucciones oficiales para más detalles

' .Open strCn

' Establezca esta propiedad para que las propiedades recordcount y absolutapage estén disponibles

cn.CursorLocation = adUseClient

' Acceder a los usuarios de la tabla

sql = "seleccionar * de los usuarios"

rs.Open sql, cn

MsgBox rs.RecordCount