Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: tworzenie katalogów
..::DEMON::..




Typ: neutral
Postów: 28
Zarejestrowany: Jan 2004
tworzenie katalogów

jak  stworzyć  pare  katalogów  np.  5  i  żeby  miały  nazwy  "1","2","3","4","5"  funkcja  do  robienia  katalogów  wygląda  tak:

Deklaracja:
Public  Declare  Function  CreateDirectory  Lib  "kernel32"  Alias  "CreateDirectoryA"  (ByVal  lpPathName  As  String,  lpSecurityAttributes  As  Long)  As  Long

kod:
x  =  CreateDirectory("C:KatalogNowy",  secattr)

no  i  teraz  che  zeby  mi  sie  pare  katologów  tworzyło  a  najlepiej  żeby  można  było  podać  ile

POzDRaWIaM  ..:: DEMON ::..

[Post edytowany dnia 05-02-2004 14:44 przez ..::DEMON::..]

05-02-2004 14:43
Pokaż profil ..::DEMON::..  Wyślij email do ..::DEMON::..   
m-a-x



Typ: neutral
Postów: 366
Zarejestrowany: Jan 2003



ile = 6 'wartosc ta oczywiscie zmieniasz
For i = 1 to ile
  CreateDirectory "C:\" & i,  secattr
Next i


ale chyba prościej - bo bez api w ten sposób:

For i = 1 to ile
  MkDir "C:\" & i
Next i



_____________________________________________

Problemem zazwyczaj nie jest brak osób znających odpowiedź a zadanie właściwego pytania!

05-02-2004 14:52
Pokaż profil m-a-x  Wyślij email do m-a-x   
..::DEMON::..




Typ: neutral
Postów: 28
Zarejestrowany: Jan 2004

dzienki

06-02-2004 18:22
Pokaż profil ..::DEMON::..  Wyślij email do ..::DEMON::..   
Jelcyn
Admin forum




Typ: admin
Postów: 895
Zarejestrowany: Apr 2002

Ja bym na wszelki wypadek nieco zmienił:

For i = 1 to ile
  MkDir "C:\" & cstr(i)
Next i


_____________________________________________
Jelcyn
vb4all(małpka)canpol.pl
http://www.coderscity.pl/no-vb4all * http://www.jelcyn.com

06-02-2004 18:34
Pokaż profil Jelcyn  Wyślij email do Jelcyn   Odwiedź stronę Jelcyn       270849979    6237704
Wszystkich odpowiedzi: 3 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1