Aktív témák

• WN31RD addikt

  #15

  #11 Sunzi

  2003-08-27 15:35:45

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  WN31RD

  addikt

  #11 Sunzi

  #11 Sunzi

  Akár notepadban nyitsz egy új file-t, aminek xxx.vbs lest a neve:
  --------------------------
  set fso=CreateObject(''Scripting.Filesystemobject'')
  
  fname=Right(Year(Date()),2)
  fname=fname & ''-'' & Left(''00'',2-Len(Month(Date()))) & Month(Date())
  fname=fname & ''-'' & Left(''00'',2-Len(Day(Date()))) & Day(Date())
  
  set f=fso.Createfolder(''C:\'' & fname)
  ---------------------------
  Kipróbáltam, megy..
  
  S.
  

  Nem vagyok otthon a VBS-ben, de szemet szúrt a következő dolog:
  
  Ha a script pont egy olyan időpontban fut, hogy az év, hónap és nap lekérdezése között a dátum változik, akkor hibásan fog működni (rossz dátumú könyvtárat hoz létre). Továbbá, ha a nap vagy a hónap két-két lekérdesé között változik a dátum, akkor bizonyos esetekben nem a megfelelő számú '0' lesz a szám elé rakva, azaz nem két karakteres lesz a hónap vagy a nap.
  
  Persze ezek apróságok, és igen valószínűtlen, hogy ilyen szerencsétlen időpontban futtatná valaki a scriptet, de ha az elején egy változóba letárolná a dátumot (tehát csak egyszer kérdezné le), és utána ezt használná, akkor nem lenne gond, és a script sem lenne számottevően bonyolultabb.

Aktív témák