Problème avec les caractères accentués dans un export Excel

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

Messagepar stloje » 13 Août 2010 à 09:49

Voici ce qu'il y avait dans le code

Code : Tout sélectionner
   Print |Content-Type: application/vnd.ms-excel|
   Print |Content-disposition: attachment; filename=| & strNomFichier
   
   ' On génère un tableau html, Excel le convertit automatiquement en cellule
   strLine = |<table>| & strCRLF & strCRLF
   Print strLine
   
   'Récupération de l'entête de la vue   
   vColumn = vueToExport.Columns
   strLine = |<tr>| & strCRLF & strCRLF ' Début de ligne
   For lngCompteur=0 To Ubound (vColumn)
      strLine = strLine & |<th>| & vColumn(lngCompteur).Title & |</th>| & strCRLF ' Entête
   Next
   strLine = strLine & |</tr>| & strCRLF & strCRLF ' Fin de ligne
   Print strLine
   
   'Récupération des données de la vue
   Set vueNavigator= vueToExport.CreateViewNav()
   Set vueEntry=vueNavigator.GetFirstDocument
   While Not (vueEntry Is Nothing)
      strLine = |<tr>| & strCRLF & strCRLF ' Début de ligne
      For lngCompteur=0 To Ubound (vColumn)
         strLine = strLine & |<td>| & vueEntry.ColumnValues(lngCompteur) & |</td>| & strCRLF ' Cellule
      Next
      strLine = strLine & |</tr>| & strCRLF & strCRLF  ' Fin de ligne      
      Print strLine
      
      Set vueEntry = vueNavigator.GetNextDocument(vueEntry)
   Wend
   
   ' Fin du tableau html
   strLine = |</table>|
   Print strLine
Et vive le cambouis! Si t'en as jusque sous les bras, c'est parce que tu as cherché longuement la solution ou tout simplement parce que tu t'es vautré!
Avatar de l’utilisateur
stloje
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 335
Inscrit(e) le : 09 Sep 2008 à 13:18
Localisation : Orléans

Messagepar mike76 » 13 Août 2010 à 09:58

merci
au niveau des entêtes tu as les mêmes choses que moi

dans ta variable strNomFichier, tu mettais .xls à la fin ??

Code : Tout sélectionner
var exCon = facesContext.getExternalContext();
var writer = facesContext.getResponseWriter();
var response = exCon.getResponse();
var viewNav:NotesViewNavigator = database.getView('AllContacts').createViewNav();   // dans mon cas AllContacts est la vue que je veux exporter
var viewEnt:NotesViewEntry = viewNav.getFirst();
var output:string = "";

// boucle permettant de récupérer toutes les valeurs des colonnes
// en les formattant en HTML
while (viewEnt != null) {
   output += "<tr>";
   
   for (var x in viewEnt.getColumnValues()) {
      output += "<td>" + x + "</td>";
   }
   
   output += "</tr>";
   
    viewEnt = viewNav.getNext(viewEnt);
}
     
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();
mike76
V.I.P.
V.I.P.
 
Message(s) : 2122
Inscrit(e) le : 12 Oct 2006 à 13:14
Localisation : ROUEN

Messagepar stloje » 13 Août 2010 à 10:20

Oui, oublie de ma part :?
Et vive le cambouis! Si t'en as jusque sous les bras, c'est parce que tu as cherché longuement la solution ou tout simplement parce que tu t'es vautré!
Avatar de l’utilisateur
stloje
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 335
Inscrit(e) le : 09 Sep 2008 à 13:18
Localisation : Orléans

Précédent

Retour vers Développement

cron