Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Winziges Problemchen mit FolderBrowserDialog

Mitglied: nippon-tussi

nippon-tussi (Level 1) - Jetzt verbinden

04.10.2011, aktualisiert 07:13 Uhr, 4544 Aufrufe, 3 Kommentare

Ich möchte im Verzeichnisbaum ein Unterverzeichnis automatisch aufklappen lassen.

Nach Zuweisung eines Pfades an FolderBrowserDialog.SelectedPath zeigt der FolderBrowserDialog z.B.folgendes an:

03d79c7b5fbed98b694b2e18b02b2872 - Klicke auf das Bild, um es zu vergrößern

Wie man sieht, ist das vorher angegebene Verzeichnis korrekt selektiert (hier "B").

Ich möchte erreichen, dass der FolderBrowserDialog schon beim Aufruf von FolderBrowserDialog.ShowDialog(), also unmittelbar nach dem der FolderBrowserDialog auf dem Bildschirm angezeigt wird ohne Zutun des Benutzers (z.B. Cursor-rechts) auch die Unterverzeichnisse anzeigt.

Also so:

4eb4d1b745ee581b75290b6b3be8b2a9 - Klicke auf das Bild, um es zu vergrößern

Wie kann ich das erreichen?

Ein paar Google-Stichworte oder Codefetzen, egal in welcher Sprache, würden mir schon helfen.

Danke fürs lesen, Tussi
Mitglied: Logan000
04.10.2011 um 08:36 Uhr
Moin Moin

Nach kurzen drüberschaun, würde ich sagen das wird nichts.
Die Klasse gibt sowas nicht her.

Gruß L.
Bitte warten ..
Mitglied: colinardo
04.10.2011 um 10:29 Uhr
Du könntest den Dialog per SendKeys-Methode steuern.
Folgendes kannst du mit einer Form testen auf dem ein Button den FolderBrowserDialog aufruft.
Funktionsweise: Der Timer sucht nach dem Start nach einem Fenster mit dem Titel "Ordner suchen", falls er es findet, sendet er Tastaturanschläge an den Dialog um den Ordner aufzuklappen.
01.
   Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long 
02.
    Private Declare Function SetForegroundWindow Lib "user32" Alias "SetForegroundWindow" (ByVal hwnd As Long) As Integer 
03.
    Dim WithEvents t1 As New Timer 
04.
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
05.
        Dim fd As New FolderBrowserDialog 
06.
        t1.Interval = 200 
07.
        With fd 
08.
            .SelectedPath = "C:\Windows" 
09.
            t1.Start() 
10.
            .ShowDialog() 
11.
            t1.Stop() 
12.
        End With 
13.
    End Sub 
14.
 
15.
    Sub SendKeysToApplication(ByVal AppTitle As String, ByVal key As String) 
16.
        Dim hWnd As Long = FindWindow(Nothing, AppTitle) 
17.
 
18.
        If hWnd <= 0 Then 
19.
            '*** TO DO *** Fenster existiert nicht 
20.
        Else 
21.
            SetForegroundWindow(hWnd) 
22.
            SendKeys.SendWait(key) 
23.
            t1.Stop() 
24.
        End If 
25.
 
26.
    End Sub 
27.
 
28.
    Private Sub t1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles t1.Tick 
29.
        SendKeysToApplication("Ordner suchen", "{TAB}{TAB}{right}") 
30.
    End Sub 
31.
 
32.
 
Bitte warten ..
Mitglied: nippon-tussi
04.10.2011 um 12:55 Uhr
Ja, mit Sendkeys geht es ganz gut. Nicht wirklich elegant, aber für meine Zwecke reicht es.

Da FolderBrowserDialog.Showdialog unmittelbar auf t1.Start folgt und somit der Dialog ohnehin den Fokus hat, habe ich auf SendKeystoApplication verzichtet und rufe Sendkeys.Sendwait direkt in t1_tick auf.

