| |
Visual-Basic Einsteiger"BrowseForFolder" | | | Autor: Hollie | Datum: 13.04.24 10:06 |
| Hallo in die VB6-Fangemeinde,
ein Problem, ich hoffe, dass jemand einen Tipp für mich hat.
Betriebssystem: Windows 10.
Ich nutze den "BrowseForFolder" aus dem Beitrag
"https://www.vbarchiv.net/tipps/tipp_1089-browseforfolder-mit-extra-funktionen.html"
in einem Programm an einer Stelle, der eine Netzwerkanmeldung vorausgeht. Nach dieser Anmeldung
soll mittels BrowseForFolder ein Ordner oder eine Datei im Netzwerk ausgewählt werden.
Beispiel:
Angemeldet wird "https://Support.meinServer.de/myCloud", der den UNC-Name "\\support.meinServer.de@SSL\myCloud"
zurück gibt. Die Anmeldung erfolgt mit einem freien Laufwerksbuchstaben "Z:". Soweit so gut, "BrowseForFolder"
zeigt korrekte Daten.
Nun wird die Netzlaufwerkverbindung getrennt und eine andere Netzwerkverbindung hergestellt. Ganz
praxisnah, eine Verbindung zur Fritzbox "\\fritz.box\fritz.nas", deren UNC-Name "\\fritz.box\fritz.nas" lautet.
Es wird wie zuvor ebenfalls der LW-Buchstabe "Z:" verwendet.
Das Problem: "BrowseForFolder" zeigt jetzt den UNC-Name der ERSTEN NW-Anmeldung. Ich bin zwar technisch
tatsächlich mit der Fritzbox verbunden, nur wird der neue, aktuelle UNC-Name NICHT angezeigt.
Verwende ich bei dieser zweiten Anmeldung stattdessen z.B. den Laufwerksbuchstaben "Y:" (also einen anderen
Buchstaben), dann stimmt die Anzeige in "BrowseForFolder".
Vorsichtshalber die Bemerkung, dass die Anzeige im Windows-Explorer immer korrekt ist, nur halt nicht
in "BrowseForFolder".
Irgendwo in den Tiefen (des Systems) scheint der UNC-Name der Erstanmeldung unter "Z:" im "Gedächtnis" zu
bleiben. Meine Tests zeigten, dass erst nach einem Rechnerneustart diese "Erinnerung" gelöscht ist.
Hat jemand einen Rat oder die Erfahrung, was ich tun könnte, um dieses Problem zu lösen?
(Cache leeren oder TMP-Dateien löschen hat nicht geholfen, das hab ich schon probiert.)
Vielen Dank und beste Grüße. | |
Re: "BrowseForFolder" | | | Autor: Hollie | Datum: 15.04.24 19:52 |
| Hallo in die Runde, hallo "-Franky-",
danke für den Tipp "-Franky-".
Mit den gelieferten Stichworten "IFileDialog" und "FOS_PICKFOLDERS" selbst bin ich als "learner-by-doing" überfordert,
konnte aber im Netz etwas fertiges finden
(https://www.vbforums.com/showthread.php?785837-VB6-Common-Dialog-Replacement-IFileDialog-Vista).
Leider tritt auch hier der beschriebene Anzeigefehler auf.
Beim weiteren Herumprobieren hab ich mal die VB6-eigene "DriveListBox" eingeschaltet und musste feststellen,
dass auch hier etwas falsches angezeigt wird (wie in der Problembeschreibung dargestellt).
Nun bin ich am Grübeln, ob meine Win10-Installation eine Macke hat oder hier ein Windows-Bug vorliegt.
Vermutlich aber wird sich niemand finden, der diese Frage beantworten kann. Oder? Vielleicht Dieter?
Danke und Grüße. | |
Re: "BrowseForFolder" | | | Autor: -Franky- | Datum: 15.04.24 22:55 |
| Hi. Hmm, das ist eigenartig da Du schreibst, das das Problem im Explorer selbst nicht auftritt. Wie schaut es denn bei diesem Bsp aus? http://www.activevb.de/cgi-bin/upload/download.pl?id=3712 Um das ganze mit dem Explorer vergleichen zu können, könnte man mal entweder das Interface INameSpaceTreeControl oder das Interface IExplorerBrowser ausprobieren -> https://www.vbforums.com/showthread.php?798633-VB6-Vista-Host-Windows-Explorer-on-your-form-navigation-tree-and-or-folder
Mit freundlichen Grüßen
-Franky- | |
Re: "BrowseForFolder" | | | Autor: Hollie | Datum: 16.04.24 10:13 |
| Yepp, schnelle Antwort, dankeschön Franky.
Nun, das Projekt aus dem "Tipp 107" liefert die identische fehlerhafte Anzeige.
a) Anmeldung "\\fritz.box\" mit LW-Buchstaben "Z:" --> Anzeige korrekt.
b) Abmeldung "\\fritz.box\"
c) Anmeldung "\\support.meinServer.de@SSL\myCloud" mit "Z:" --> Anzeige falsch ("\\fritz.box\")
Den genannten Vorschlag aus "https://www.vbforums.com/..." bekomme ich nicht zum Laufen.
Habe hier die Archive "ExplorerBrowser_Rev2.zip" und "oleexp65-R1.zip" heruntergeladen, entpackt,
die "oleexp.tlb" und "oleexpimp.tlb" nach "SysWOW64" kopiert (soweit ich verstanden habe, ist eine Registrierung
nicht notwendig) und dann das "ExplorerBrowseDemo.vbp" geöffnet. Hier noch die Verweise auf die "tlb" eingebunden.
Doch daran scheitere ich nun:
mit Hinweis auf "Public Sub INameSpaceTreeControlEvents_OnBeforeContextMenu(ByVal psi As IShellItem, riid As UUID, ppv As IContextMenu)"
erhalte ich "Deklaration der Prozedur entspricht nicht der Beschreibung eines Ereignisses oder einer Prozedur mit demselben Namen".
Habe ich hier etwas falsch "zusammengeschaltet" oder auch falsch verstanden (auf den Seiten von "vbforums.com") ?
Eigentlich bin ich schon am Resignieren, verspüre dennoch einen Rest von Ehrgeiz, das in den Griff zu bekommen.
Auch was das mögliche Anzeigeergebnis aus "ExplorerBrowseDemo.vbp" wäre.
Na mal sehen.
Danke und einen erfolgreichen Tag. VG. | |
Re: "BrowseForFolder" | | | Autor: -Franky- | Datum: 16.04.24 21:58 |
| Hi. Zu den Beispielen von Fafalone auf vbforums.com kann ich wenig sagen. Da müsstest selbst auf vbforums.com nachfragen. Ich kenne diese Beispiele und auch wie diese grundsätzlich funktionieren, heruntergeladen habe ich diese Beispiele zum testen jedoch nicht. Fafalone hat auch ein fertiges 32bit OCX für VB6 -> ucExplorer das Du hier finden kannst: https://github.com/fafalone/ucExplorer Das sollte genauso funktionieren wie der Explorer auch.
Mit freundlichen Grüßen
-Franky- | |
Re: "BrowseForFolder" | | | Autor: Hollie | Datum: 17.04.24 11:16 |
| Danke Franky, ich schaue mir das mal an bzw. probiere mal, ob das brauchbar ist. | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere InfosTipp des Monats Dezemeber 2024 Roland WutzkeMultiSort im ListView-ControlDieses Beispiel zeigt, wie sich verschiedene Sortierfunktionen für ein ListView Control realisieren lassen. Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|