| (In)security allgemein Sicherheit, Anonymität im Netz. Schutz und Maßnahmen. Prävention und Konzepte. Sicherheitsarchitekturen allgemein und auf der Netzwerkebene. |
Diskussion: VB Programm - Directory-Inhalt auflisten im Forum (In)security allgemein, in der Kategorie Security Area; Anzeige Hallo Leute, ich habe da mal drei Fragen. Es geht um das Programm im Anhang. 1. Ich habe in ...
![]() |
| | #1 (permalink) |
| Anzeige Hallo Leute, ich habe da mal drei Fragen. Es geht um das Programm im Anhang. 1. Ich habe in dem Programm eine Ordnerauflistung (rechts) und eine Auflistung von Datein (links), wie bekomme ich es hin, dass ich die Dateien sehe, die in dem Ordner sind, den ich rechts angeklickt habe? 2. Ist es möglich bei Doppelklick auf die ausgewählte Datei auf der linken Seite diese zu öffnen? 3. Ich habe oben einen About-Button, wie erstelle ich beim Klicken auf diesen ein Pop-Up-Fentser mit einem von mir gewähltem Text? Bin für jede Hilfe dankbar, mfg $oul EDIT: Achja, der Source ist natürlich im Anhang mit dabei, aber auch die .exe
__________________ Der eigene Wille müsste stets ein wenig mächtiger sein, als es das eigene Selbst ist. Aber Wunschdenken stellt ein Risiko dar und so etwas können wir uns in einem Weltkapitalismus nicht leisten. | |
| | |
| | #2 (permalink) |
| Registriert seit: 19.09.04 ![]() Likes: 0 | Hi $oul Mit ein paar wenigen Suchanfragen bei Google hättest du dir deine Frage auch ohne weiteres alleine beantworten können. Aber ich will ja mal nicht so sein und hab mir kurz die Mühe gemacht. Code: Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hWnd As Long, _
ByVal lOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Sub Command2_Click()
MsgBox ("man, du bist aber faul!")
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub File1_DblClick()
Dim strPfad As String
strPfad = Dir1.Path & "\" & File1.List(File1.ListIndex)
Call ShellExecute(Me.hWnd, "Open", strPfad, "", Dir1.Path, 1)
End Sub Gruzz local |
| | |
| HaBOT | - Anzeige - |
| |
| | #3 (permalink) |
| Themenstarter | Ok danke schonmal, hab nur noch ein Problem, da ich es aus dem reinen von dir gelieferten Source nicht erkennen kann, wie du das gemacht hast, kann ich folgendes nicht realisieren. Ich möchte auch noch eine Laufwerkswahl mit einbringen, je nach Laufwerk sollen eben dann auch die Ordner in diesem angezeigt werden. Hier noch mal die aktuelle Version von Directory. Wäre nett wenn du das auch noch hinbekommen könntest oder mir das erklären könntest.
__________________ Der eigene Wille müsste stets ein wenig mächtiger sein, als es das eigene Selbst ist. Aber Wunschdenken stellt ein Risiko dar und so etwas können wir uns in einem Weltkapitalismus nicht leisten. |
| | |
| | #4 (permalink) |
| Registriert seit: 19.09.04 ![]() Likes: 0 | Das funktioniert fast gleich wie beim Dir1_Change() ... Also, sobald der User etwas in der Laufwerksauswahl ändert, soll die DirListBox (Dir1) die Ordner auf dem ausgewählten Laufwerk anzeigen. Code: Private Sub Drive1_Change() ' Sobald was geändert wird, .. Dir1.Path = Drive1.Drive ' .. wird der DirListBox das neue Laufwerk zugewiesen. End Sub Code: Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub |
| | |
| | #5 (permalink) |
| Themenstarter | OK, danke für die Hilfe. Weiß nicht ob du es bemerkt hast, hab aber im About als Dank (ich weiß ist nicht viel) deinen Namen erwähnt, danke nochmal.
__________________ Der eigene Wille müsste stets ein wenig mächtiger sein, als es das eigene Selbst ist. Aber Wunschdenken stellt ein Risiko dar und so etwas können wir uns in einem Weltkapitalismus nicht leisten. |
| | |
| | #6 (permalink) | ||
| Registriert seit: 19.09.04 ![]() Likes: 0 | Zitat:
Zitat:
Local | ||
| | |
| | #7 (permalink) |
| Themenstarter | Gern geschehen, hast mir ja viel geholfen.
__________________ Der eigene Wille müsste stets ein wenig mächtiger sein, als es das eigene Selbst ist. Aber Wunschdenken stellt ein Risiko dar und so etwas können wir uns in einem Weltkapitalismus nicht leisten. |
| | |
![]() |
| - Anzeige - | |
| |
| Themen-Optionen | |
| Ansicht | |
| |
Ähnliche Themen | ||||
| Thema | Autor | Forum | Antworten | Letzter Beitrag |
| Kommando zum Laufwerke auflisten | mauralix | Windows | 2 | 24.05.09 15:16 |
| Gelockte User auflisten | Serow | Linux/UNIX | 8 | 10.10.08 20:40 |
| [C/C++] Ordner Hierarchie auflisten | anthor | Code Kitchen | 4 | 09.11.07 00:29 |
| IMAP mailordner auflisten | Xenosmilus | Internet Allgemein | 6 | 10.01.06 20:05 |
| IP Adresse bekannt => Verzeichniss auflisten | vangelis | Internet Allgemein | 2 | 23.12.05 16:29 |