Guardar archivos en sql2000

[[kurono]]

amigo nlsgarcia no me funciona de ninguna manera crees que sea algo con la base de datos en sql2000 el campo lo tengo declarado binary incluso lo declare varbinary y nada

[[kurono]]

hola amigos les cuento que hise prueba con una base de datos acces y todo funciona bien pero en sql2000 no funciona sera porque en access el campo si se declara como blod mientras que en sql2000 se declara como binary

[[nlsgarcia]]

Kurono,

Revisa estos links:

1- http://www.dbforums.com/microsoft-sq...er-2000-a.html

2- http://www.databasejournal.com/featu...ver-Part-2.htm

El tipo de campo blob en SQL Server 2000 es Image.

Tomado del libro : Microsoft SQL Server 2000 Bible de Paul Nielsen, Editorial Wiley.
"SQL Server can store any binary object up to 2GB, which definitely qualifies as a binary large object (blob) in an image column"

Tomado del link 2:

"SQL BOL (Books On Line) gives a good example of the three binary types:

-Use Binary when the sizes of the column data entries are consistent (and less than 8,000 bytes).

-Use varBinary when the sizes of the column data entries vary considerably (and are less than 8,000 bytes).

-Use varBinary(max) when the column data entries exceed 8,000 bytes.

-For SQL 2000, use the Image data type. However, be aware that Microsoft has stated the Image data type is for backwards compatibility only, and may be discontinued on a future version."

Te anexo una tabla del mencionado libro que define el campo blob Image.

Espero sea útil

Nelson.

[[kurono]]

amigo nlsgarcia efectivamente declarando el campo como image ya puedo grabar archivos en la base de datos con sql2000 muchas gracia por tu ayuda aun asi leere tus link para documentarme mejor

[[nlsgarcia]]

Kurono,

Gracias por tus comentarios

Cuando puedas coloca en el post las rutinas de lectura y grabación del campo blob en SQL Server 2000 para que sirvan de ejemplo de como procesar este tipo de datos.

Nelson.

[[kurono]]

el codigo que utilize fue el mismo que mencione al principio del hilo

Código Delphi [-]
// De archivo en disco a campo BLOB 
TBlobField(ADOTable1.FieldByName('pdf')).LoadFromFile('archivo.pdf'); 
 // De campo BLOB a archivo en disco 
TBlobField(ADOTable1.FieldByName('pdf')).SaveToFile('archivo.pdf');

este es un ejemplo de como lo utilize en mis codigo de pruebas

para guardar en la base de datos

Código Delphi [-]
 
begin
  try
     TBlobField(ADOTable1.FieldByName('archivos')).LoadFromFile(Open.FileName);
   finally
     ADOTable1.Post;
     ShowMessage('archivo guardado');
   end;
end;

y este es para guardar de la base de datos al disco

Código Delphi [-]
 
begin
  TBlobField(ADOTable1.FieldByName('archivos')).SaveToFile('C:\'+ DBEdit1.Text+'.exe');
  ShowMessage('archivo guardado');
end;