Un Error de Visual basic,uiero que me ayuden !
Soy un estudiante de sistemas y estoy desarrollando una aplicacion de ventas en Basic,La conexion es con Access, y cuando voy a introducir datos,Basic me revienta,No pasa igual cuando extraigo datos en ellas,
"Ha ocurrido un error y basic tiene que cerrarse"
Se lo agradeceria si alguien me ayudaran en esto,es una aplicacion que tengo que entregarla a tiempo.Gracias...........
"Ha ocurrido un error y basic tiene que cerrarse"
Se lo agradeceria si alguien me ayudaran en esto,es una aplicacion que tengo que entregarla a tiempo.Gracias...........
Como haces la insercion de datos con un ADODB recordset o con una sentencia sql INSERT INTO....
la conexion contra access yo la hago asi.
Set oCnx = New ADODB.Connection 'Instancio el objecto Conexión
oCnx.ConnectionTimeout = 15 'Se establece un tiempo de espera pequeño
oCnx.Provider = "Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=laclave;"
oCnx.Open MiBaseDeDatos+
el insert lo hago definiendo un objeto recordset, objeto.addnew , asignas valores y luego objeto.update
te pongo un ejemplo
dim rsPlazas As ADODB.Recordset
Set rsPlazas = New ADODB.Recordset
With rsPlazas
'Obtengo el Recordset
Set .ActiveConnection = oCnx ---la conexion de antes
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
end with
rsPlazas.AddNew
rsPlazas!campo1= valor1
rsPlazas!campo2= valor2
rsplazas.Update
si lo q montas es una sentencia INSERT INTO....
espero q te sirva.
oCnx.Execute Ssql
donde sSql es una variable string q guarda el INSERT INTO.... y el oCnx es la variable tipo conection definida al principio
espero q te sirva algo de esto
la conexion contra access yo la hago asi.
Set oCnx = New ADODB.Connection 'Instancio el objecto Conexión
oCnx.ConnectionTimeout = 15 'Se establece un tiempo de espera pequeño
oCnx.Provider = "Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=laclave;"
oCnx.Open MiBaseDeDatos+
el insert lo hago definiendo un objeto recordset, objeto.addnew , asignas valores y luego objeto.update
te pongo un ejemplo
dim rsPlazas As ADODB.Recordset
Set rsPlazas = New ADODB.Recordset
With rsPlazas
'Obtengo el Recordset
Set .ActiveConnection = oCnx ---la conexion de antes
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
end with
rsPlazas.AddNew
rsPlazas!campo1= valor1
rsPlazas!campo2= valor2
rsplazas.Update
si lo q montas es una sentencia INSERT INTO....
espero q te sirva.
oCnx.Execute Ssql
donde sSql es una variable string q guarda el INSERT INTO.... y el oCnx es la variable tipo conection definida al principio
espero q te sirva algo de esto
