base de datos vb ADO
1. Cree un módulo **** público con el siguiente código:
Public Function Connectionstring() As String.
cadena de conexión = "driver={servidor SQL}; servidor=nombre del servidor; uid=cuenta; pwd=contraseña; base de datos=nombre de la base de datos"
Función final
2. En Agregue un evento de carga al formulario donde desea agregar datos para crear una instancia del control ADO. El código es el siguiente:
ado1.Connectionstring = cadena de conexión
3. Actualizar
3. Agregue el siguiente código al botón Agregar:
Subcomando privado1_Click( )
ado1.recordset.addnew
ado1.recordset.Fields("nombre") = Texto1.Text
ado1.recordset.Fields("nombre") = Text1.Fields("nombre")Texto
ado1. recordset.Fields("sexo") = Texto1 . ado1.recordset.Fields("año") = Texto1.Text
Text3.Text = ""
Text2.Text = " "
Texto3. Texto = ""