Ver Mensaje Individual
  #1 (permalink)  
Antiguo 09/01/2013, 13:50
gusanosxr
 
Fecha de Ingreso: junio-2012
Ubicación: Santiago de Chile
Mensajes: 164
Antigüedad: 12 años, 9 meses
Puntos: 1
Novato autodidacta

TENGO ESTE CÓDIGO PARA LLENAR UN COMBOBOX Y NO ME SALTA AL SIGUIENTE RESULTADO, ALGUIEN QUE ME PUEDA AYUDAR???

DE ANTEMANO MUCHAS GRACIAS...

AHHHH ES PARA UN WINDOWS FORMS

Código PHP:

Private Sub principal_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load

        
Try
            
conector.Open()
        Catch 
ex As Exception
            MsgBox
(ex.Message)
        
End Try
        
Dim adaptor As New MySqlDataAdapter
        Dim consulta 
"SELECT sucursal FROM sucursal_ip"
        
Dim comando As New MySqlCommand
        comando
.Connection conector
        comando
.CommandText consulta
        adaptor
.SelectCommand comando
        Dim misdatos 
As MySqlDataReader
        misdatos 
comando.ExecuteReader
        
If misdatos.HasRows True Then
            misdatos
.Read()
            Do While 
Not misdatos.HasRows False
                sucursal
.Items.Add(misdatos.GetValue(0))
                
misdatos.NextResult()
            
Loop
        End 
If
    
End Sub
End 
Class