Foros Club Delphi - Vincular archivos de texto en Sql Server 2000

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- MS SQL Server (https://www.clubdelphi.com/foros/forumdisplay.php?f=23)

- - Vincular archivos de texto en Sql Server 2000 (https://www.clubdelphi.com/foros/showthread.php?t=19752)

Vincular archivos de texto en Sql Server 2000

Hola amigos

Mi pregunta es precisamente esa, como se puede vincular un archivo de texto (*.txt) en la base de datos sql server 2000...

Se agradece cualquier ayuda

Saludos

Archivo texto en SQL SERVER 2000

A modo de ejemplo:

Create una nueva tabla con un campo de tipo image (Doc_Word) y un ID autoincremental que haga de clave.

Para subir un documento de word por ejemplo:

Código:

          qSube.Close;         //qrSube es un adoQuery

          qSube.Sql.Clear;

          qSube.sql.Add(' Select * from TABLA);

          qsube.Open;

          qsube.Insert;

          (qSubeDoc_Word as TBlobField).LoadFromFile(Directorio+NombreArchivo);

          qSube.post;

Para bajarlo:

Código:

(qrSubeDoc_Word as TBlobField).SaveToFile(Directorio+NombreArchivo);

Para abrirlo:

Código:

    ShellExecute(self.Handle, //formExpedientes.Handle,

                             nil,

                             PChar(Directorio+ NombreArchivo),

                             '',

                             '',

                             SW_SHOWNORMAL);