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

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, 5954 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
Batch & Shell
Wmic abfrage soll autoit den wert übergeben
Frage von ChrisDynamiteBatch & Shell1 Kommentar

hallo! nach gefühlt 3 stunden google bin ich leider keinen schritt weiter. wie erreiche ich es, dass ich in ...

Microsoft Office
Werte aus verschiedenen Tabellenblättern vergleichen, farblich markieren
Frage von frosch44Microsoft Office1 Kommentar

Hallo, ich habe 2 verschiedene Tabellenblätter. Wenn ein (einmaliger) Wert in Blatt1 in Blatt2 mind. einmal oder mehrfach vorkommt, ...

VB for Applications
Virtual Basic Wert in eine Zelle eintragen
gelöst Frage von TermimanVB for Applications2 Kommentare

Hallo liebe Leute, ich stehe vor einer kleinen Hürde bei VB für Excel. Und zwar möchte ich gerne in ...

HTML
HTML Formular Werte an Excel Datei übergeben
Frage von gamerffHTML7 Kommentare

Hallo, Kann ich die Werte die Besucher auf meiner webseite in das HTML Formular eingeben an eine Exceldatei übergeben ...

Neue Wissensbeiträge
Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 21 StundenViren und Trojaner1 Kommentar

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Router & Routing

Lets Encrypt kommt auf die FritzBox

Information von bitcoin vor 1 TagRouter & Routing

In der neuesten Labor-Version der FB7490 integriert AVM unter anderem einen Let's Encrypt Client für Zugriffe auf das Webinterface ...

Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 4 TagenInternet17 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Webbrowser

Bugfix für Firefox Quantum released - Installation erfolgt teilweise nicht automatisch!

Erfahrungsbericht von Volchy vor 5 TagenWebbrowser8 Kommentare

Hallo zusammen, gem. dem Artike von heise online wurde mit VersionFirefox 57.0.1 sicherheitsrelevante Bugs behoben. Entgegen der aktuellen Veröffentlichung ...

Heiß diskutierte Inhalte
Batch & Shell
Trusted Sites für alle User auf dem PC einpflegen
Frage von xXTaKuZaXxBatch & Shell12 Kommentare

Aufgabestellung: Es sollen auf 1 PC (bzw. mehreren PCs) vertrauenswürdige Sites per Powershell eingetragen werden, die für alle User ...

Windows 10
Probleme mit Dateien, deren Pfad + Dateiname länger als 256 Zeichen sind
Frage von FalaffelWindows 1011 Kommentare

Guten Tag, unter Windows 10 scheint es immer noch das Problem zu geben, dass der Pfad + Dateiname einer ...

Vmware
DOS 6.22 in VMWare mit CD-ROM
gelöst Frage von hesperVmware10 Kommentare

Hallo zusammen! Ich hab ein saublödes Problem. Es ist eine VMWare mit DOS 6.22 zu erstellen auf dem ein ...

Microsoft Office
Outlook 2016 - Makro startet nicht über Knopf im Menüband
Frage von ZunarasMicrosoft Office9 Kommentare

Schönen guten Tag! ich brauche wieder einmal Hilfe. Ich möchte gerne von Office 2010 32bit auf 2016 64bit wechseln ...