Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Sortowanie plikow otwieranych z folderu -jak wykonac?
anonim




Typ: Nie zarejestrowany
Sortowanie plikow otwieranych z folderu -jak wykonac?

Witam!
Jak posortowac alfabetycznie, a najpierw utworzyc liste wszystkich plikow w wybranym folderze?
Lista moze byc w dowolnej postaci np: ListBox

Czyli:
Startujemy program i mamy jedynie opcje: WYBIERZ FOLDER
-wybieramy a tu pojawia sie nam ListBox ze wszystkimi pliami wystepujacymi w folderze a do tego posortowanymi alfabetycznie!
Ciekawostka moze tez byc sortowanie pod innymi wzgledami:
-alfabetyczne
-rozmiar
-utworzony
-zmodyfikowany
-rodzaj pliku (Graf,Muz,Text,HTML itp)

Pozdrawiam.

15-09-2004 21:12
  
mikmas
From Łódź Stadt




Typ: neutral
Postów: 772
Zarejestrowany: Apr 2003

Stwórz sobie formę i na niej rozmieść: DriveListBox, DirListBox, FileListBox. Przejdź do modułu i wpisz:

Dim SelectedFile As String
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub File1_Click()
if right(file1.path,1)="\" then
SelectedFile = File1.path & file1.filename
else
SelectedFile = File1.path & "\" & file1.filename
end if
End Sub

I będziesz miał posortowane...
W zmiennej SelectedFile masz przechowywaną ścieżkę dostępu do wybranego przez użytkownika pliku


_____________________________________________
4C;65;70;69;65;6A;20;62;79;9C;20;73;69;EA;20;
62;61;72;64;7A;69;65;6A;20;73;6B;6F;6E;63;65;
6E;74;72;6F;77;61;B3;20;6E;61;20;6F;64;70;6F;
77;69;65;64;7A;69;2C;20;61;20;6E;69;65;20;6E;
61;20;72;6F;7A;73;7A;79;66;72;6F;77;79;77;61;
6E;69;75;20;3A;50

15-09-2004 23:27
Pokaż profil mikmas  Wyślij email do mikmas   Odwiedź stronę mikmas       3632553
anonim




Typ: Nie zarejestrowany
Dzieki!

...a co z innymi sortowaniami? Mozesz podac jakies wsakzówki?

Pozdro!

16-09-2004 21:25
  
marcin_an
Forumowicz




Typ: neutral
Postów: 1265
Zarejestrowany: Mar 2004

Sprawdź kod, który podał mikmas najpierw. Kontrolka File sama sortuje...


_____________________________________________
Jedzonko dla Google'a:
Forum na temat Visual Basic, C, C++, Pascal, Programowanie, API, PHP, VBA, VB.NET, QBasic, VBScript, Komputery
Moja strona o wszystkim

17-09-2004 00:27
Pokaż profil marcin_an  Wyślij email do marcin_an   Odwiedź stronę marcin_an  
Wszystkich odpowiedzi: 3 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1