vb.net usando sqlite como base de datos, ¿qué hacer con los tutoriales que faltan?
Atenuar Nrsj como nuevo Data.SQLite.SQLiteConnection
Nrsj.ConnectionString = "Data Source=" amp;
"C:\SqliteDev\ Convert"
Pruebe
Nrsj.Open() 'Probar conexión a la base de datos
Captura ex como excepción
MsgBox.Open() 'Probar conexión a la base de datos
Captura ex como excepción
MsgBox(ex.Message)
salir sub
Finalizar intento
Dim Nr As New Data.SQLite.SQLiteCommand 'Definir operación SQL
Nr.Connection = Nrsj
Nr.CommandType = CommandType <. /p>
Dim iD_tJ como nuevo System.Collections.SortedList
Nr.CommandText = "seleccionar id, ruta desde archivo"
Dim Sj como Data.SQLiteDataReader
p>
Nr.Connection = Nrsj
Nr.CommandType = tipo CommandType. SQLiteDataReader = Nr.ExecuteReader
Mientras que Sj.Read
iD_tJ.Add(Sj(0), Sj(1))
Finalizar mientras
Sj.Close()
' Nr.Nr.CommandText = " seleccione Nr del archivo DONDE ruta=@Ruta"
Nr.CommandText = " seleccione Nr del archivo DONDE ID=@ID"
Dim Xrsj como nuevo Data.SQLite.SQLiteConnection
Xrsj.ConnectionString = "Data Source=" amp; _
System.Environment .GetFolderPath(Environment.SpecialFolder. Desktop) amp; "\MB.Bmy"
Pruebe
Xrsj.Open()
Capture ex como excepción p>
MsgBox(ex.Message)
Nr.Commandext = "seleccione Nr del archivo WHERE ID=@ID"