begin process at 2012 05 29 17:00:54
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > Forum > 

Archive Javascript

 > 

Archives

 > 

AU SECOURS !!!

 > 

Problème de lecture dans excel

Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Problème de lecture dans excel

mercredi 20 avril 2005 à 10:30:37 | Problème de lecture dans excel

Pyros62

Bonjour,

Présentation de la page :

Cette page représente un mini système de messages avec le nom, la date et le message. Cette fonction aurait put être implanté dans d'autres langages (ASP ou PHP) cependant étant donné que c'est pour un intranet et que la sécurité qui y règne empeche toute modification du serveur j'ai du m'orienter vers le javascript et Excel.

Problème :

J'ai parcouru google et le site pour trouver des bouts de codes en corélation avec ma page. Cependant, les codes présentés gère une feuille excel dont la taille est définie. Pour être plus pratique, je dois réaliser quelquechose d'un peu plus "dynamique".
Tout se passe bien : excel s'ouvre cependant je ne sais pour quel raison il insere un nombre "65XXX" dans la feuille à la colonne Nom. Et il me demande donc a chaque fois si je veux enregistrer les modifications.
Ceci est mon plus gros problème. Après il faut que je revoie mon indexation. Mais c'est le fait qu'il inscrive ce nombre qui pose problème.

J'ai réalisé cela en deux pages :

News.js

var TabDonnées= new Array()

//function ImportFromXLS_Direct() {

var fso=new ActiveXObject

("Scripting.FileSystemObject");

var url=unescape(self.location.pathname);

var adr=(fso.GetExtensionName(url).toLowerCase()!='hta')?1:0;

var Rep_cour= fso.GetParentFolderName(url).substr(adr);

Path_file = Rep_cour + "\\Messagerie.xls";

 

// Lancement de EXCEL

oExcel = new ActiveXObject('Excel.Application');

oExcel.WorkBooks.Open (Path_file);

oExcel.Visible = true;

var i;

i=1;

while ( (oExcel.activeSheet.cells(i,1).value/="") && (oExcel.activeSheet.cells(i,2).value/="") && o(Excel.activeSheet.cells(i,3).value/=""))

{

TabDonnées[i-1,1]=oExcel.ActiveSheet.cells(i+1,1).value;

TabDonnées[i-1,2]=oExcel.ActiveSheet.cells(i+1,2).value;

TabDonnées[i-1,3]=oExcel.ActiveSheet.cells(i+1,3).value;

i=i+1;

}

// fermeture de EXCEL sinon supprimer les deux lignes

oExcel.Application.Quit();

et test.htm :

<HTML>

<HEAD>

<LINK REL="stylesheet" TYPE="text/css" HREF="styles.css">

<TITLE>

</TITLE>

<script LANGUAGE=javascript src=News.js>

</script>

</HEAD>

<BODY>

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" width="654">

<tr>

<td width="85">

<p align="center">Nom de l'auteur</td>

<td width="122">

<p align="center">Date </td>

<td width="439">

<p align="center">Messages</p>

</td>

</tr>

<script LANGUAGE=javascript>

<!--

for (i=0;i<TabDonnées.length;i++)

{

document.writeln("<TR><TD>" + TabDonnées[i,1]+ "</TD>");//Cellule(lignes, colonnes)

document.writeln("<TD>" + TabDonnées[i,2]+ "</TD>");//Cellule(lignes, colonnes)

document.writeln("<TD>" + TabDonnées[i,3]+ "</TD>");//Cellule(lignes, colonnes)

document.writeln("</TR>");

i=i+1;

}

-->

</script>

</table>

<br>

</BODY>

</HTML>

Mon fichier excel s'appelle Messagerie.xls et possède trois colonnes : Nom , date, Messages. Les données commencant à la ligne 2.

Si quelqu'un trouve la ligne d'inscription, je le remercie d'avance.

Pyros62
mercredi 20 avril 2005 à 11:42:29 | Re : Problème de lecture dans excel

the_smurf

<HTML>

<HEAD>

<LINK REL="stylesheet" TYPE="text/css" HREF="styles.css">

<TITLE>


</TITLE>

 

<script>
var TabDonnées= new Array();

 

//function ImportFromXLS_Direct() {


var fso=new ActiveXObject

("Scripting.FileSystemObject");

var url=unescape(self.location.pathname);

var adr=(fso.GetExtensionName(url).toLowerCase()!='hta')?1:0;

var Rep_cour= fso.GetParentFolderName(url).substr(adr);

Path_file = Rep_cour + "\\Messagerie.xls";
alert(Path_file);

 

// Lancement de EXCEL

oExcel = new ActiveXObject('Excel.Application');

oExcel.WorkBooks.Open (Path_file);

oExcel.Visible = true;


var i;
ligneDebut = 3
i=ligneDebut;

while ( !((oExcel.activeSheet.cells(i,1).value=="" || oExcel.activeSheet.cells(i,1).value==null) && (oExcel.activeSheet.cells(i,2).value=="" || oExcel.activeSheet.cells(i,2).value==null) && o(Excel.activeSheet.cells(i,3).value=="" || oExcel.activeSheet.cells(i,2).value==null)))

{
var Données = new Array();
Données[1]=oExcel.ActiveSheet.cells(i,1).value;
Données[2]=oExcel.ActiveSheet.cells(i,2).value;
Données[3]=oExcel.ActiveSheet.cells(i,3).value;
TabDonnées[i-ligneDebut] = Données;
i=i+1;

}

// fermeture de EXCEL sinon supprimer les deux lignes


