Caracteres extraños consulta tabla dbf en datagridview

11/05/2010 - 07:20 por Hugo Gsell | Informe spam
Hago una consulta sobre una tabla dbf
y lo pongo en una grilla.
Aparecen caracteres extraños en la grilla.
Lo que me complica para la búsqueda... ue estoy programando dentro del
DataGridView



Dim sBase As String = DirectorioActual
Dim sSelect As String
sSelect = "SELECT * from mitabla"
Dim sConn As String
sConn = "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛF;SourceDB=" & _
System.IO.Path.GetDirectoryName(sBase) & ";"
Using dbConn As New System.Data.Odbc.OdbcConnection(sConn)
Try
dbConn.Open()
Dim da As New System.Data.Odbc.OdbcDataAdapter(sSelect,
dbConn)
Dim dt As New DataTable
da.Fill(dt)
Grid.DataSource = dt
dbConn.Close()
Catch ex As Exception
MessageBox.Show("Error al abrir la base de datos" &
vbCrLf & ex.Message)
Exit Sub
End Try
End Using

Hugo
 

Leer las respuestas

#1 Hugo Gsell
11/05/2010 - 13:40 | Informe spam
Agrego mas datos.
Si bien aparecen caracteres extraños... el problema particular es que
hay un par de registros que, cuando hago el select y le hago el binding
al datagridview apararecen despues de la Z cuando ordeno alfabético.
El problema me surge al reordenar los mismos utilizando el método SORT
del propio datagridview, que me lo deja al principio.

No puedo aplicar el orden cada ves a la tabla y hacerle el binding de
nuevo porque tarda demasiado.


El 11/05/2010 02:20, Hugo Gsell escribió:
Hago una consulta sobre una tabla dbf
y lo pongo en una grilla.
Aparecen caracteres extraños en la grilla.
Lo que me complica para la búsqueda... ue estoy programando dentro del
DataGridView



Dim sBase As String = DirectorioActual
Dim sSelect As String
sSelect = "SELECT * from mitabla"
Dim sConn As String
sConn = "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛF;SourceDB=" & _
System.IO.Path.GetDirectoryName(sBase) & ";"
Using dbConn As New System.Data.Odbc.OdbcConnection(sConn)
Try
dbConn.Open()
Dim da As New System.Data.Odbc.OdbcDataAdapter(sSelect, dbConn)
Dim dt As New DataTable
da.Fill(dt)
Grid.DataSource = dt
dbConn.Close()
Catch ex As Exception
MessageBox.Show("Error al abrir la base de datos" & vbCrLf & ex.Message)
Exit Sub
End Try
End Using

Hugo

Preguntas similares