OCX EXPLORATEUR WINDOWS FAÇON TREEVIEW TIRER DU CODE DE RENFIELD

cs_radada Messages postés 488 Date d'inscription lundi 15 septembre 2003 Statut Membre Dernière intervention 21 avril 2009 - 19 oct. 2003 à 18:49
cs_ym_trainz Messages postés 160 Date d'inscription vendredi 27 janvier 2006 Statut Membre Dernière intervention 21 avril 2015 - 26 avril 2008 à 18:08
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/17194-ocx-explorateur-windows-facon-treeview-tirer-du-code-de-renfield

cs_ym_trainz Messages postés 160 Date d'inscription vendredi 27 janvier 2006 Statut Membre Dernière intervention 21 avril 2015
26 avril 2008 à 18:08
Merci Yomm,

Cette version ocx du code de Renfield (code.aspx?ID=7433) est vraiment impecc et simple à utiliser.
La propriété .chemin est opérationnelle et suffisante pour moi.
Adopté ;-)

Cordialement,
ym_trainz
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
14 févr. 2006 à 22:32
>> wicca05
encore toi ;-)
et toujours pas sur le bon source ;-)
regarde mon porjet intitulé:
YOMMEXPLOREROCX POUR CE QUI VEULENT UN VRAI EXPLORATEUR
c'est celui ci qui te permettra de n'afficher que les pdf !!!!

@+
wicca05 Messages postés 9 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 février 2008
14 févr. 2006 à 22:14
Tout d'abord Bravo pour ce super boulot a toi et Renfield... 10/10
une petite questn comment faire pour n'afficher que certain fichiers (que les pdf dans mon cas) dans la fenetre du webbrowser ?
merci encore de nous faire partager votre travail... si on progresse pas avec tout ça.... :-)
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
30 janv. 2005 à 00:48
Franchement, BRAVO!

10/10
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
23 nov. 2004 à 21:13
désolé j'ai été un peu absent ces temps ci pour cause de crash disk ;-)


>>Micool :
1) chemin Root perso:
voilà, j'ai ajouter cette possibilité...dans la propriété root mets -1 = Perso
ensuite, tu paramettres ton RootPath comme tu veux ....exemple "c:" ainsi , l'arborescence se fera a partir du chemin de ton choix...
2) FileExplorer en listview:
le développement est en cours pour bon nombre de raisons dont celle que tu as cité...et pour bon nombre de demande ;-)

>>moony01:
je ne vois pas de problème tant que tu peux mettre des ocx dans access...perso jamais testé ;-)

@+ tout le monde
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
23 nov. 2004 à 16:09
normallement oui, on peut ajouter des controles sous Access....
moony01 Messages postés 21 Date d'inscription vendredi 12 novembre 2004 Statut Membre Dernière intervention 27 mars 2007
23 nov. 2004 à 15:53
je peux utiliser cet OCX dans une application access 2000 (des formulaires...) ?
Micool Messages postés 2 Date d'inscription lundi 14 avril 2003 Statut Membre Dernière intervention 27 octobre 2004
27 oct. 2004 à 19:41
Le controle DirExplorer est vraiment super: ne ne lui trouve qu'un seul défaut ( mais spécifique au besoin que j'en ai: c'est qu'on ne puisse pas utiliser un répertoire quelconque comme root )

Le FileExplorer, lui me laisse perplexe: pourquoi ne pas avoir eu recours à un contrôle ListView qui aurait permis d'afficher des détails sur les fichiers listés, par exemple ?
Enfin tout de même: du très bon boulot !
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 sept. 2004 à 00:15
il te faut le fichier ISHF_Ex.tlb
cs_PaTaTe Messages postés 2126 Date d'inscription mercredi 21 août 2002 Statut Contributeur Dernière intervention 19 février 2021 2
19 sept. 2004 à 21:59
j'ai une erreur sur l'api :
Declare Function SHGetMalloc Lib "shell32" (ppMalloc As IMalloc) As Long

type de l'erreur : Type défini par l'utilisateur non défini

