Visual Basic - USANDO CONEXION ADO SE DEBE HACER UN DSN?

Life is soft - evento anual de software empresarial
 
Vista:

USANDO CONEXION ADO SE DEBE HACER UN DSN?

Publicado por Brenda (5 intervenciones) el 07/08/2003 23:27:41
HOLA
Alguien me puede decir porfavor si se necesita hacer un dsn, si uso una conexion ado usando el provedor oledb? como es la sintaxis de una conexion ado que no necesite hacer un dsn?
MUCHAS GRACIAS DE ANTEMANO
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:USANDO CONEXION ADO SE DEBE HACER UN DSN?

Publicado por Conchi (15 intervenciones) el 12/08/2003 00:20:31
No necesariamente debes tener un DSN para crear tu conexión, lo puedes hacer mediante código. Por ejemplo, en tu formulario principal o en un módulo puedes poner:

Para Access:
Public Cs As String
Dim RutaDatos As String
Dim cn As New ADODB.Connection
RutaDatos = App.Path & "\Prueba.mdb"
Cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & RutaDatos
cn.ConnectionString = Cs
cn.Open

Para SQL:
Public Cs As String
Dim cn As New ADODB.Connection
Cs = "Provider=SQLOLEDB.1;User ID=sa;Persist Security Info=False; Initial Catalog=Race; Data Source=(local)"
cn.ConnectionString = Cs
cn.Open

OJO, DIM si lo vas a usar en tu formulario principal y PUBLIC en el form o en el módulo….

Espero te sirva
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:USANDO CONEXION ADO SE DEBE HACER UN DSN?

Publicado por Conchi (15 intervenciones) el 12/08/2003 00:31:31
No necesariamente debes tener un DSN para crear tu conexión, lo puedes hacer mediante código. Por ejemplo, en tu formulario principal o en un módulo puedes poner:

Para Access:
Public Cs As String
Dim RutaDatos As String
Dim cn As New ADODB.Connection
RutaDatos = App.Path & "\Prueba.mdb"
Cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & RutaDatos
cn.ConnectionString = Cs
cn.Open

Para SQL:
Public Cs As String
Dim cn As New ADODB.Connection
Cs = "Provider=SQLOLEDB.1;User ID=sa;Persist Security Info=False; Initial Catalog=Race; Data Source=(local)"
cn.ConnectionString = Cs
cn.Open

OJO, DIM si lo vas a usar en tu formulario principal y PUBLIC en el form o en el módulo….

Espero te sirva
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar