Entier supérieur a 65535

Bonjour

Je tombe sur un problème épineu avec le VBS

Je l'utilise pour trier des fichiers au format texte en très grand nombre ( > 150 000)

Le script analyse le contenu et tri les fichiers suivant des critères complexes.

Lors d'un essai sur un grand échantillon de fichier, je suis tombé sur un os : arrivé au 65 535 eme fichier, ca plante. Normal me dirait vous, c'est la limitation d'un entier. Mais si je lis les doc de ci et de là, je vois que VBS sait gérer les "long". Seulement on ne peux pas typer les variables dans VBS.

J'ai bien tenté d'attribuer une valeur supérieur au lancemnt du script (pour qu'il comprenne que c'est un long et pas un integer qu'il faut prendre) mais au premier calcul, ca plante quand même...

Comment faire ? Une idée ?

Merci d'avance

Salut
A tenter

Code:

---

1 2	Dim MonCompteur MonCompteur = Clng(NombreDeFichierATraiter)

---

En effet, ca marche (merci)

Malheureusement pour moi ca butte plus loin, pour (presque)la même raison. Cette fois ci c'est sur la méthode Cells sur un objet fichier excel Cells(nb_ligne,colonne); Là je pense que c'est la méthode qui prends pas au delà d'un entier, c'est probablement sans issue. Je vais donc faire un banal CSV à la place (dommage c'etait pllus élégant un fichier excel)