Conectar SQL Server

[gerencia]

Hola a todos,
Me han solicitado un proyecto en Base de datos SQL-SERVER, todos los desarrollos lo he realizado con MariaDB,

Me surgen varias preguntas y me gustaría que si alguien tiene experiencia con SQL-SERVER me ayudara.

- Cual debería ser la mejor conexión SQL a través de ODBC o ADO ?

Si me comparte un pequeño ejemplo de cómo sería la conexión, tips para tener en cuenta se lo agradecería.

Saludos,

[xhermita]

Yo utilizo esta funcíón para construir la cadena de conexión con TAdoDataSource

Código: Seleccionar todo

FUNCTION ConnectStr(cHost, cUser, cPass, cDataBase)
   LOCAL cConnect := ""
   DEFAULT cHost TO ""
   DEFAULT cUser TO ""
   DEFAULT cPass TO ""
   DEFAULT cDataBase TO ""
   
   IF !Empty(cHost) .AND. !Empty(cUser) .AND. !Empty(cPass)
      cConnect :=  "Provider=SQLOLEDB.1;Password=" + cPass +;
                   ";Persist Security Info=True;User ID=" + cUser + ;
                   ";Data Source=" + cHost +;
                   + IIF( !Empty( cDataBase) , ";Database=" + cDataBase, "" )
   ENDIF
RETURN cConnect

[gerencia]

Gracias Pedro.

Funciono perfecto.
Saludos,

Yo utilizo esta funcíón para construir la cadena de conexión con TAdoDataSource

Código: Seleccionar todo

FUNCTION ConnectStr(cHost, cUser, cPass, cDataBase)
   LOCAL cConnect := ""
   DEFAULT cHost TO ""
   DEFAULT cUser TO ""
   DEFAULT cPass TO ""
   DEFAULT cDataBase TO ""
   
   IF !Empty(cHost) .AND. !Empty(cUser) .AND. !Empty(cPass)
      cConnect :=  "Provider=SQLOLEDB.1;Password=" + cPass +;
                   ";Persist Security Info=True;User ID=" + cUser + ;
                   ";Data Source=" + cHost +;
                   + IIF( !Empty( cDataBase) , ";Database=" + cDataBase, "" )
   ENDIF
RETURN cConnect