Danke für den Tipp!
Bitte warten ..
Ähnliche Inhalte
VB for Applications
WshShell.Run Problemchen
gelöst Frage von Batch-AlorVB for Applications5 Kommentare

Guten Tag zusammen, ich bin hier zwar nicht regelmäßig Gast, habe aber trotzdem ein kleines Problem bei dem mir ...

Visual Studio

FolderBrowserDialog - SelectedPath in sichtbaren Bereich anzeigen

gelöst Frage von Rene1976Visual Studio6 Kommentare

Hallo, Wir haben beim FolderBrowserDialog mit vb.net über SelectedPath einen Netzwerkpfad voreingestellt. Dieser ist leider nie im sichtbaren Bereich ...

Outlook & Mail

Problemchen bei Outlook Content

Frage von TechnoXOutlook & Mail2 Kommentare

Guten Morgen, es kommt gelegentlich vor das User sich melden, klagen das sie keine Anhänge in ihrem Outlook öffnen ...

LAN, WAN, Wireless

Seltsames Netzwerk"problemchen" mit Wlan-Drucker

gelöst Frage von RotnasenkaterLAN, WAN, Wireless6 Kommentare

Guten Morgen, liebe Gemeinde und zuerst mal noch ein frohes Osterfest nachträglich! Ich habe seit eine knappen Woche ein ...

Neue Wissensbeiträge
Verschlüsselung & Zertifikate
Meine Wissenssammlung zu Bitlocker
Erfahrungsbericht von DerWoWusste vor 5 StundenVerschlüsselung & Zertifikate1 Kommentar

Die Motivation für diesen Beitrag waren die vielen Posts rund um dieses Thema, die deutlich machen, wie viele Einzelaspekte ...

E-Mail
Email-Apps und Verhalten bei Pop3
Erfahrungsbericht von kfranzk vor 2 TagenE-Mail11 Kommentare

Hallo Freunde, da mir mein diesbezüglicher Faden als gelöst markiert wurde, muss ich hier neu aufsetzen. Ich arbeite bewusst ...

Hyper-V

Optimiertes Ubuntu per Microsoft Hyper-V-Schnellerstellung verfügbar

Anleitung von Frank vor 2 TagenHyper-V

Für Microsofts Virtualisierungssoftware Hyper-V ist ab sofort auch ein optimiertes Ubuntu 18.04.1 LTS verfügbar. In der "Hyper-V-Schnellerstellung" App, die ...

Sicherheits-Tools

Trend Micro WorryFree Business Security (WFBS) 10 - neuer Patch 1470 verfügbar

Tipp von VGem-e vor 2 TagenSicherheits-Tools1 Kommentar

Servus, mal sehen, ob mit Patch 1470, zu finden unter dann die angeblich fehlerhafte Funktion, die unter W10 im ...

Heiß diskutierte Inhalte
Netzwerke
Hilfe bei der Planung meines Heimnetzwerks
Frage von DHD082Netzwerke14 Kommentare

Hallo zusammen, wir bauen gerade ein Einfamilienhaus, welches ich mit einem Heimnetzwerk ausstatten möchte. Da ich zwar auch in ...

Hardware
Sophos SG135 - Routing
Frage von Xaero1982Hardware13 Kommentare

Moin Zusammen, ich ersetze gerade nen alten Cisco DualWAN Router durch eine SG 135. Ich muss bestimmte Ziele über ...

Tipps & Tricks
Nagstamon und PRTG Monitoring
Frage von Der.ITlerTipps & Tricks13 Kommentare

Hallo Ihr, heute am Sonntag bin ich mal früh aufgestanden um mich mit dem Problem von Gestern zu beschäftigen. ...

Datenschutz
Gilt ein Ransomware-Befall als Datenpanne nach DSGVO?
Frage von MOS6581Datenschutz12 Kommentare

Moin Kollegen, wenn sich jemand Ransomware einfängt und dadurch bspw. Kundendaten verschlüsselt werden; gilt dies dann als meldepflichtige Datenpanne ...