begin process at 2010 02 10 12:45:53
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > INFO VIA UN SITE WEB

INFO VIA UN SITE WEB


 Information sur la source

Note :
Aucune note
Catégorie :Divers Niveau :Initié Date de création :21/11/2002 Date de mise à jour :21/11/2002 22:08:48 Vu :2 875

Auteur : CyberPunk2020

Ecrire un message privé
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

Ce remote permet d'aller lire un fichier texte d'une ligne sur un site et permet de garder contact avec les personne possédant ce fichier

Le fichier texte doit faire une ligne et contenir en fin de ligne un retour chariot (Entrée sur le clavier)

Source

  • Alias Annonce {
  • sockclose Annonce
  • sockopen Annonce <www.nomsite.fr> 80
  • .timerSockAnnonce 1 180 sockclose Annonce
  • }
  • on *:sockopen:Annonce: {
  • if $sockerr > 0 { sockclose $sockname | return }
  • sockwrite -tn $sockname GET <http://www.nomsite.fr/Annonceenfichiertexte.txt>
  • }
  • on *:sockread:Annonce: {
  • if $sockerr > 0 return
  • sockread %AnnonceRead
  • if $sockbr == 0 { return }
  • if (%AnnonceRead == $null) { %AnnonceRead = Aucune News }
  • dialog -m Annonce Annonce
  • sockclose $sockname
  • }
  • Dialog Annonce {
  • TITLE "Info"
  • SIZE -1 -1 350 100
  • OPTION NOTHEME
  • LIST 100, 2 2 346 80, VSBAR, HSBAR
  • BUTTON "&Fermer", 10, 265 75 70 20, OK, CANCEL, DEFAULT, FLAT
  • }
  • On *:dialog:annonce:init:0: {
  • If ( %AnnonceRead != $null ) && ( %AnnonceRead != %AnnonceAncien ) {
  • Did -ra Annonce 100
  • Did -a Annonce 100 %AnnonceRead
  • Set %AnnonceAncien %AnnonceRead
  • .timer 1 5 dialog -x Annonce Annonce
  • }
  • Else { dialog -x Annonce Annonce }
  • Unset %AnnonceRead
  • }
  • ; Pour que l'exécution se fasse au bout d'une minute de connec. ben ouais on a pas tous l'ADSL :op
  • On *:START: {
  • .Timer 1 60 Annonce
  • }
Alias Annonce {
  sockclose Annonce
  sockopen Annonce <www.nomsite.fr> 80
  .timerSockAnnonce 1 180 sockclose Annonce
}

on *:sockopen:Annonce: {
  if $sockerr > 0 { sockclose $sockname | return }
  sockwrite -tn $sockname GET <http://www.nomsite.fr/Annonceenfichiertexte.txt>
}

on *:sockread:Annonce: {
  if $sockerr > 0 return
  sockread %AnnonceRead
  if $sockbr == 0 { return }
  if (%AnnonceRead == $null) { %AnnonceRead = Aucune News }
  dialog -m Annonce Annonce
  sockclose $sockname 
}

Dialog Annonce {
  TITLE     "Info"
  SIZE      -1 -1 350 100
  OPTION NOTHEME
  LIST 100, 2 2 346 80, VSBAR, HSBAR
  BUTTON "&Fermer", 10, 265 75 70 20, OK, CANCEL, DEFAULT, FLAT
}

On *:dialog:annonce:init:0: {
  If ( %AnnonceRead != $null ) && ( %AnnonceRead != %AnnonceAncien ) { 
    Did -ra Annonce 100
    Did -a Annonce 100 %AnnonceRead
    Set %AnnonceAncien %AnnonceRead
    .timer 1 5 dialog -x Annonce Annonce
  }
  Else { dialog -x Annonce Annonce }
  Unset %AnnonceRead
}

; Pour que l'exécution se fasse au bout d'une minute de connec. ben ouais on a pas tous l'ADSL :op
On *:START: {
  .Timer 1 60 Annonce 
}

 Conclusion

il suffit de faire dans les remotes : Nouveau et de coller le code ci-dessus

après il vous reste à modifer les parties entres &lt;&gt; pour aller sur le bon site
et bien sur créer le fichier texte ;o)


 Sources du même auteur

Source avec Zip BARRE DE TITRE POUR MIRC

 Sources de la même categorie

COMMANDES FANTAISIES ( OP DEOP , VOICE DEVOICE ) ORIGINALES par Orona
Source avec Zip Source avec une capture CORRECTEUR par Orona
Source avec Zip Source avec une capture [DLL] DESSINER COMME LES PICWINS SUR UNE DIALOGBOX (BONUS: J... par uaip
Source avec Zip Source avec une capture [DLL] AJOUT D'UN CONTRÔLE RICHEDIT SCINTILLA SUR LES DIALOG... par uaip
Source avec Zip Source avec une capture WORLDDMT - GESTION DE CAISSE V 1.0 par WorldDMT

Commentaires et avis

Commentaire de MaX1391 le 29/11/2002 19:52:05

je comprends pas le système de cette source :/

Commentaire de CyberPunk2020 le 01/12/2002 13:30:29

Le système est de déposer un fichier texte d'une ligne sur un site et de pouvoir l'afficher sur mirc à la connection. Tu peux ainsi prévenir de mise à jour, d'informations, de visue, etc ... En gros c indispasable puisque inutiles lol ;o)

Commentaire de camjelemon le 10/12/2002 15:47:04

Je cherché un systeme de MAJ pour mon prochain script javais lide daller chercher un fichier dans mon site mais g abandonné l'idée mais la avec ce script ( surtt ces socks ) c bon lol !!!
jbc

Commentaire de camjelemon le 10/12/2002 19:22:10

hummmm apres de long test :
&lt;!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN"&gt;
pour un txt heberger chez lycos et ca sera idem pour tt les hebergeur !!! comment la tu fais marcher cyberpunk2000

Commentaire de CyberPunk2020 le 10/12/2002 23:44:34

Le mien marche sur free, tu as bien rentré le nom du site ? le fichier est il bien au bonne endroit ? j'avais la mm erreur quand je ne rentré pas les bon parametre de site

Commentaire de SornDrixer le 31/12/2002 13:12:39 administrateur CS

C'est cool cette source, sauf moi j'aurais voulu pouvoir lire un .txt entier pas juste une ligne :(

Commentaire de CyberPunk2020 le 01/01/2003 01:17:39

eh bien Sorn en faisant une petite boucle testant le -eof- (end of file) tu dois pouvoir le faire je t'avoue ne pas avoir encore regardé bien que j'y ai déjà pensé
Si je fais la modif j'ajouterai la modification sur le site ;o)

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,452 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales