No me graba el dato
Publicado por yerotos (16 intervenciones) el 05/10/2004 12:18:51
Tengo el siguiente código:
Dim conexion As New ADODB.Connection
Dim rs As New ADODB.Recordset
conexion.ConnectionString = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\soto\\telefonos\\ConsumTelf\\vb\\llamadas2.mdb\"
conexion.Open
rs.Open \"TLLAMADAS\", conexion, adOpenDynamic, adLockBatchOptimistic
rs.AddNew
rs.Fields("DIRECCION\").Value = \"10000000\"
rs.Update
Lo ejecuto y no me da ningún error pero luego cuando accedo a la bd compruebo que no me ha grabado el dato.
Alguien me puede ayudar?
Dim conexion As New ADODB.Connection
Dim rs As New ADODB.Recordset
conexion.ConnectionString = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\soto\\telefonos\\ConsumTelf\\vb\\llamadas2.mdb\"
conexion.Open
rs.Open \"TLLAMADAS\", conexion, adOpenDynamic, adLockBatchOptimistic
rs.AddNew
rs.Fields("DIRECCION\").Value = \"10000000\"
rs.Update
Lo ejecuto y no me da ningún error pero luego cuando accedo a la bd compruebo que no me ha grabado el dato.
Alguien me puede ayudar?
Valora esta pregunta
0