
Disculpen alguien podria decirme como agregar registros a una base de datos por medio del ADOBC Estoy trabajando en Visual Basic 6.0 y SQL SERVER
Mi codigo no me funciona alguien tiene alguno?
Gracias por asu ayuda

| |||
![]() ![]() Disculpen alguien podria decirme como agregar registros a una base de datos por medio del ADOBC Estoy trabajando en Visual Basic 6.0 y SQL SERVER Mi codigo no me funciona alguien tiene alguno? Gracias por asu ayuda ![]() |
| |||
Coloca esto en un boton de aceptar: Dim cn As ADODB.Connection 'Public declaracion Set cn = New ADODB.Connection cn.Provider = "sqloledb" cn.Properties("Data Source").Value = "srvmsweb" ' Ponga aquí el nombre de su servidor cn.Properties("Initial Catalog").Value = "basico" 'Ponga aqui la base de datos cn.Properties("User id").Value = "sa" ' o nombre de usuario que desee. cn.Properties("Password") = "" cn.Open cedula=txtcedula.text nombre=txtnombre.text apellido=tstapellido.text Set consulta = New ADODB.Recordset SQL = "INSERT INTO EMPLEADO (CEDULA, NOMBRES, APELLIDOS) VALUES ('cedula','nombre','apellido')" consulta.Open SQL, cn 'Ejecuto la consulta esto es solo para insertar... |