La base de données des scripts PHP - ASP & PERL
Programmation Web Hebergement

PHP ASP PERL

Gratuit Mutualisé Dédié
Rechercher


 
membres
S'inscrire

Mail : 
Passe : 
oublié ?
 
services
Développement
Kits graphiques
E.JavaScript
Domaines
Referencement
 
comscripts
Scripts PHP
Scripts ASP
Scripts PERL
Sources PHP
Sources ASP
Sources PERL
Les Ateliers
 
ressources
Les Livres
Forums
Liens
Faire un lien
Refrapide
 
partenaires
Kits Graphiques
CréEr Son Site
Bons Plans Du N
Easy-Script.Com
CréEr Un Forum
Pc Land
Le Zapping Du N
Chiffo Annuaire
Download Psp
Je Javascript
AeroModelisme
Votre site ?

Vérifier la disponibilité d'un nom de domaine


Compteur de mots sur une page web  
 Informations rapides
Catégorie : PHP Auteur :
Sous-Catégorie : Chaine de caractères Ajouté le : 06-03-2003
Langage : PHP  CSID : S103
Visites de la page : 6759    

 Informations détaillées
Description :

Petit script pour compter les mots d'une page web d'un site internet

Portion de code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
le code est à mettre dans un fichier compte.php dans votre site: 

<h3>Compter les mots</h3>
<form method="post">
 <input type="text" name="site" value="http://" size="100" maxlength="255">
 <input type="submit" value="Submit">
</form>
<?php

if ($site) {
 $fp = fopen($site, "r");
 $file = str_replace(" ", " ", strip_tags(fread($fp, 100000)));
 $file = str_replace("\"", " ", $file);
 $file = ereg_replace("[0-9]"," ", $file);
 fclose($fp);

 //compte les mots
 $words_to_count = strip_tags($file);
 $pattern = "/[^(\w|\d|\'|\"|\.|\!|\?|;|,|\\|\/|\-\-|:|\&amp;|@)]+/";
 $words_to_count = preg_replace ($pattern, " ", $words_to_count);
 $words_to_count = trim($words_to_count);
 $total_words = count(explode(" ",$words_to_count));

 echo "Il y a $total_words mots dans <a href=\"$site\" target=\"_blank\">$site</
a>.";

 echo "<br>Les plus communs sont:";

 $string = $words_to_count;

 $arr = spliti("[^a-z0-9]+",$string);

 $idx = array();
 foreach($arr as $word) {
    trim($word);
    if(strlen($word)<1) continue;
    $word = strtolower($word);
    $idx[$word]++;
 }

 echo "<table>";
 arsort ($idx);
 foreach($idx as $word=>$cnt) {
  if ($cnt >3 and strlen($word)>3){
    echo "<tr><td><a href=\"http://www.google.fr/search?sourceid=navclient&hl=fr
&q=$word\">";

    echo $word."</a></td><td>($cnt)</td></tr>";
  }
 }
 echo "</table>";
}
?>



 Les Commentaires

Soyez le premier à rédiger un commentaire sur ce code source !

Ajouter  

 Informations & Services  

Je désire recevoir ce code source par email.
Je désire recevoir la Newsletter de ComScripts.

Newsletter
82 878 abonnés

Autre Sources
 Chaine de caractères
- Remove Accen.
- caractères s.
- controle dat.
- Découpe un t.
- création de .

Tips
 Chaine de caractères
ASP (0)
PERL (3)

XML - langage et applications


  Le bon plan du moment  
Vous ne trouvez pas votre bonheur ? demander moi une estimation pour la réalisation sur mesure de votre projet ! via ma fiche développeur de ComScripts.

Gen. en 0.07244sec. Retour à la page d'accueil
Copyright © 2005 - Visialis - RCS Nanterre 478 885 122 - Tous droits réservés - Nous contacter haut de page

Valid XHTML 1.0! Valid CSS!