- EAFC 24
- Empire of the Ants - Az év végétől építhetünk saját hangyabirodalmat
- UbiForward24 - Hosszabb bemutatón a Star Wars: Outlaws
- Diablo IV
- Konzolokról KULTURÁLT módon
- Call of Duty: Black Ops 6 - Nyugalom, nem lesz 300GB-os a játék
- The Division 2 (PC, XO, PS4)
- XGS24 - Befutott a Dragon Age: Veilguard új előzetese
- PlayStation 5
- Assassin's Creed Odyssey
Új hozzászólás Aktív témák
-
ArchElf
addikt
VBS jóval egyszerűbb volna, mint a sima batch.
Set objArgs = WScript.Arguments
Set fso = CreateObject("Scripting.FileSystemObject")
Set fslog = fso.OpenTextFile("c:\dellog.txt", 8, True, -1)
'4 nappal korábbi dátum
DelDate = DateAdd("m", -4, Date)
For Each fF In objArgs
On Error Goto eh:
Set Folder = fso.GetFolder(fF)
Set fFiles = folder.Files
For Each file In fFiles
If (file.DateLastModified < DelDate) Then
file.Delete(True)
fslog.WriteLine "Törölve: "& file.Path
End If
Next
Goto ehe:
eh:
fslog.WriteLine "Hibás könyvtárnév: " & fF
ehe:
Next
fslog.CloseRemélem nincs benne hiba...
AE
Csinálok egy adag popcornt, és leülök fórumozni --- Ízlések és pofonok - kinek miből jutott --- Az igazi beköpőlégy [http://is.gd/cJvlC2]
Új hozzászólás Aktív témák
- EVGA RTX 3070 8GB GDDR6 FTW3 ULTRA GAMING Eladó! 125.000.-
- MICROSOFT XBOX SERIES X - EXTRÁKKAL
- ASUS X409FL - ezüst 14"iPS FHD, i5-8265, 16ddr4/256 nvme, nVIDIA MX250-2 Magyar-LED, type-C SZLA+GAR
- Apple iPad Pro 12.9 2022 128GB, asztroszürke (GPS, Paperlike tok +fólia): iCentre gari 2027.02.23-ig
- Precision 5540 15.6" FHD IPS i7-9850H T1000 16GB 512GB NVMe magyarított vbill gar
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen