Bases de datos en castellano. Foros de debate. SQL Server bases de datos mysql oracle sqlite access mssql

Privacidad: Recuerde que la información escrita en los foros de programación es 100% pública y que su ip será registrada asociada a su mensaje. Si encuentra un mensaje fuera de lugar, por favor, notifiquelo para su revisión y eliminación.

Enviado por sayviorc el día 21 de marzo de 2006

Necesito saber como hacer una conección ADO en visual Basic con SQL server yo utilizo la Referencia ADO

Responder

Re: Crear una conección ADO COn SQL server

Enviado por csdk el día 5 de abril de 2006

Public ADOCONN As New ADODB.Connection 'CONEXION*************
Public Function conex()

ADOCONN.ConnectionString = " Provider=SQLOLEDB.1;Persist Security Info=False;User ID=SA;Initial Catalog=SISVA;Data Source=HIGHLIFE"
ADOCONN.Open

End Function
Public Function desconectar()
ADOCONN.Close
End Function
LLAMADA DE FUNCION*****************************
Call conex
RST_SECCION.Source = "INSERT INTO TB_SECCIONES VALUES(" & Txt_CvlSeccion.Text & ",'" & Txt_DescriNivel.Text & "','" & Txt_Supervisor.Text & "')"
RST_SECCION.ActiveConnection = ADOCONN
MsgBox "REGISTRO ALMACENADO", vbExclamation
RST_SECCION.Open
desconectar

Responder