UP!

2'829 downloads... 0 commentaire?! Personne ne veut donner son avis?

Excellente source! ^^

@Iznogood: tes modifications sont vraiment bonnes, la seule remarque que je me permette de te faire est de ne pas coder avec des accents car c'est une horreur après pour s'y retrouver et cela peut être source d'erreurs quand on oublie de les mettres.

Hello,

Sympa ta petite macro mais...

If Nomdossiers Is Nothing Then
' Rien
Else

serait plus simple de faire:

If NOT Nomdossiers Is Nothing Then
' Développement normal

et cfinalement, c'et du VBS, pas du VBA même si on ne voit pas trop de différences...

100 jours après: 1640 téléchargements du setup (sur sourceforge) et... 0 commentaire. snif!

je débute à peine en c++ mais j'ai une certaine expérience en vb.net ou c# et la première question qui me vient en voyant ton code est: ne serait-il pas plus simple de remplacer la résolution en dur par un code genre:

POINT Ecran = {GetSystemMetrics(SM_CXSCREEN), GetSystemMetrics(SM_CYSCREEN)} ;
Ecran.x  = Taille x;
Ecran.y  = Taille y;

???

Mais bon, encore une fois, je débute...

et ce n'est pas un programme mais juste un snippet...

@Jermeydepr (& Renfield) :
Marche très bien sous XP à condition d'avoir la bonne version de .net framework et studio... ^^ Donc comme le dis Renfield, indique le message complet.

On ne peut pas le faire avec des Sockets plutôt? Parce que si le site tombe, ton appli ne sert plus à rien...

Source en rapport:
http://www.vbfrance.com/codes/VERIFIER-EXISTANCE-ADRESSE-MAIL_49338.aspx

Composant SDK:
http://www.componentspace.com/Products/EmailChecker.aspx

@ghuysmans99: le @"string" te permet, entre autres, de ne pas t'embêter avec les caractères d'échappement "\" ou "\\" pour signaler le chemin complet: @"\noms.txt" == "\\noms.txt" donc si System.Environment.CurrentDirectory se termine par "\\" il n'est pas ajouté...

@bilbo50: ton code n'est pas mauvais et je serais mal placé pour dire que les miens sont parfaits mais c'est en forgeant qu'on devient forgeron et ce site te permettra d'apprendre beaucoup avec des forumeurs franchement ouverts et compétents donc n'hésite pas à poser les bonnes questions sur les forums.

ps: apprends le C#, c'est mieux que le VB... ^_^

@ghuysmans99: je viens de m'apercevoir que j'avais mis du code c# et non vb.net...  mais tu as raison, c'est justement pour cela que je lui demande pourquoi il ne les utilise pas partout... :S

Oui... mais non!

Pour commencer, comme l'a justement dit Ghuysmans99, moi quand je vois ça: "noms = New StreamReader("c:\lejeudu421\noms.txt")", je pars en courant!

Donc soit tu utilises:
->
System.Environment.CurrentDirectory
soit tu utilises :

->
string fileName = Directory.GetCurrentDirectory() + @"\noms.txt";
noms = New StreamReader(fileName)

Ensuite, renommes tes controles pour plus de lisibilité! Idem avec les variables (vd1, vd2,...).

Select... Case, tu connais? Tu les utilises et puis soudain y a ça:

        If vd1 = vd2 And vd2 = vd3 And vd1 = 2 Then gain = v222
        If vd1 = vd2 And vd2 = vd3 And vd1 = 3 Then gain = v333
        If vd1 = vd2 And vd2 = vd3 And vd1 = 4 Then gain = v444
        If vd1 = vd2 And vd2 = vd3 And vd1 = 5 Then gain = v555
        If vd1 = vd2 And vd2 = vd3 And vd1 = 6 Then gain = v666
        If vd1 = vd2 And vd2 = vd3 And vd1 = 1 Then gain = v111

        If (vd1 = 4 Or vd2 = 4 Or vd3 = 4) And (vd1 = 3 Or vd2 = 3 Or vd3 = 3) And (vd1 = 2 Or vd2 = 2 Or vd3 = 2) Then
            gain = v432
        End If

Tu vois où je veux en venir, il faut optimiser ton code, histoire que ça ne ressemble pas à du VBA... :S

Allez, au boulot!