Pkoi ?
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
22 juin 2004 à 20:15
voici la dernière mise a jour
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
6 mai 2004 à 00:39
a voir...ça fait longtemp que je me suis pas replongé dans ce code étant donné que je suis en train de bossé sur une appli qui risk d'intéresser énormément de monde...mais qui me demande pas mal de dev...donc si j'ai le temps je jetterai un oeil...
cs_azerty25 Messages postés 1114 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 6 mai 2007
5 mai 2004 à 19:57
Hello
Juste une ptite demande à te faire si tu peux, car moi, comme tu le sais, flotte un peu quand je suis dans les codes de Rey et toi. Donc ce que je voudrai te demander c'est si tu pourrai faire pour que l'on puisse choisir un répertoire root personnalisé, par prendre un déja défini
musicmandj5 Messages postés 42 Date d'inscription vendredi 9 avril 2004 Statut Membre Dernière intervention 17 février 2005
4 mai 2004 à 08:35
Salut c'est possible de mettre ça sous vba???
Bravo pr tt!
cs_azerty25 Messages postés 1114 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 6 mai 2007
24 févr. 2004 à 10:54
a oui désolé :-/ j'avai pas fait attention a sa
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
24 févr. 2004 à 10:36
euh pour ce qui est de la release dont je parlais le 21/10/03 ça fait longtemp que c'est fait lol mais j'avais oublié de le dire lol

sinon:

message original de azerty25
------------------------------------------------------------------------------------
(....le début concernant le FileExplore , je l'ai reporté sur le post du FilExplorer)
et dans le DirExplorer1, je sais pas trop pourquoi mais tu a supprimé dans fonctions intéressantes de Renfield tel que le reseau ou le bureau, c'est bien dommage :-/ Sinon, c'est bien :)
------------------------------------------------------------------------------------
euh t'as vu kon pouvait modifier la valeur DirExplorer1.Root ?????
cad la chemin initial de ton arbre.......
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
21 oct. 2003 à 22:50
> devsurf
si tu épluche un peu plus mon code tu verras que tu récupères l'info dont tu parles via DirExplorer1.Chemin

donc en gardant mon source et sans rien changer, tu peux faire :

Private Sub DirExplorer1_Click()
lblSelected.Caption = DirExplorer1.Chemin
End Sub

;-)

Sinon je vais bosser sur la possibilité de passer un chemin par défaut genre :
DirExplorer1.Chemin = "C:Windows"

ça peut être util...

;-)
devsurf Messages postés 148 Date d'inscription dimanche 13 octobre 2002 Statut Membre Dernière intervention 13 novembre 2008
20 oct. 2003 à 20:57
C'est très sympa. Merci à toi et à rienfield.
Par contre je l'ai modifié de facon que je puisse connaitre l'élément qui est selectionné .

Remplacer dans le control l'evenement click:

Public Event Click()
Par celui ci :

Public Event Click(ItemSelected As String)

Dans le control toujours:- dans la procedure TreeView_NodeClick

Remplacer l'evenement raiseevent click() par
raisevent click(node.tag)

Comme ceci
TreeView_NodeClick(ByVal node As ComctlLib.node)

Private Sub TreeView_NodeClick(ByVal node As ComctlLib.node)
ObjPath = node.Tag
If node.Tag <> "" Then
RaiseEvent Click(node.Tag)
End If
End Sub

Puis recomplier le controle
De cette facon on peut utiliser l'evenement click du control pour afficher l'element séléctionné- ca peut servir .

Exemple dans la forme de l'application cliente::
Private Sub DirExplorer1_Click(ItemSelected As String)
lblSelected.Caption = ItemSelected
End Sub
yomm Messages postés 515 Date d'inscription dimanche 17 février 2002 Statut Membre Dernière intervention 10 mars 2008 3
19 oct. 2003 à 19:22
je viens de modifier le zip pour la déclaration de l'évenement click()
cs_radada Messages postés 488 Date d'inscription lundi 15 septembre 2003 Statut Membre Dernière intervention 21 avril 2009 1
19 oct. 2003 à 18:49
y tue ce renfield qd même :D:D:D:D
Ca a l'air chouette en tout cas :p:p
Rejoignez-nous