Aktív témák

• #11 Sunzi aktív tag Sunzi #2

  2003-08-27 15:27:02 #11

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

  Privát üzenet küldése

  

  Sunzi

  aktív tag

  válasz Sunzi #2 üzenetére

  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.
  

Aktív témák