Ver Mensaje Individual
  #1  
Antiguo 01-04-2005
Avatar de DB-ADO
DB-ADO DB-ADO is offline
Miembro
 
Registrado: mar 2005
Ubicación: Bs As Argentina
Posts: 39
Reputación: 0
DB-ADO Va por buen camino
Question Insertar archivo en base de datos!!!!!

Hola amigos.

Estoy trabajando en Delphi 5 y necesito insertar en un campo de la tabla que tengo un archivo de cualquier tipo.
El campo de esta tabla es del tipo LongVarBinari y supongo que es una base de datos SYBASE.
A esta tabla tengo acceso por OBDC
Necesito insertar los archivos dentro de ese campo de la tabla.

Lo que hice es un metodo con TStringList que abre el archivo y por medio INSERT INTO lo inserta.

Esto es un ejemplo de lo que hice y solo funciona para texto plano:

Código Delphi [-]
           Archivo:= TStringList.Create
           Archivo.LoadFromFile ('C:\Fordward.html');
           CampoDeLaTabla := Archivo.Text;

Luego

Código Delphi [-]
INSERT INTO TBAttach (Attachment) Values (#39+CampoDeLaTabla+#39)

#39 es la comilla simple (')

Espero que me puedan ayudar

Saludos...
__________________
-------- Pablo: --------
----- Programador -----
-------- Delphi ---------

Última edición por DB-ADO fecha: 04-04-2005 a las 16:26:49.
Responder Con Cita