No such table SQLITE
Publicado por Neo (16 intervenciones) el 29/10/2009 21:43:46
Buenas,tengo un problema que no me deja avanzar. Cuando intento conectar la base de datos (hecha con SQLite Database Browser) para que cargue en un datagridview me sale el error "no such table" y no sé a que puede ser debido. Dejo el código para ver si me podeis ayudar. Gracias
strConexion = "Data Source=" & AppDomain.CurrentDomain.BaseDirectory & "\Db1.db"
Try
'Abrimos la conexión
cn = New SQLiteConnection(strConexion)
cn.Open()
Catch ex As Exception
MessageBox.Show("Error al abrir la conexión:" & vbCrLf & ex.Message)
Exit Sub
End Try
ds = New Data.DataSet
Ssql = "SELECT * FROM Clientes"
da = New SQLiteDataAdapter(Ssql, cn)
'Cargamos el DataSet
Try
da.Fill(ds, "Clientes")
Catch ex As Exception
MessageBox.Show("Error al cargar el DataSet:" & vbCrLf & ex.Message)
End Try
DataGridView3.DataSource = ds.Tables("Clientes")
Try
'Cerramos la conexión
cn = New SQLiteConnection(strConexion)
cn.Close()
Catch ex As Exception
MessageBox.Show("Error al cerrar la conexión:" & vbCrLf & ex.Message)
Exit Sub
End Try
End Sub
strConexion = "Data Source=" & AppDomain.CurrentDomain.BaseDirectory & "\Db1.db"
Try
'Abrimos la conexión
cn = New SQLiteConnection(strConexion)
cn.Open()
Catch ex As Exception
MessageBox.Show("Error al abrir la conexión:" & vbCrLf & ex.Message)
Exit Sub
End Try
ds = New Data.DataSet
Ssql = "SELECT * FROM Clientes"
da = New SQLiteDataAdapter(Ssql, cn)
'Cargamos el DataSet
Try
da.Fill(ds, "Clientes")
Catch ex As Exception
MessageBox.Show("Error al cargar el DataSet:" & vbCrLf & ex.Message)
End Try
DataGridView3.DataSource = ds.Tables("Clientes")
Try
'Cerramos la conexión
cn = New SQLiteConnection(strConexion)
cn.Close()
Catch ex As Exception
MessageBox.Show("Error al cerrar la conexión:" & vbCrLf & ex.Message)
Exit Sub
End Try
End Sub
Valora esta pregunta


0