Soyez le premier à donner votre avis sur cette source.
Vue 4 689 fois - Téléchargée 328 fois
Function Telecharger(fichier as URL, user as boolean) If user then download fichier End Function Function Voter(note as integer, user as boolean,auto as boolean) If user then if auto then vote("10/10")else vote(note) End Function
29 mai 2003 à 14:51
Bravo.
8 déc. 2002 à 17:17
8 déc. 2002 à 16:59
9/10 ;)
8 déc. 2002 à 16:51
If user = True Then download(fichier)
End Function
Function Voter(note As Integer, user As Boolean,auto As Boolean)
If user = True Then
If auto = True Then vote("10/10")
If auto = False Then vote(note)
End If
End Function
C'est bien joli, mais ça peut s'optimiser (et se corriger un peu) :
Function Telecharger(fichier As URL, user As Boolean)
If user Then download fichier
End Function
Function Voter(note%, user As Boolean,auto As Boolean)
If user Then vote iif(auto, "10/10", note)
End Function
Sinon, je trouve ça bien beau :) Bonne continuation !
8 déc. 2002 à 16:36
9/10
DARK SIDIOUS
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.