Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Ordnerauswahl
Autor: Redo
Datum: 26.06.02 11:13
Hallo zusammen, In meiner Anwendung kann der Benutzer ganz am Anfang en Basisverzeichnis für Kalibrierdaten auswählen oder ein neues Verzeichnis anlegen.Dies habe ich in Form1 mit einem DirListBox und einem DriveListBox gemachtund 3 Commandbutton mit den Beschriftungen"OK","Abbruch","neues Verzeichnis".Späetr im Programm frage das Verzeichnis mit Form1.Tag ab.Wie bekomme ich es hin daß nach erneuter Ausführung des Programms das Verzeichnis das zuletzt gewählt wurde gespeichert wird dh zum aktuellen Verzeichnis wird und hier ist mein Code: Public Function DirName$() Show vbModal DirName = Tag End Function Private Sub Form_Load() On Error Resume Next Dir1.Path = "C:\" Drive1.Drive = "C:\" End Sub Private Sub Form_Unload(Cancel As Integer) Cancel = True Tag = "" Me.Hide End Sub Private Sub Drive1_Change() On Error Resume Next Dir1.Path = Drive1.Path End Sub Private Sub btnOK_Click() Tag = Dir1.List(Dir1.ListIndex) Me.Hide End Sub Private Sub btnAbbruch_Click() Tag = "" Me.Hide End Sub Private Sub btnNeues_Click() On Error Resume Next Dim verz$, pfad$ pfad = Dir1.List(Dir1.ListIndex) verz = InputBox("Neues Verzeichnis ertellen in : " & pfad, " Verzeichnis erstellen") If verz <> "" Then If Right(pfad, 1) = "\" Then MkDir pfad + verz Dir1.Path = pfad + verz Else MkDir pfad + "\" + verz Dir1.Path = pfad + "\" + verz End If Dir1.Refresh End If End Sub Es wäre großartig wenn jemand mir helfen könnte. Gruß redo

Ordnerauswahl	48	Redo	26.06.02 11:13
Re: Ordnerauswahl	224	Dieter	26.06.02 11:20
Re: Ordnerauswahl	32	Redo	26.06.02 11:34
Re: Ordnerauswahl	254	Dieter	26.06.02 12:06
Re: Ordnerauswahl	28	Redo	26.06.02 12:19
Re: Ordnerauswahl	193	Dieter	26.06.02 12:37
Vielen Dank,es funktioniert super(oT)	25	Redo	26.06.02 12:49

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen