Publicados por kjy18

Sabia que se iva apicar uno :trollface:

:mem11: ----------------------------------------->

**Hola Soy kjy18 y me la paso trabajando con Visual Basic

Hoy les vengos a mostra una Función para Conectar Con una Base de Datos Mysql
USando un Formulario o con datos Preestablecido en la función

Aqui Tenemos el Código modificado por mi Para Conectar usando un Formulario

Imports MySql.Data.MySqlClient

Dim conex As MySqlConnection

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
conex = New MySqlConnection
conex.ConnectionString = "server=" & textbox1.Text & ";" _
& "user id=" & textbox2.Text & ";" _
& "password=" & textbox3.Text & ";" _
& "database=" & Textbox4.Text
Try
conex.Open()
MessageBox.Show("Se ha Conectado Correctamente con la Bases de Datos")
conex.Close()
Catch mierror As MySqlException
MessageBox.Show("Error No se ha Podido Conectar con la Base de Datos: " & mierror.Message & vbExclamation)
Finally
conex.Dispose()
End Try
End Sub

Para el Form (diseño) Agreguen 4 Cajetines de texto:

• una para colocar la ip o Host al que se quiere conectar
• una el usuario Mysql y otra para la contraseña
• y otra para la base de datos a Conectar

Y un Botón Donde Estara la Función el codigo Dado anteriormente

Tambíen Podemos hacer la Conexion con los Datos ya Preestablecidos en la función del programa

Imports MySql.Data.MySqlClient

Dim conex As MySqlConnection

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
conex = New MySqlConnection
conex.ConnectionString = "server=Host/ip" ";" _
& "user id=UserDB" ";" _
& "password=ContraseñaDB" ";" _
& "database=Base de Datos"
Try
conex.Open()
MessageBox.Show("Se ha Conectado Correctamente con la Bases de Datos")
conex.Close()
Catch mierror As MySqlException
MessageBox.Show("Error No se ha Podido Conectar con la Base de Datos: " & mierror.Message & vbExclamation)
Finally
conex.Dispose()
End Try
End Sub

Listo para Solo con dar Clik al Botón para hacer la conexion sin necesidad de rellenar algo.**

Nota: Deben Descar Mysql Conector para que Visual Basic Importe Las .dll para realizar la conexion
Aqui les dejo el Mysql Conector http://mysql-connector-net.updatestar.com/es/a/6.1.2

http://coregamerz.org/index.php?action=post;msg=352;topic=95.0

:icon_eek: :icon_eek: :icon_eek: :icon_eek: :icon_eek: :icon_eek:

Ha Renacido Kurt Sabia que no habai Muerto :fuckyea: esta en Todos en Todos Los que Creyeron en el

S-Lente MHE a JUSTADO HOYGA :wiii:

Me la voy a colocar

Agrega MAs Ram a la maquina Virtual e.e minimo 1gb

[http://www.taringa.net/posts/info/11504850/Abrir-Puertos-Huawei-HG530-Infinitum-_puertos-internos_.html][0]">[http://www.taringa.net/posts/info/11504][1] ... rnos_.html

leete esa guia...

[0]: <a href=
[1]: http://www.taringa.net/posts/info/11504

solo hay un Explicación Lógica para Tu sueño

No conecta o no te slaen time Outs ???? XDD Por los time Outs no Te preocupes

si tienes mas problemas Agrega mi skype: yepezkjy18

Serpentura de Mordiente :icon_mrgreen: