title image


Smiley Re: Welchen Verweis brauch ich nochmal für das FileSearch-Objekt?
Unter VB6 benutzt man das CommonDialog-Control. Dieses fügst du unter "Projekt", "Komponenten" hinzu. Das Benutzen geht folgendermaßen von statten:



Option Explicit



Private Sub Command1_Click()



'Microsoft Common Dialog Control 6.0 ist als Komponente eingebunden

'Das in der Menüzeile erscheinende Symbol wird auf die Form gezogen



Dim Datei As String



On Error GoTo Abbruch



With CommonDialog1

.CancelError = True

.InitDir = "d:\irgendwas\"

.Filter = "Ausführbare Dateien (*.exe)|*.exe|"

.ShowOpen

End With



Datei = CommonDialog1.FileName



Abbruch:



Exit Sub



MsgBox Datei



End Sub

Gruß aus Ostfriesland. Möge Tux mit Dir sein!

ff


Proggst du schon .net oder quälst du dich noch mit VB6?



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: