Demo-Session.hsc

C'est le script parfait pour débuter. Il vous permet d'appréhender les fonctions de base.
Il est livré avec la distribution française d'Hamster : Hamster-Fr ou dans scriptfr.zip

• Vous connecter à un fournisseur d'accès ;
• Envoyer et recevoir les articles de tous vos serveurs de news ;
• Envoyer votre courrier ;
• Recevoir le courrier de toutes vos boites aux lettres ;
• Vous déconnecter quand toutes les tâches sont effectuées.

			
#!hs2
#!load BHamster.hsm


########################################################################
# Script      : Demo-Session.hsc
# Description : Script permettant de montrer les fonctions de base.
# Maintainer  : Brina <HamsterFR@free.fr>
# Version     : 15 septembre 2000.
########################################################################
# Attention :
# Ce script est livré avec Hamster et il sera remplacé par la version
# livrée avec une nouvelle version de Hamster.
# Donc, il n'apparaît pas dans le menu "Script" ou est désactivé.
# Vous DEVEZ en faire une copie (par exemple MonScript.hsc puis relancer
# Hamster pour le voir apparaître dans les menus dont "Script/Edit".
# Editez-le et mettez les informations vous concernant.
########################################################################


# Les lignes commençant par "#" sont des commentaires.
# Vous pouvez mettre en commentaire, les lignes correspondant à des
# actions que vous ne voulez pas faire ... pour l'instant.

# Remettre à zéro les compteurs et effacement de l'écran "log"

HamMessage( 2, 0 )

# Connexion : Vous pouvez demandez à Hamster de se connecter.
# Si vous l'êtes déjà, ces lignes vous permettront de ne pas avoir
# d'erreur.

# Entre les "", mettre le nom de la connexion à utiliser telle qu'elle
# s'appelle exactement (majuscules et espaces compris, ex : Free) dans
# l'accès à distance.
# Vous devez dans "Configuration/Mots de passe", sélectionner ou créer 
# cette connexion puis en cliquant sur "Editer", mettre les informations
# (nom et mot de passe) nécessaire à la connexion (laisser vide si
# vous n'en avez pas besoin ou à "?" pour les taper à chaque connexion.

Var( $NomDeLaConnexion )
 
$NomDeLaConnexion = ""

if( !RasIsConnected )
  HamRasDial( $NomDeLaConnexion )
endif

# Connexion au(x) serveur(s) de news.
# Les envois des articles en instance et le téléchargement
# des nouveaux articles seront fait sur tous les serveurs de 
# news définis dans la configuration.
# Pour plus de détails sur les possibilités de paramétrages,
# voir l'aide.

HamNewsJobsClear
HamNewsJobsPostDef
HamNewsJobsPullDef
HamNewsJobsStart

# Attend que tous ce qui précède soit fini

HamWaitIdle

# Envoi des courriers en instance.
# Vous devez spécifier entre les "" le nom de votre
# serveur d'envoi (par exemple : "smtp.free.fr"
# Ce serveur doit avoir été défini dans la configuration.
# Voir dans l'aide, la possibilité de paramétrage.

HamSendMail( "" )

HamWaitIdle

# Chargement des courriers.
# Les menus "En-ligne" ne peuvent charger qu'une seule
# boîte aux lettres par serveur POP3 défini.
# Si vous avez plusieurs adresses sur un même domaine, vous
# devez passer par un script.

# Chaque boîte aux lettres a un nom d'utilisateur et un mot de passe
# Vous pouvez les mettre en clair dans ce script ou aller dans l'onglet
# "Mots de passe" de "Configuration" et cliquer sur un "$" pour l'utiliser
# ensuite ici.

# Pour relever la boîte aux lettres Toto sur Free avec le mot de passe
# "titi" et mettre le courrier reçu dans le compte local tata
# Si vous n'avez pas défini de compte local, mettre "admin"
# Pour lire ce courrier, vous devrez paramétrer votre logiciel de courrier
# pour lui dire de relever sur le serveur localhost ou 127.0.0.1le compte 
# "tata" avec le mot de passe que vous aurez rentré dans l'onglet
"Comptes locaux"

HamFetchMail( "pop.free.fr", "pop3", "Toto", "titi", "tata" )

# Pour relever la boîte aux lettres Moi sur Free dont le nom d'utilisateur
# et le mot de passe ont été rentrés dans "$1". Le courrier relevé sera 
# dans la boîte local "admin" (ne pas oublier de mettre un mot de passe
# au compte local "admin"

HamFetchMail( "pop.free.fr", "pop3", "$1", "", "admin" )

# Et ainsi de suite pour toutes les boîtes aux lettres que vous avez.
# Pour plus de détails, se référer à l'Aide.

HamWaitIdle

# Il est possible de se déconnecter quand toutes les tâches sont finies.
# Attention, si vous lancez un script avec l'instruction ci-dessous et 
# que vous êtes en train de surfer sur le Web, vous serez déconnecté d'office.
# Donc l'idéal est de faire deux scripts identiques l'un avec la commande
# de déconnexion, l'autre sans, pour pouvoir à chaque fois, faire ce qu'on
# veut.

HamRasHangup

HamWaitIdle

# Vous indique dans la fenêtre de Hamster que tout est fini.
print( "Script terminé" )

# Il est possible de faire des tas d'autres choses comme purger,
# reconstruire ces listes globales etc.
# Lire l'Aide pour voir les autres possibilités.

Quit