ACCESO A DATOS USANDO OLEDB
Hola a todos aqui os traigo el ejemplo de como leer, guardar, e insertar datos a traves del componente OleDB.
Lo primero que haremos sera crear la cadena de conexion(si no sabes como hacerlo , aqui hay una forma sencilla de conseguirlo) y se la asignamos a nuestro componente oldb.conection. o bien se la escribirmos.
y a continuacion los ejemplos.
Para una consulta “SELECT” lo conseguimos de la siguiente manera
1 2 3 4 5 6 7 8 9 10 11 |
Try Dim s As String = ("SELECT * FROM Clientes") Dim conexion = New OleDbConnection(myConnectionString) myCommand = New OleDbCommand(s) myCommand.Connection = conexion conexion.Open() Dim myReader As OleDbDataReader = myCommand.ExecuteReader() conexion.Close() Catch ex As Exception Throw New ex.Message End Try |
Para una un “INSERT” lo conseguimos de la siguiente manera
1 2 3 4 5 6 7 8 9 10 11 |
Try Dim SSQL As String = ("INSERT INTO Clientes VALUES ('58','GERARDO')") Dim conexion As New OleDbConnection(myConnectionString) myCommand = New OleDbCommand(SSQL) myCommand.Connection = conexion conexion.Open() myCommand.ExecuteNonQuery() conexion.Close() Catch ex As Exception Throw New ex.Message End Try |
Y Para un “Update” asi
1 2 3 4 5 6 7 8 9 10 11 12 |
Try Dim SSQL As String = "UPDATE Clientes SET id='37' Where id='58'" Dim conexion = New OleDbConnection(myConnectionString) myCommand = New OleDbCommand(s) myCommand.Connection = conexion conexion.Open() myCommand.ExecuteNonQuery() conexion.Close() Catch ex As Exception Throw New ex.Message End Try End Sub |
Para saber como leer un fichero de y obtener los datos usando StreamReader pincha aqui
Si te gusto el articulo y te sirvio por favor comenta ***El mail te lo puedes inventar*** No se almacenara en ningun sitio.