• Viernes 29 de Marzo de 2024, 10:51

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - osyaemosda

Páginas: [1]
1
MySQL / MySQL + VB.NET + Nube (Hoo.st)
« en: Domingo 26 de Marzo de 2017, 17:37 »
Saludos,
Soy nuevo en el foro y mi nombre es Oscar Velásquez G.
Quería hacerles una consulta, alguno por casualidad ha echo una aplicación en VB.NET + MySQL y que la base de datos este en la nube? (Hosting).
Tengo problemas para conectarme, les adjunto el código y el mensaje de error que arroja.
Cualquier consulta a la orden.
Suerte,

Imports MySql.Data.MySqlClient
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            Dim conexion As New MySqlConnection
            conexion = New MySqlConnection()
            conexion.ConnectionString = "server=XXX.XX.XXX.XXX;database=XXXXX;user id=XXXXX;password=XXXXX;port=;connect timeout=30;"
            conexion.Open()
            MessageBox.Show("Conectado al servidor")
            Exit Sub
        Catch ex As MySqlException
            MessageBox.Show("No se ha podido conectar al servidor: " & Err.Number & " / " & Err.Description & " / " & Err.Source)
        End Try
    End Sub
End Class

2
VB .NET / Conectar VB.NET con MySql en la nube (Hoo.st)
« en: Domingo 26 de Marzo de 2017, 15:41 »
Saludos,
Soy nuevo en el foro, mi nombre es Oscar Velásquez G.
Para comenzar tengo una base de datos MySql en la nube, estoy utilizando el hosting Hoo.st.
Estoy haciendo unas pruebas con VB.NET desde mi escritorio para conectarme y no lo he logrado.
Cualquier consulta estoy a sus ordenes.
Suerte,

Imports MySql.Data.MySqlClient
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            Dim conexion As New MySqlConnection
            conexion = New MySqlConnection()
            conexion.ConnectionString = "server=XXX.XX.XXX.XXX;database=XXXXX;user id=XXXXX;password=XXXXX;port=;connect timeout=30;"
            conexion.Open()
            MessageBox.Show("Conectado al servidor")
            Exit Sub
        Catch ex As MySqlException
            MessageBox.Show("No se ha podido conectar al servidor: " & Err.Number & " / " & Err.Description & " / " & Err.Source)
        End Try
    End Sub
End Class


Páginas: [1]