Foros del Web » Programación para mayores de 30 ;) » Programación General »

ayuda con addnew

Estas en el tema de ayuda con addnew en el foro de Programación General en Foros del Web. Hola amigos listeros, alguno me puede ayudar con esto, tengo la base de datos abierta para dar de alta un nuevo registro. mi codigo es ...
  #1 (permalink)  
Antiguo 20/06/2002, 13:27
 
Fecha de Ingreso: febrero-2002
Mensajes: 41
Antigüedad: 22 años, 3 meses
Puntos: 0
ayuda con addnew

Hola amigos listeros, alguno me puede ayudar con esto, tengo la base de datos abierta para dar de alta un nuevo registro. mi codigo es el siguiente:

Private Sub cmdguardar_Click()
rst.AddNew
rst!nosuscripcion = txtsuscripcion.Text
rst!tipo = cmbtipo.Text
rst!nombre = txtnombre.Text
rst!domicilio = txtdomicilio.Text
rst!ciudad = txtciudad.Text
rst!ocupacion = txtocupacion.Text
rst!telefono = txttelefono.Text
rst!domiciliooficina = cmbdomoficina.Text
rst!cidadoficina = cmbciudadoficina.Text
rst!telefonooficina = cmbteloficina.Text
rst!fechanacimiento = txtfechanac.Text
rst!email = cmbemail.Text
rst!familiar1 = cmbfamiliar1.Text
rst!fechanac1 = cmbfecha1.Text
rst!familiar2 = cmbfamiliar2.Text
rst!fechanac2 = cmbfecha2.Text
rst!familiar3 = cmbfamiliar3.Text
rst!fechanac3 = cmbfecha3.Text
rst!familiar4 = cmbfamiliar4.Text
rst!fechanac4 = cmbfecha4.Text
rst!familiar5 = cmbfamiliar5.Text
rst!fechanac5 = cmbfecha5.Text
rst!familiar6 = cmbfamiliar6.Text
rst!fechanac6 = cmbfecha6.Text
rst!fechasus = txtfechasusc.Text
rst.Update
MsgBox "El Socio se Registro Correctamente", vbInformation
rst.Close
End sub

al correrlo segun da de alta un registro correctamente, pero cuando reviso la base de datos no ha dado de alta ningun registro...
alguno sabe por que?????
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 10:39.