Ver Mensaje Individual
  #4 (permalink)  
Antiguo 17/07/2007, 12:50
jose58
 
Fecha de Ingreso: abril-2007
Mensajes: 88
Antigüedad: 18 años
Puntos: 0
Re: Modificar datos

wenas tardes veran yo se que para modificar es algo similar a insertar pero para yo insertar lo hago de esta manera


Private Sub Command1_Click()
Dim respu As Integer
Set con = CreateObject("ADODB.Connection")
con.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & "\\Kctm16n\My BD\2007\Roaming Global\Base\Base.mdb")
SERIAL = Text1.Text
SIMCARD = Text2.Text
EQUIPO = Combo1
MARCA = Combo2
MODELO = Combo3
BATERIA = Combo4
SQL = "INSERT INTO AGREGAR (SERIAL, SIMCARD,EQUIPO,MARCA, MODELO,BATERIA)
SQL = SQL & " VALUES ("
SQL = SQL & "'" & SERIAL & "',"
SQL = SQL & "'" & SIMCARD & "',"
SQL = SQL & "'" & EQUIPO & "',"
SQL = SQL & "'" & MARCA & "',"
SQL = SQL & "'" & MODELO & "',"
SQL = SQL & "'" & BATERIA & "')"
con.Execute (SQL)
end sub


osea no uso ado, ahora nose si alguno de ustedes sabe como puedo modificar con ese codigo o simplemente ingreso un obejto ADO.???