Como guardar cambios en base de datos, AYUDA!! PLS

Iniciado por El_Marine, 7 Agosto 2006, 11:57 AM

0 Miembros y 1 Visitante están viendo este tema.

El_Marine

Hola, necesito ayuda urgente, queria saber como guardar los cambios de los campos de texto en una base de datos, aqui tienen el codigo:


Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "Debe completar todos los campos (;"
Else
If Text1.Text = "+" Then
MsgBox "Introduzca solamente numeros"
Else
If Text2.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text3.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text4.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
a = CLng(Text1.Text) + CLng(Text2.Text) + CLng(Text3.Text) + CLng(Text4.Text)
'Pasamos a integer para poder sumar numeros
Text10.Text = a
End If
End If
End If
End If
End If
End Sub


Private Sub Command2_Click()
If Text5.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text6.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text7.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text8.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
b = CLng(Text5.Text) + CLng(Text6.Text) + CLng(Text7.Text) + CLng(Text8.Text)
Text11.Text = b
End If
End If
End If
End If
End Sub

Private Sub Command3_Click()
c = CLng(Text10.Text) - CLng(Text11.Text)
Text9.Text = c
End Sub

Private Sub Form_Load()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim d As Integer
Text10.Text = a
Text11.Text = b
End Sub



Espero sus respuestas,gracías.

Hans el Topo

tienes mil post en esta sección del foro donde se explica...
 

El_Marine

donde? :S no veo ninguno,me puedes decir como encontrarlo,porfavor? Saludos.

Hans el Topo

el botón que pone buscar del foro, ahi marcas solo programación VB seleccionas los días que quieras 90=3 meses  y pones en buscar lo que deseas buscar

 

El_Marine

ya busque en el foro, pero no encontré nada de como guardar los datos de texts en base de datos,porfavor ayudenme! Gracias.

whiskises

supongamos que tienes un text4.text y quieres añadir su contenido en el campo "Direccion" de la BD
si enlazaste con un adodc  a la tabla de la base de datos...


Adodc1.Recordset.MoveLast
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("Direccion").Value = Text4.Text
Adodc1.Recordset.MoveLast


este codigo le colocas en el boton "añadir registro" , por ejemplo.
Salu2

El_Marine

Como era para hacer que se guarde en un documento de texto? era outpout noseque... alguien me puede refrescar la memoria?Gracías.

Hans el Topo

podrías buscarlo también

http://foro.elhacker.net/index.php/topic,134809.0.html aqui pegue la información de la librería del vb6, lee