DominoArea.org [Archive]

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


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();

Oui, oublie de ma part