Section courante

A propos

Section administrative du site

Les Services Web sont une technique de programmation constituant a retourner ou envoyer de l'information à un appel AJAX.

Voici un exemple du développement d'une page de service Web du nom de «serviceweb.cgi» retournant des informations :

  1. #!/usr/bin/perl
  2.  
  3. use warnings;
  4. use strict;
  5.  
  6. use CGI;
  7. use CGI::Cookie;
  8. use DBI;
  9.  
  10. my $cgi = new CGI;
  11. my $function = $cgi->param('func');
  12.  
  13. # cette entête est requise pour compatibilité avec IE
  14. print $cgi->header(-cache_control=>"no-cache, no-store, must-revalidate");
  15.  
  16. if("getVersion" eq $function) {
  17.    print "1.0"
  18. } elsif("getLastErrorCode" eq $function) {
  19. } elsif("getLastErrorMessage" eq $function) {
  20. } else {
  21.    print "BAD_FUNCTION";        
  22. }

Cette page Perl commence par écrire une page Web classique avec des paramètres indiquant qu'il ne doit pas garder de cache mémoire. Vous remarquerez qu'il existe plusieurs fonctions d'appel différentes: getVersion, getLastErrorCode et getLastErrorMessage. Si la fonction AJAX n'appelle pas une de ses fonctions, il retournera un MID de «BAD_FUNCTION».

On appellera le service getVersion par exemple de la façon suivante dans une page HTML quelconque :

  1. <span id="version">Chargement...</span>
  2. <script language="JavaScript1.2">
  3. var xmlhttp = false;
  4. if (!xmlhttp && typeof XMLHttpRequest != 'undefined') xmlhttp = new XMLHttpRequest();
  5. xmlhttp.open("GET", "serviceweb.cgi?func=getVersion", true);
  6. xmlhttp.onreadystatechange = function() {
  7.      if(xmlhttp.readyState == 4) {
  8.          document.getElementById('version').value=xmlhttp.responseText;
  9.      }
  10. }
  11. xmlhttp.send(null);
  12. </script>

Voir également

Langage de programmation pour les serveurs Web - Services Web
Articles - Optimisation pour des sites à haut niveau de trafic

Dernière mise à jour : Jeudi, le 17 janvier 2019