Página 1 de 1

Conectar SQL Server

Publicado: Mié Nov 02, 2022 4:44 pm
por 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,

Re: Conectar SQL Server

Publicado: Sab Nov 05, 2022 11:49 am
por 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

Re: Conectar SQL Server

Publicado: Lun Nov 07, 2022 12:03 am
por gerencia
Gracias Pedro.

Funciono perfecto.
Saludos,


xhermita escribió: Sab Nov 05, 2022 11:49 am 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