Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

11 commentaire(s) de Drakkhen sur des sources sur tout CodeS-SourceS

Le : 31/01/2005 04:51:22
Source : DOWNLOAD FTP INET AVEC PROGRESSBAR
Je sais pas si ça peut être ça, mais les contrôles OCX fournis avec VB6 datent de 1997...
Ils ne gèrent pas tous les noms de fichiers longs (ex : "C:\Program Files" devient "C:\Progra~1"), ils ne gèrent pas les fonctions récentes (c'est logique), etc...

A mon avis, vous feriez mieux d'essayer un contrôle OCX récent, ou une librairie DLL récente pour avoir moins de problèmes.

Par exemple la DLL de Internet Explorer : wininet.dll
Y'a quelques sources dessus, et vous trouverez facilement sur un site de recherche.

A+


Le : 18/01/2005 00:40:18
Source : ECHANGE DE MESSAGES WINDOWS ENTRE DEUX APPLICATIONS
Hello,
phtribaudeau a raison...

Dans la fonction suivante, la longueur de la chaîne est renvoyée à Resultat, et non l'id de l'atome :

Resultat = GlobalGetAtomName(Atom_Recu, Texte_Recu, 256)

Donc quand tu fais appel à GlobalDeleteAtom avec Resultat :

Resultat = GlobalDeleteAtom(Resultat)

...soit tu ne supprimes aucun Atome, soit tu supprimes le mauvais. Donc soit la mémoire se remplit gentillement, soit le système commence à perdre sa stabilité. :p
Dans les deux cas, c'est pas bon. Tu devrais vite modifier ça.

Sinon la source est excellente, simple et efficace. 10/10

A+


Le : 06/01/2005 07:39:07
Source : CRYPTAGE/DÉCRYPTAGE DE TEXTE PAR ASCII
Salut,

Première chose :
Le dernier caractère de la clé n'est pas utilisé :

If cpt >= Len(cryptkey) Then cpt = 1

Tu aurais dû écrire :

If cpt > Len(cryptkey) Then cpt = 1

Deuxième chose :
Tu déclare cpt en Integer, ton programme perds de la rapidité d'exécution (il fonctionne moins vite). Pour l'optimiser, il faudrait déclarer tes variables numériques en Long, ça prend un peu plus de place en mémoire, mais ça booste énormément l'exécution (cf. : catégorie Optimisation sur le site).

Troisième chose et la plus importante :
Fais gaffe, pour un cracker y'a rien de plus simple à décrypter. ;o)

Ne prends pas mal ce que je dis, c'est pas le but. J'émets juste des critiques constructives. :oP
Sinon pour les débutants, c'est cool d'apprendre à utiliser les codes ascii -> 7/10.

Bon codage, a++


Le : 05/01/2005 16:08:46
Source : BENCHMARK DE BOUCLES
J'ai oublié, il était aussi question de boucles imbriquées. Ca change pas grand chose.


Le : 02/02/2004 21:17:59
Source : TUTORIEL OPTIMISATIONS AVANCÉES
Ah okay... Je pensais que les expressions renvoyaient toutes une valeur String, merci de l'info. Ce qui veut dire que je vais me retaper vite fait une appli, bref...

Afyn : sauf si on commence tôt, avec le genre d'âge où on est content de découvrir qu'on peut se servir d'une variable :oP


Le : 02/02/2004 08:30:38
Source : TUTORIEL OPTIMISATIONS AVANCÉES
Conseils utiles et assez complets, merci :o)
Mais y'a 2-3 trucs qui me paraissent un peu floues...


'Avant
If b >= 0 And b < 255 Then
    a = 32767
End If

'Après (à utiliser avec précaution)
If (b And 255) = b Then
    a = 32767
End If

Dans la première vérification, tu admets une valeur allant de 0 à 254, mais dans la deuxième, tu admets en plus la valeur 255.


Sub DecomposeRGB(Couleur As Long)
    'Avant (maths)
    cb = Int(Couleur / 65536)
    cg = Int((Couleur - cb * 65536) / 256)
    cr = Couleur - cg * 256 - cb * 65536

    'Après (bitmask)
    cb = Couleur And 255&
    cg = (Couleur And &HFF00&) / 256&
    cr = (Couleur And &HFF0000) / &H10000
End Sub

Là, il me semble que tu as inversé les variables "rouge" et "bleu" dans le 2me exemple. :o)


'Après (selon besoins de préçision)
Declare Sub Sleep Lib "kernel32" (ByVal DureeMS As Long)
Sub Wait2(Duree As Single)
Dim t1 As Single
    t1 = Timer + Duree
    Do While Timer < t1
        DoEvents    '<= evite de bloquer le système
        Sleep 1&    '<= libère le CPU pendant 1 milliseconde (évite de chauffer)
    Loop
End Sub

Le Sleep est une bonne idée pour libérer un peu le CPU, mais le problème (comme les contrôles Timer, l'API GetTickCount, et du style) sont de l'ordre des ~50/~15 ms selon le système d'exploitation (9X/NT). Et ça enlève énormément de précision selon la nature du programme (Animation, DirectX, ...).


Une question concernant les chaînes de caractères, les instructions Left$, Mid$, etc... sont-elles différentes des Left, Mid, etc... ?

En tout cas, c'est cool de voir des sources utiles. ;o)

PS : je jurerais que t'étais sur C64 ou Atari vu les I dans les boucles.. :o)


Le : 27/03/2003 03:28:21
Source : CHRONOGRAPHE MUSICAL
Hmmbon, je recommence, dans : HKEY_CURRENT_USER --> Software --> VB and VBA Program Settings --> DTM


Le : 27/03/2003 03:24:50
Source : CHRONOGRAPHE MUSICAL
Ah okay, merci. Donc en effet, je connais pas du tout GetKeySate, je l'ai juste vu une fois, mais sans plus. En j'ai fais mon prg avec DX surtout pour apprendre les routines de bases, pour des futurs projets (comme des petits jeux, on verra).
Et concernant la base de registre, c'est une simple question de "confort" pour l'utilisateur, pour le tempo, touches de raccourcis, etc...
Au cas-où, pour ceux qui veulent enlever les traces, les clés se trouvent dans : HKEY_CURRENT_USERSoftwareVB and VBA Program SettingsDTM


Le : 27/03/2003 00:04:14
Source : CHRONOGRAPHE MUSICAL
Pour plusieurs raisons (pas forcément objectives, mais bon...).
1.Je ne connais pas bien la fonction GetKeyState, mais si je me trompe pas, toutes les touches n'étaient pas accessibles avec cette fonction.
2.J'avais envie de me lancer dans DX8 :oP
Et sinon le "dosleep1loop", je connais pas cette race, sorry, ni la "bdr" d'ailleurs (ça concerne DX ou le prog en lui-même ?)...
Si tu peux m'expliquer stp ?


Le : 26/03/2003 01:07:58
Source : CHRONOGRAPHE MUSICAL
Disons que j'ai créé ce programme parce que je compose avec Reason, et dans ce soft, il n'y a pas de témoin de temps. Donc moi qui voulais savoir la durée de mes musiques, je me suis simplement fait ce petit prog.
Maintenant c'est clair que ça sera pas util à bcp de monde, mais je l'ai mis sur le site pour que les utilisateurs puissent y apprendre des choses qu'ils ne connaissent pas, si je me trompe pas, c'est le but du site (pour répondre à tmcuh).
Quant aux mots-clés anglais, c'est simplement une habitude que j'essaie de prendre.
Merci pour les commentaires en tout cas :o)



1


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version

Photothèque Nouveau !



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
Temps d'éxécution de la page : 0,265 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.