oExcel.Application.Quit();


</script>


</HEAD>


<BODY>

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" width="654">

<tr>

<td width="85">

<p align="center">Nom de l'auteur</td>

<td width="122">

<p align="center">Date </td>

<td width="439">

<p align="center">Messages</p>

</td>

</tr>

<script LANGUAGE=javascript>

<!--


for (j=0;j<TabDonnées.length;j++)

{

document.writeln("<TR><TD>" + TabDonnées[j][1]+ "</TD>");//Cellule(lignes, colonnes)
document.writeln("<TD>" + TabDonnées[j][2]+ "</TD>");//Cellule(lignes, colonnes)
document.writeln("<TD>" + TabDonnées[j][3]+ "</TD>");//Cellule(lignes, colonnes)
document.writeln("</TR>");


}

-->

</script>


</table>

<br>

 

 

</BODY>

</HTML>


The SMURF
the_little_smurf@yahoo.fr
Enjoy the life, don't waste your time in front of your computer
mercredi 20 avril 2005 à 12:08:45 | Re : Problème de lecture dans excel

bultez

Membre Club


Bonjour,
on pouvait aussi, par exemple,  voir ça comme çà :


<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<BODY>
<table border="1" cellpadding="0" cellspacing="0"
 style="border-collapse: collapse" bordercolor="#111111"
 id="AutoNumber1" width="654">
<tr>
<td width="85">
<p align="center">Nom de l'auteur</td>
<td width="122">
<p align="center">Date </td>
<td width="439">
<p align="center">Messages</p>
</td></tr>
<script type="text/javascript">
var fso=new ActiveXObject("Scripting.FileSystemObject");
var url=unescape(self.location.pathname);
var adr=(fso.GetExtensionName(url).toLowerCase()!='hta')?1:0;
var Rep_cour= fso.GetParentFolderName(url).substr(adr);
Path_file = Rep_cour + "\\Messagerie.xls";
oExcel = new ActiveXObject('Excel.Application');
var book=oExcel.WorkBooks.Open (Path_file);
oExcel.Visible = true;
var i=1;
var tmp=oExcel.ActiveSheet.Range('$A$'+i).value;
while ( typeof( window[ "tmp" ]) == 'string' )
{
document.writeln("<TR><TD>" + oExcel.ActiveSheet.Range('$A$'+i).value + "</TD>");//Cellule(lignes, colonnes)
document.writeln("<TD>" + oExcel.ActiveSheet.Range('$B$'+i).value + "</TD>");//Cellule(lignes, colonnes)
document.writeln("<TD>" + oExcel.ActiveSheet.Range('$C$'+i).value + "</TD></TR>");//Cellule(lignes, colonnes)
i++;
tmp=oExcel.ActiveSheet.Range('$A$'+i).value
}
oExcel.Application.Quit();
</script>
</table>
</BODY></HTML>

Cordialement. Bul. ~Site~~Mail~
jeudi 21 avril 2005 à 10:32:08 | Re : Problème de lecture dans excel

Pyros62

Bonjour,

Je tiens à vous remercier tous les deux pour vos réponses.
Cela fonctionne parfaitement et m'a permis de poussé un peu plus le code javascript.

Merci encore.

Pyros


Cette discussion est classée dans : excel, activesheet, cells, oexcel, tabdonnées

Répondre à ce message

Sujets en rapport avec ce message

exportation des données vers excel [ par isecso ] Salut tous Ce code n'a pas put fonctionner . /*--------------------------------------------------------- Nom de la fonction : exportToXL Description : Fermer Excel sans sauver ? [ par fdelaruelle ] Bonjour,Voici mon code :oExcel.WorkBooks.Close;oExcel.Quit();1) Comment fermer le classeur sans qu'il y ait une demande de sauvegarde ?2) Connaissez-v du HTML à excel [ par ibtissemfehd ] Bonjour j'ai essayé un code qui se trouve sur le site pour la conversion de html à excel pour mon exemple mais ça n'a pas marché est ce que vous pou importer données excel [ par tonytruand ] Bonsoir à tousj'ai récupéré une fonction faite par quelqu'un (je l'en remercie au passage) et je ne sais pas l'adapter car elle est prévue et fonction Lien page html / Excel [ par Stroumfette44 ] Bonjourje ne suis pas sure d'être au bon endroit mais là je rame alors j'espère que vous pourrez m'aider ...Voici ma problématique : j'ai un document Problème ActiveXObject('Excel.Application') [ par pflicopath ] Bonjour,Je me tourne vers vous car j'ai un petit soucis avec un utilisateur d'un de mes scripts.Ce script récupère des informations dans un classeur E mettre une page Word/Excel dans une page web [ par lovelacelana ] Bonjour à tous!!je voudrai introduire une page word et une feuille Excel dans une de mes pages web et je ne sais pas comment faire.en fait je voudrai introduire une feuille excel avec ses formules dans une page web [ par lovelacelana ] Slt!!Quelqu'un aurai t'il une idée sur comment s'utilise HTMLRTA? ou encore une proposition sur comment introduire une feuille Excel avec toutes fonct excel+jsp [ par jspimen ] cette code n'affiche pas j'aime connu qu'elle est la faute svp et merci function envoi() { n=document.forms["form_1"].length(); for( i=0; i<n ; ouvertir d'un fichier Excel [ par jspimen ] imy


Nos sponsors


Sondage...

CalendriCode

Mai 2012
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Consulter la suite du CalendriCode

A découvrir
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,936 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)