Discussion :

[davidou2001]

Salut

J'ai cherché dans le forum mais je n'ai pas trouvé de réponse satisfaisante. Je voudrais écrire une image, stockée en base, dans un fichier. Pour lire l'image, j'utilise la fonction READTEXT qui me renvoie le code binaire de l'image, de la forme 0x1245.... etc. A présent, je souhaiterais écrire tout ça dans un fichier. J'avais pensé à utiliser qque chose du genre :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
  DECLARE @fs int
  DECLARE @fileid int  
 
  EXEC sp_OACreate 'Scripting.FileSystemObject', @fs OUT
  EXEC sp_OAMethod @fs, 'OpenTextFile', @FileID OUT, @filename, 8, 1
  EXEC sp_OAMethod @fileid, 'WriteLine', Null, @text
  EXEC sp_OADestroy @fileid
  EXEC sp_OADestroy @fs

Le problème est que le contenu est interprêté comme du texte. Logique : j'ai utilisé la méthode : 'OpenTextFile'
Je pense que le problème se situe ici. Il faudrait peut être le remplacer par qque chose du genre 'OpenBinaryFile'. Je ne trouve pas de listes des valeurs possibles pour ce paramètre...

Si qqu'un a un idée ou à déjà eu le problème, merci de m'en faire part...

[SQLpro]

SQL Server n'est pas fait pour faire ce genre de choses. Prévoyez de le faire au niveau du client à l'aide de readtext ou bien changez votre stratégie en stockant vos images dans des fichiers plutôt que dans la base.

A +

[davidou2001]

Le problème, c'est que je n'ai pas de client justement... ce travail doit être effectué par une stored proc... Sans te manquer de respect, je reste sceptique. Je pense que c'est faisable. Je vais continuer à chercher

[davidou2001]

J'AI TROUVÉ !!!

On peut donc écrire des fichiers en mode 'binaire' directement à partir de SQL Server. Voici le code :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
  -- Chemin du fichier a ecrire
  DECLARE @baseDir varchar(800)
  EXEC tsu__private_getBaseDir @baseDir OUTPUT
  SELECT @baseDir = 'chemin de mon fichier'
 
  -- Le fichier binaire
  DECLARE @s varbinary(2048)
  SET @s = 0x47494...code hexa du fichier
 
  DECLARE @o int
  DECLARE @r int
  EXEC sp_oacreate 'adodb.stream', @o output
  EXEC sp_oasetproperty @o, 'type', 2
  EXEC sp_oamethod @o, 'open'
  EXEC sp_oamethod @o, 'writetext', null, @s
 
  EXEC sp_oacreate 'adodb.stream', @r output
  EXEC sp_oasetproperty @r, 'type', 1
  EXEC sp_oamethod @r, 'open'
  EXEC sp_oasetproperty @o, 'position', 2
  EXEC sp_oamethod @o, 'copyto', null, @r
  EXEC sp_oamethod @r, 'savetofile', null, @basedir, 2

Voilà, il fallait y penser J'espère que ça pourra aider quelqu'un !
Merci !