• Aide à la navigation du site
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • RSS CodeS-SourceS
  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
begin process at 2008 08 29 03:17:46
1 233 485 membres
26 nouveaux aujourd'hui
14 291 membres club
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 !

MAGICFOLDER OU COMMENT RECUPÉRER 20 DOSSIERS DE WINDOWS


Information sur la source

Catégorie :Control Niveau : Débutant Date de création : 22/03/2003 Date de mise à jour : 12/04/2003 14:21:55 Vu / téléchargé: 3 419 / 367
Auteur : FrostByte Ecrire un message privé
Note :
9 / 10 - par 4 personnes
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

Description

Update : rajout de 4 dossiers
Ce controle vous permet de recupérer de récupérer 20 dossiers issus de windows dont voici la liste :

windows
fichiers temp
fichier internet temporaires
menu démarrrer
bureau
programmes
mes documents
favoris
menu demarrage
fichiers récents
raccourcis envoyers vers
voisinnage réseau
polices
modeles
cookies
historique
-------------UPDATE
system
program files
imprimantes
données d'application (applog)


Syntaxe :
msgbox magicfolder1.spefolder(x)
x étant un entier compris entre 1 et 20

aprés une petite reflection je n'ai pas decidé de mettre en place le systeme d'enum, je vois pas trop l'interet
ps : c'est mon premier controle activeX, donc un peu d'indulgence !! LOL, sinon si vous avez des commentaires, des bugs à me soumettre, ou même des mise-à-jour elles sont les bienvenues  

Conclusion

Il me semble qu'il y ait un bug, lors de la compilation d'un programme, et des que vous avez quitté l'envirronement ide de vb le prog plante (enfin chez moi), est-ce que cela se passe aussi chez vous ?  
  • signaler à un administrateur
    Commentaire de jack le 23/03/2003 20:09:02 administrateur CS

    Si c'est vraiment ta première OCX, bravo.
    C'est éfficace.
    Tu pourrais l'améliorer en utilisant :
    Public Enum WinRépertoires
        WinRep_Temp = 1
        WinRep_Windows = 2
        WinRep_IE_Temporaire = 3
        WinRep_MenuDémarrer = 4
        WinRep_Bureau = 5
        WinRep_ProgramFiles = 6
        WinRep_Documents = 7
        WinRep_Favoris = 8
        WinRep_MenuDémarrerDémarrage = 9
        WinRep_FichiersRécents = 10
        WinRep_EnvoyerVers = 11
        WinRep_VoisinageRéseau = 12
        WinRep_Polices = 13
        WinRep_ShellNew = 14
        WinRep_Cookies = 15
    End Enum

    en modifiant :
    Public Function SpeFolder(NumberOfFolder As WinRépertoires) As String

    Comme cela, dans l'appli qui utilise la fonction de ton OCX, il voit apparaitre les noms des répertoires cherchés : Plus intuitif. Exemple :

        Label1.Caption = MagicFolder1.SpeFolder(WinRep_Bureau)

    Si, en ouvrant la parenthèse de SpeFolder, la liste n'apparait pas, simplement faire Alt-Espace pour la faire apparaitre.

    vala
    Jack

  • signaler à un administrateur
    Commentaire de FrostByte le 23/03/2003 20:27:02

    Merci j'en prends note !!!!

  • signaler à un administrateur
    Commentaire de matrey le 24/03/2003 17:43:38

    Bravo !!! 10/10

  • signaler à un administrateur
    Commentaire de FrostByte le 24/03/2003 19:14:57

    merci

  • signaler à un administrateur
    Commentaire de jack le 14/11/2004 05:09:21 administrateur CS

    Salut FrostByte
    En passant : "aprés une petite reflection je n'ai pas decidé de mettre en place le systeme d'enum, je vois pas trop l'interet"

    L'intérêt, c'est que, au moment où tu tapes la commande de ta fonction, tu as une liste de textes explicites qui apparaissent. Sinon, toi, tu es obligé de connaître le n° du répertoire que tu cherches.
    Disons que ça te fais gagner 1 minute à chaque fois que tu t'en sers ...

Ajouter un commentaire

Pub



Appels d'offres

Recherche developpeur ...
Budget : 700€
SITE MARCHAND LOCATION...
Budget : 3 000€
SITE MARCHAND POUR HOTEL
Budget : 4 000€

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

Boutique

Boutique de goodies CodeS-SourceS
Nos partenaires et amis ;-)
TechHeadBrothers.com DOTNET-PROJECT.COM Moteur de recherche Mozbot Colocation dans toute la France forum informatique Visual Basic - Centre de développement


Dev réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND, Bidou, Nurgle
Base de données maintenue par Christian, Design réalisé par Guillaume, Mascotte réalisée par N.SOREL (Nix) & KDO-Comception
VBFrance.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
Hébergement de Serveur dédié - Téléphonie VOIP - Comparer les prix - Envoyer des ecards gratuit - Icones
Temps d'éxécution de la page : 0,3125-4sec
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é.