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, 4553 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
Sonstige Systeme
Es war einmal ein BeOS - Wer erinnert sich noch?
Information von BassFishFox vor 23 StundenSonstige Systeme4 Kommentare

Hallo, Bin gerade ueber Haiku gestolpert, von dessen Existenz als "Nachfolger des BeOS" ich wusste nur mich nie wirklich ...

Datenschutz

Microsoft und DSGVO - ob das wohl jemals klappt (Probleme beim Datenabfluss für Office Pro Plus)?

Tipp von VGem-e vor 1 TagDatenschutz3 Kommentare

Servus Kollegen, siehe Aber wer setzt schon MS Office Pro Plus ein? Wie dann der Stand beim "normalen" MS ...

Windows 10

Macht Windows 10.1809 Probleme mit gemappten Netzlaufwerken (betrifft wohl insbes. AMD-Hardware und Trend Micro AV-Produkte)?

Tipp von VGem-e vor 1 TagWindows 103 Kommentare

Moin Kollegen, grad dazu gefunden und Hatten wir dies nicht bei früheren W10-Upgrades ebenfalls? Da bleibt nur, das Upgrade ...

Humor (lol)

Das neue Miniatur Wunderland OFFICIAL VIDEO - worlds largest model railway - railroad

Information von StefanKittel vor 1 TagHumor (lol)2 Kommentare

Hallo, wer noch nie im Miniatur Wunderland war, sollte es dringend mal nachholen. Es gibt eine neues Video. Viele ...

Heiß diskutierte Inhalte
DSL, VDSL
DSL Monitoring Tool - Quick and dirty?
Frage von george44DSL, VDSL15 Kommentare

Liebe Gemeinde, ich suche ein einfaches und vor allem schnell zu installierendes Monitoring-Tool zur kontinuierlichen Dokumentation (nur) der Internetanbindung. ...

Netzwerkgrundlagen
Werksreset HP 1920S-24G
gelöst Frage von HenereNetzwerkgrundlagen14 Kommentare

Servus zusammen, ich habe mir 2 neue Switche zugelegt, doch ich komme damit nicht ganz klar. Waren Vorführgeräte zum ...

LAN, WAN, Wireless
Gäste-WLAN durch DD-WRT AP nach einem MikroTik Routerboard
Frage von NukolarLAN, WAN, Wireless13 Kommentare

Hallo, wie der Titel schon sagt möchte ich gerne ein Gäste-WLAN innerhalb eines bestehenden LANs einrichten. Dass die Gäste ...

Firewall
Sophos UTM 9.5 Firewall Log-File durchsuchen
gelöst Frage von Leo-leFirewall13 Kommentare

Hallo zusammen, weiß jemand von Euch, ob man bei der Sophos die Firewall logs noch etwas besser filtern kann? ...