Cita:
Iniciado por E_Blue No estoy totalmente familiarizado con ADO, alguna vez leí algo pero era para VB6, ahora estoy con NET 2010.
Corregime si estoy equivocado, según entiendo lo que me estas diciendo es que rellene el datagrid por código sin los asistentes.
Si es así te comento que estoy rellenando ComboBox's por código y es bastante sencillo, lo que no se es como pasarle todos los resultados al DataGridView.
Te paso un ejemplo sencillo de una Funcion que me testea las ConnectionSTrings.
Código vb:
Ver originalPrivate Function TestCnnStr(ByVal CnnStrX As String) As Boolean
Try
Dim VersionMySQL As String = "-1"
Dim conn As New MySqlConnection(CnnStrX)
conn.Open()
Using cmd As New MySqlCommand()
cmd.CommandType = CommandType.Text
cmd.Connection = conn
Dim reader As MySqlDataReader
cmd.CommandText = "SELECT VERSION();"
reader = cmd.ExecuteReader()
If reader.HasRows Then
If reader.Read() Then
VersionMySQL = reader("VERSION()")
End If
reader.Close()
End If
End Using
Return True
Catch ex As Exception
PrintLog(ex.Message)
Return False
End Try
End Function
Si me puedes sugerir como pasarle los datos del DataReader al DataGridView te lo agradeceré.
Bueno yo me refiero a ADO .NET
Tu codigo de validacion se vee bien pero cual es tu codigo de como piensas llenar tu datagridview si en caso no lo tienes mira este ejemplo:
Código vb:
Ver originalTry
Dim VersionMySQL As String = "-1"
Dim conn As New MySqlConnection(CnnStrX)
Dim Adp as New MySqlDataAdapter
Dim datos as new DataTable
conn.Open()
Using cmd As New MySqlCommand()
cmd.CommandType = CommandType.Text
cmd.Connection = conn
cmd.CommandText = "SELECT VERSION();"
Adp.SelectCommand = cmd
Adp.Fill(datos,"x")
datagridview1.DataSource = datos
If reader.HasRows Then
If reader.Read() Then
VersionMySQL = reader("VERSION()")
End If
reader.Close()
End If
End Using
Return True
Catch ex As Exception
PrintLog(ex.Message)
Return False
End Try