Convertir une chaine encodée en base64 en fichier pdf

[amahi]

Tu as regardé dans les tips??

Code : Tout sélectionner

response.setHeader("Content-Type","application/vnd.ms-excel");     
response.setHeader("Cache-Control", "no-cache");
response.setHeader("Content-Disposition", "attachment; filename=contacts.xls");

writer.write("<meta charset=UTF-8>");
writer.write("<table>");
writer.write("<thead><tr>");
writer.write("<td><b>Country</b></td>");
writer.write("<td><b>Group Name</b></td>");
writer.write("</tr></thead>");
writer.write(output);
writer.write("</table>");
writer.endDocument();


Tu remplaces le content-type, le contenu du fichier, et off course le contenu et ca devrait le faire

[mike76]

salut,

en plus ce tip c'est moi qui l'avait fait, je l'avais oublié.
merci Ahmed je vais essayer ça, je vous tiens au courant

[mike76]

Pour décoder une chaine en base64 pour la convertir en fichier PDF, le plus simple et le plus rapide est de s'inspirer de ce code :

Code : Tout sélectionner

dim session as New NotesSession
dim stream as NotesStream

Set stream = session.CreateStream
   
If stream.Open("C:\monfichier.pdf", "UTF-8") Then
   Call stream.WriteDecoded("MA_CHAINE_BASE64", enc_base64)
   Call stream.Close
End if