Problema con cadena de conexión

[t0n1]

Iniciado por lokoman

Hola!!
Necesitas Usuario|Clave para el Server?

Código vb:

Sub ConectarSQL()
    Dim strConectarSQL As String
    
    Set ConexionSQL = New ADODB.Connection
 
    strConectarSQL = "Provider=SQLOLEDB.1"  _
            & ";Password=" & "PASSWORD" _
            & ";Persist Security Info=True;" _
            & ";User ID=" & "USUARIO" _
            & ";Initial Catalog=BS1" _
            & ";Data Source=WILLIAMS"
 
    ConexionSQL.ConnectionString = strConectarSQL
    ConexionSQL.Open
End Sub
 

O es que te quieres conectar a Access?

Código vb:

Set Conexion = New ADODB.Connection
    With Conexion
        .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
        App.Path & "\BaseDatos.mdb;Persist Security Info=False"
        Conexion.Open
    End With
 

No, es para conectarme al server sin nombre de usuario ni contraseña. Con ese mismo código ya hice dos proyectos y no tuve problema. Cuando quise hacer un tercero, en la function que hice de la cadena se me pone en false no se por que.
El nombre de la base y sesión de server son esos. La referencia está activada. Ni idea que pasa.