begin process at 2012 02 12 03:57:12
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Tutoriaux

 > THE MULTI (LE RETOUR EN BEAUCOUP MIEUX!)

THE MULTI (LE RETOUR EN BEAUCOUP MIEUX!)


 Information sur la source

Note :
6 / 10 - par 5 personnes
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Tutoriaux Niveau :Débutant Date de création :19/09/2004 Date de mise à jour :10/10/2004 21:05:09 Vu / téléchargé :4 208 / 194
Auteur : CCJ

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

 Description

Cliquez pour voir la capture en taille normale
Voila ma deuxieme source qui est beaucoup mieux faite que la premiere completement foiré!
je tien a preciser q'une partie de ce code n'est pas que de moi c'est ma form "integrite des fichiers" alors merci a tout ce qui m'on aider
(je ne peut pas vous dire de noms car il y en a telement!)
il inclut :
-un editeur de texte
-un mode capture d'ecran
-une fonction Beep
-un controle d'integrité de fichiers
-internet
-un lecteur musical
-un "suprimmeur"
-un pti truc sur les handle
Voila pas de bug connu mais j'attend vos idées de rajouts car les bon programmeur ca manque pas mais des truc a proframmer y a une penurie!
(en passant ne faites pas attention au bug lors du chargement du controle d'integrité ca le fait tousjour mais ca ne pose pas de prob)

Source

  • private sub from_click()
  • dim reponse as integer
  • reponse = msgbox ("Voulez vous telecharger le zip?",vbYesNo,"Question")
  • if reponse = (vbyes) then
  • 'telecharge le zip
  • end if
  • end sub
private sub from_click()
dim reponse as integer
reponse = msgbox ("Voulez vous telecharger le zip?",vbYesNo,"Question")
if reponse = (vbyes) then
'telecharge le zip
end if
end sub

 Conclusion

pas de bug connu

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

20 septembre 2004 18:18:44 :
quelques modifs sur le code
22 septembre 2004 16:20:06 :
petit oubli
10 octobre 2004 21:05:10 :
correction de bugs et ajout de quelques fonctionalitées

 Sources du même auteur

Source avec Zip RENDRE TRANSPARANT SON BUREAU
Source avec Zip UN PROGRAMME MULTI-FONCTIONS(MUSIQUE,CPATURE D'ECRAN,INTERNE...
Toutes les sources de CCJ

 Sources de la même categorie

Source avec Zip DLL PERSONNALISÉ AVEC ÉVÈNEMENTS ET PROPRIÉTÉS EN VB6. par Number7
Source avec Zip Source .NET (Dotnet) EXEMPLE DU TUTORAIL "CLASSES MÉTIER" par Adn56
Source avec Zip Source avec une capture Source .NET (Dotnet) GESTION DES LISTES : RANGEMENT (LIST.SORT) ET FILTRAGE (LIST... par kbalist
Source avec Zip EXEMPLE SUR LES MENUS POUR AIDER LES DÉBUTANTS COMME MOI ;-) par viragoloco
LES OPÉRATIONS DE LA LISTE CHAINÉE par smaili
Toutes les sources de la catégorie Tutoriaux

Commentaires et avis

Commentaire de Ze_Dam le 19/09/2004 14:39:37

Juste pour améliorer le code :

Tout d'abord et c'est valable pour toutes les forms, on met Option Explicit pour l'obligation de la déclaration des variables (code meilleur) et aussi on ne laisse pas Command1 car c incompréhensible ; on mettra plutôt comme nom cmdEnd ou cmdMusique ou cmdInternet etc (tu t'y retrouveras mieux)


dans virusmancode.frm :

Dim essai doit être de type integer et non pas long car elle a la valeur 0,1 ou 2. Tu peux aussi la mettre dans Command1_Click et non pas dans les déclarations de toute la Form.

dans virusmanbeep.frm :

On définit l'intervalle de temps d'un Timer avant de le lancer (avec Enabled = True). Tu demandes aussi de remplir Text (pour les répétitions) mais tu n'en tiens ps du tout compte.

dans virusmanedit.frm :

Tu peux mettre la variable Dim verif As String inuquement dans les deux procédures oû elle est utilisée. Elle peut aussi être de type integer.

dans virusmaninternet.frm

Ben on peut y mettre les contrôles classiques du WebBrowser, pour aller à la page précédente, suivante, etc. Regarde dans l'explorateur d'objets rubrique WebBrowser pour les voir.


Bon il me reste à regarder la Form d'intégrité, mais il y a plus de code, faut que j'analyse tranquille ...

Regarde un coup les améliorations que je te propose, elles devraient déjà améliorer ton programme.

Apparemment il y a un passage que tu ne comprend pas, à savoir avec ReDim Preserve TabFic(X). Ben en fait c'est un tableau, dans lquel on peut enregistrer dans infos de la manière suivante : TabFic(0) = "svn", TabFic(1) = "ksdvhuf", TabFic(2) = "srfj" et ainsi de suite. Alors ReDim permet de le redimensionner. Ex. : ReDim TabFic(2) ne permettra que d'enregistrer dans TabFic(0), (1) et (2) et pas plus loin (bref ca sert à limiter la grandeur de la variable, juste pour limiter son espace dasn la mémoire. Et enfin mettre Preserve permet de ne pas effacer tout le tableau quand on redimensionne.

Bon je vais encore regarder plus profondément de le code de ton prog.

Bonne continu@tion.

Commentaire de Ze_Dam le 19/09/2004 14:50:01

ah ausi je viens de voir d'autres trucs que tu ne comprend pas dans le code :

UBound permet de mettre en majuscule.

ah je viens d'analyser la Form virusmanantivirus.frm ; ben elle n'a aucun intérêt. On enregistre bêtement le nom des fichiers de System32 pour après regarder à partir du fichier Texte s'ils y sont toujours .... bref .. Le scan cours quand même au crash car il n'y pas de DoEvents.

Commentaire de CCJ le 19/09/2004 18:38:32

Desolé Ze_Dam c'est vrai que le code est un peut baclé(enfin beaucoup)mais pour virusmancode je vois pas le difference ca marche tres bien parreil pour virusmanedit.En plus je vois pas de quoi tu veut parler avec doevents dans virusmanantivirus tu veut que je le mette ou?de plus si j'ai mi le code c'est pas vraimment pour les fonctionnalitées c'est pour le code donc...
PS:pour virusmanbeep ca change pas grand chose
voila c'est tout ce que j'ai a dire

Commentaire de CCJ le 19/09/2004 18:42:13

aufait merci quand meme pour ce que t'as car c'est en faisant des erreurs qu'on apprend!
au passage on peut pas tout savoir tout de suite

Commentaire de CCJ le 19/09/2004 18:44:30

Ze_dam t'as raison pour beep j'avai oublier de finir

Commentaire de jack le 19/09/2004 18:47:50 administrateur CS

lol. Juste un détail dans le code du Zip :
MsgBox fournit un Integer, pas un String
Dim reponse As Integer

Commentaire de CCJ le 19/09/2004 18:51:25

merci jack

Commentaire de Ze_Dam le 19/09/2004 20:15:48

Pour ce qui est du type integer dans la MsgBox, je l'avais mis dans mon premier message.

Pour le DoEvents, il permet de ne pas planter le prog dans une (ou plusieurs) boucle(s) qui sont sensées durer un bout de temps. Il faut mettre le DoEvents à l'intérieur de la boucle pour que dans chaque passage dans la boucle, DoEvents soit lu.

J'ai aussi l'impression que tu ne comprend pas mes explications, que le code t'échappes complètement. ON NE MET PAS UNE VARIABLE DE TYPE LONG POUR Y METTRE DES VALEURS 0, 1 ET 2. Je ne vais pas répéter tout ce que j'ai écrit plus haut. Mais tu réponds à mes corrections par "ca change pas grand chose". Ben laisse-moi te dire que tu devrais tout doucement t'aclimater au code "propre". Tu n'iras pas loin si tu ne prend pas soin de faire un code de qualité. Evidemment il faut apprendre tout ca, mais celà semble ne pas t'intéresser.

Il est évident que ce n'est pas en changeant une variable de type long pour une de type integer que ca va radicalement changer la face du monde. Mes c'est en accumulant de légères erreurs que ton programme va devenir plus lent et va utiliser plus de mémoire.

Commentaire de CCJ le 19/09/2004 22:02:53

ok Ze_Dam mais c'est pas que ca m'interesse pas c'est que j'avai pas pigé la difference entre les deux mais maintenant ci c'est bon.
En plus tout le monde n'a pas ton niveau je te rapel que j'ai 13 ans !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
(je comprend ta reaction mais tu pourrai y aller doucement)

Commentaire de ShadowMaster le 19/09/2004 23:02:40

si on veu de la rapidité d'execution il est preferable d'utiliser un long (32bits)

Commentaire de crenaud76 le 20/09/2004 11:30:13

Pour Ze_Dam < UBOound ne permet pas de passer une string en majuscule !!! C'est UCase qui fait cela !
UBound retourne le dernier index d'une dimension d'un tableau !! Rien à voir avec les majuscules/minuscules !!

Commentaire de ShadowMaster le 20/09/2004 12:32:33

je confirme :)

Commentaire de crenaud76 le 20/09/2004 13:34:26

Je confirme aussi Shadowmaster !! Le Long de VB est le mot natif de nos processeurs actuels (bus de données de 32bits) et a donc la taille de donnée optimale !
CCJ < Pas mal du tout ton petit source ... Je le regarde en détail et te dit ce que j'en penses exactement ...

Commentaire de Ze_Dam le 20/09/2004 17:31:23

Oh desolé pour UBound j'avais mal lu. CCJ, excuse-moi si je me suis un peu emporté mais j'ai eu l'impression dans le troizième message de la source que tu te désintéressait de tout ce que j'avais écris pour améliorer le code. ;)

Commentaire de CCJ le 20/09/2004 18:14:44

ok .mais je vais modif la source avec les consail de Ze_dam
voila

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Archos 5 Internet Tablette 500 Go
Entre 396€ et 444€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Single Large Rock Formation in Monument Valley
Photo Sparkling lagoon in the south pacific, Moorea, French Polynesia 

Visiter la photothèque
 
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 : 1,076 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)