PROGRAMMATION

Adapter sa page web à la définition de l’écran des internautes  

Vous avez créé plusieurs versions de votre site Web, chacune avec des éléments spécifiques à la définition de l'écran du PC des intemautes (taille des tableaux, des animations Flash, etc.). Or, tous les visiteurs ne connaissent pas la définition de leur écran et ne sauront

pas choisir la version adéquate. Pour les aider, vous allez créer un script qui déterminera cette définition et affichera automatiquement sur  l'ordinateur  du surfeur la version du site la plus adaptée.

Vous afficherez la page index640.htm, si cette si cette définition est de 640 x 480 points; ou la page index de 8OO.htm, si elle est de

800 x 600 points. JavaScript dispose pour cela des méthodes screen  height et screen. width. Elles permettent de récupérer des informations sur la hauteur et la largeur à l'écran. A l'aide d'un éditeur HTML, ouvrez le fichier correspondant à votre page d’accueil,index.htm ou default.htm dans

la majorité des cas. Recopiez-y le contenu du listing ci-dessous. Trois définitions d’écran sont ici prises en compte, libre à vous d'en ajouter en insérant d'autres conditions dans la boucle if. Lorsqu'une définition est détectée, le chemin du fichier vers lequel doit être dirigé l'utilisateur est ajouté à la variable fichier. 

Il peut cependant arriver qu'une définition non standard ne soit pas reconnue. Pour éviter que les visiteurs ne se retrouvent alors sur une page  blanche, il suffit de créer une version générique de votre site, accessible par la page indexall.htm.  

Script java à insérer dans la page de code:

<SCRIPT LANGUAGE="Javascript">

//Détermine la largeur de l’écran

var largeur=screen.width

//Détermine la Hauteur de l’écran

var hauteur=screen.height

if(largeur==640 && hauteur==480) {fichier="index640.htm";}

else if(largeur==800 && hauteur==600)

{fichier="index800.htm";}

else if(largeur==1024 && hauteur==768)

{fichier="indexl024.htM";}

else {url="indexall.htm";}

//Ouverture de la page d'accueil adaptée à la définition     

window.location.replace(fichier);

<./SCRIPT><Aucun>  

Afficher le nom et le chemin d'un fichier  

Ø       Pour connaître rapidement le nom et le chemin de vos fichiers

Il suffit de les insérer  dans une cellule d'Excel. Pour cela ajouter, dans une macro VBA, la ligne Range ("A5") .Value=ActiveWorkbook.FullName, et remplacez A5 par le numéro de la cellule dans laquelle vous souhaiter afficher les informations. 

A chaque fois que vous lancerez cette macro, le nom et le chemin de votre fichier seront mis à jour.

indiquer sur son site le nombre d'utilisateurs connectés  

Comment: >En utilisant les variables d'application.  

Vous souhaitez afficher sur votre site, programmé en ASP, le nombre d'utilisateurs connectés. Pour cela, vous devez utiliser les variables d'application. Elles permettent de stocker des informations(un site ou un forum par exemple) sur le serveur, au niveau des applications. Avec un éditeur, ouvrez le fichier global.asa.

 Il se situe à la racine du serveur. S'il n existe pas, créez-le. Recopiez-y alors le listing ci-contre. Modifiez ensuite la page et ajoutez, à l'emplacement adéquat, la ligne Nombre d'utilisateurs connectés : <%=Application("visiteur")%>.

Ouvrez ensuite votre page ASP lorsque la session Web dans un navigateur le nombre des visiteurs est affiché. Ce chiffre correspond aux sessions ouvertes simultanément.

Il faut donc le diminuer d'une unité lorsqu'un utilisateur quitte votre site.                      

C'est le rôle de la procédure Sub Session OnEnd.

Script java à insérer dans la page de code:

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

      Sub Application-OnStart                                                   

Application("visiteur")=0

End Sub

'Durée de vie en minutes de la session

session.Timeout=10

'Incrémentation du nombre de visiteurs lorsque une session commence

Application.Lock

Application("visiteur")=Application("visiteur")+l

Applicatiofi.unLock

End Sub

Sub Session-On_End

'Décrémentation du nombre de visiteurs lorsque la session est terminée                        

Application.Lock

Application("visiteur")=Application("visiteur")-l

Application.UnLock

End Sub                                      

</SCRIPT>  

Mettre à jour la table des matières  

comment:> en créant une macro TablesOfContents.  

Après avoir travaillé sur un document Word, vous mettez généralement à jour sa table des matières. Pour vous éviter d'omettre cette opération, vous pouvez créer une macro qui s'en chargera automatiquement à chaque fermeture du document.

 Dans ce cas précis, vous allez utiliser l'objet TablesOfContents, qui caractérise les tables des matières dans Word. Notez que pour lancer la macro dès la fermeture du document, vous devez la nommer AutoClose.

Commencez par dérouler le menu Outils/Macro/Visual Basic Editor.

Dans la fenêtre de l'éditeur Visual Basic qui s'affiche, sélectionnez la commande Module dans le menu Insertion.  Recopiez dans le module qui apparaît le listing ci-dessous.  Une fois cette étape terminée, fermez l'éditeur.  Désormais, la table des matières de votre document sera mise à jour automatiquement dès que vous quitterez Word.  

Sub AUtoClose()  

Application.  

ScreenUpdating=False  

Dim table As  

TableOfContents  

For Each table In  

ActiveDocument  

.TablesQfContents  

table.Update  

Next  

ActiveDocument  

.Save  

End Sub