Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Eintrag in einer DirListBox markieren und Wert übergeben

Frage Entwicklung VB for Applications

Mitglied: skid

skid (Level 1) - Jetzt verbinden

25.01.2007, aktualisiert 26.01.2007, 5933 Aufrufe, 3 Kommentare

Hi,

suche in VB eine Möglichkeit den Namen eines markierten Eintrags zu ermitteln.

D.h. ich markiere (Einfachklick) einen Eintrag in der DirListBox und möchte diesen z.B. in einer MsgBox wieder ausgeben.

Hier schon mal das was ich bisher habe:

01.
Private Sub Form_Load() 
02.
 
03.
Drive1.Drive = "\\Servername" 
04.
 
05.
Dir1.Path = "\\Servername\Freigabe" 
06.
 
07.
Dir1.Path = Drive1.Drive 
08.
 
09.
End Sub
Die DirListBox startet in einem bestimmten Verzeichnis.
Wenn ich einen Eintrag Doppelklicke kann ich mir den Pfad anzeigen lassen:

01.
Private Sub Command1_Click() 
02.
 
03.
MsgBox Dir1.Path 
04.
 
05.
End Sub 
So, das ganze soll jetzt aber auch funktionieren wenn der Eintrag nur Markiert ist.

Vielleicht kann mir ja jemand sagen wie es geht !?

Gruß
SKID
Mitglied: bastla
25.01.2007 um 17:01 Uhr
Hallo skid!

Einfach so wie bei einer gewöhnlichen ListBox:
01.
MsgBox Dir1.List(Dir1.ListIndex)
Grüße
bastla
Bitte warten ..
Mitglied: skid
26.01.2007 um 09:31 Uhr
Hi bastla,

Super, genau das war es

Hmmm...hat zwar mit der eigentlichen Fragestellung nix zu tun aber gibt es , so auf die schnelle, eine Möglichkeit den Doppelklick auf die einzelnen Einträge in der DirListBox zu unterbinden ?

Also so, das es nicht möglich ist in die Unterverzeichnisse zu gelangen ?

Gruß
SKID
Bitte warten ..
Mitglied: bastla
26.01.2007 um 11:50 Uhr
Hallo skid!

... das es nicht möglich ist in die Unterverzeichnisse zu gelangen ...
Eigentlich wäre das über die Sicherheitseinstellungen zu bewerkstelligen.

Du könntest aber das Auflisten der Dateien für ganz bestimmte Ordner verhindern. Dazu könnte der Code für das " ;Dir1_Change"-Ereignis schematisch etwa folgenden Inhalt haben:
01.
If Instr(LCase(Dir1.Path), "verboten") Then 
02.
    MsgBox "Ordner nicht verfügbar ..." 
03.
ElseIf Instr(LCase(Dir1.Path), "whatever") 
04.
    'oder auch gar kein Code 
05.
Else 
06.
    File1.Path = Dir1.Path 
07.
End If
Damit würdest Du zB Inhalte von Ordnern, deren Pfad die Bestandteile "verboten" oder "whatever" enthält, nicht in der FileListBox anzeigen. Ob diese Vorgangsweise sinnvoll ist, musst Du selbst beurteilen.

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Webbrowser
gelöst URL an Internet Explorer aus Datei übergeben (4)

Frage von hesper zum Thema Webbrowser ...

Microsoft Office
Excel: maximale Anzahl in Folge stehender Werte ermitteln (1)

Frage von Flexxa zum Thema Microsoft Office ...

Neue Wissensbeiträge
Linux Netzwerk

Ping und das einstellbare Bytepattern

(1)

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(3)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Microsoft Office
Office Druck fehler (18)

Frage von DaistwasimBusch zum Thema Microsoft Office ...

Netzwerkmanagement
Windows Server 2008 R2: "netsh reset" nicht verfügbar? (11)

Frage von RickTucker zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
Uninitialisierte Festplatte - Daten retten (11)

Frage von peterla zum Thema Festplatten, SSD, Raid ...

Microsoft Office
Outlook 2016 in Ordneransicht starten - GPO (10)

Frage von D-Line zum Thema Microsoft Office ...