Zdravím,
je to jak nekonečná pohádka. Měl bych dotaz ohledně příkazu v bat souboru. Nevíte někdo syntax pro "smaž * složky starší než (parametr = aktuální datum)" ?
Díky za pomoc
zase ty *.bat soubory Vyřešeno
-
- člen HW spec týmu
-
Elite Level 12
- Příspěvky: 15955
- Registrován: květen 08
- Bydliště: České Budějovice
- Pohlaví:
zase ty *.bat soubory Vyřešeno
Nikdy neříkej, že to nejde, protože se najde někdo, kdo o tom neví a udělá to!
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
-
- Moderátor
-
Elite Level 11.5
- Příspěvky: 14097
- Registrován: červen 06
- Bydliště: In Hell
- Pohlaví:
Re: zase ty *.bat soubory
Myslím že to nejde...
http://www.microsoft.com/technet/prodte ... x?mfr=true
http://www.microsoft.com/technet/prodte ... x?mfr=true
RTFM!!! UBCD - Ultimate Boot CD Zkusili jste to vypnout a zapnout? Aneb z PIO do DMA a zpět... :) * Jak provést Clear CMOS
Kdo se moc ptá, málo googlí. Doporučený freeware
i5 3570K, ASRock Z77 Extreme, 16GB Corsair, 120GB SSD Kingston +2TB Samsung, Gigabyte Radeon HD7870, Sharkoon ReX8VE, XL-747H
Kdo se moc ptá, málo googlí. Doporučený freeware
i5 3570K, ASRock Z77 Extreme, 16GB Corsair, 120GB SSD Kingston +2TB Samsung, Gigabyte Radeon HD7870, Sharkoon ReX8VE, XL-747H
-
- Master Level 7.5
- Příspěvky: 5837
- Registrován: srpen 07
- Bydliště: Pardubice
- Pohlaví:
Re: zase ty *.bat soubory
Nejlepší hra je Excel!
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
-
- člen HW spec týmu
-
Elite Level 12
- Příspěvky: 15955
- Registrován: květen 08
- Bydliště: České Budějovice
- Pohlaví:
Re: zase ty *.bat soubory
Díky, jdu se tím prokousat:)
Nikdy neříkej, že to nejde, protože se najde někdo, kdo o tom neví a udělá to!
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
-
- Master Level 7.5
- Příspěvky: 5837
- Registrován: srpen 07
- Bydliště: Pardubice
- Pohlaví:
Re: zase ty *.bat soubory
Kdyby ses tím neprokousal, tak tady máš VBA skript, který ti ty starý soubory vymaže. Zeleně jsem ti označil cestu do složky, kde chceš mazat staré soubory. Tu si uprav podle sebe. Červeně jsem ti označil číslo, které znázorňuje kritérium pro mazání - počet dní. MUSÍ TO BÝT ZÁPORNÉ ČÍSLO!
Kód si nakopíruj do poznámkového bloku a ulož s příponou *.vbs
Poté už stačí jen kliknout na skript a už se maže ...
Dim fso, startFolder, OlderThanDate
Set fso = CreateObject("Scripting.FileSystemObject")
startFolder = "C:\složka" ' složka, kde se bude mazat
OlderThanDate = DateAdd("d", -10, Date) ' 10 dní
DeleteOldFiles startFolder, OlderThanDate
Function DeleteOldFiles(folderName, BeforeDate)
Dim folder, file, fileCollection, folderCollection, subFolder
Set folder = fso.GetFolder(folderName)
Set fileCollection = folder.Files
For Each file In fileCollection
If file.DateLastModified < BeforeDate Then
fso.DeleteFile(file.Path)
End If
Next
Set folderCollection = folder.SubFolders
For Each subFolder In folderCollection
DeleteOldFiles subFolder.Path, BeforeDate
Next
MsgBox "hotovo"
End Function
Kód si nakopíruj do poznámkového bloku a ulož s příponou *.vbs
Poté už stačí jen kliknout na skript a už se maže ...
Dim fso, startFolder, OlderThanDate
Set fso = CreateObject("Scripting.FileSystemObject")
startFolder = "C:\složka" ' složka, kde se bude mazat
OlderThanDate = DateAdd("d", -10, Date) ' 10 dní
DeleteOldFiles startFolder, OlderThanDate
Function DeleteOldFiles(folderName, BeforeDate)
Dim folder, file, fileCollection, folderCollection, subFolder
Set folder = fso.GetFolder(folderName)
Set fileCollection = folder.Files
For Each file In fileCollection
If file.DateLastModified < BeforeDate Then
fso.DeleteFile(file.Path)
End If
Next
Set folderCollection = folder.SubFolders
For Each subFolder In folderCollection
DeleteOldFiles subFolder.Path, BeforeDate
Next
MsgBox "hotovo"
End Function
Nejlepší hra je Excel!
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
-
- člen HW spec týmu
-
Elite Level 12
- Příspěvky: 15955
- Registrován: květen 08
- Bydliště: České Budějovice
- Pohlaví:
Re: zase ty *.bat soubory
Script bezva, akorát místo složek maže soubory:(
Ještě že jsem ho pustil ve složce temp...
Ještě že jsem ho pustil ve složce temp...
Nikdy neříkej, že to nejde, protože se najde někdo, kdo o tom neví a udělá to!
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
-
- Master Level 7.5
- Příspěvky: 5837
- Registrován: srpen 07
- Bydliště: Pardubice
- Pohlaví:
Re: zase ty *.bat soubory
Oops. Moje chyba. Myslel jsem, že chceš mazat soubory ...
Tak prosím:
Set objFileSys = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFileSys.GetFolder("C:\temp")
For Each Folder In objFolder.SubFolders
FolderCreated = Folder.DateCreated
FolderAge = DateDiff("d", FolderCreated, Now)
If FolderAge >2 Then
Folder.Delete
End If
Next
Tak prosím:
Set objFileSys = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFileSys.GetFolder("C:\temp")
For Each Folder In objFolder.SubFolders
FolderCreated = Folder.DateCreated
FolderAge = DateDiff("d", FolderCreated, Now)
If FolderAge >2 Then
Folder.Delete
End If
Next
Nejlepší hra je Excel!
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
-
- člen HW spec týmu
-
Elite Level 12
- Příspěvky: 15955
- Registrován: květen 08
- Bydliště: České Budějovice
- Pohlaví:
Re: zase ty *.bat soubory
Zdar, script běhá, díky. Akorát moje programátorské schopnosti jsou velmi omezené, proto se zase ptám. Jednak pokud je prázdná složka, tak script končí chybou (spouštím jej z *.bat, ten jede po chybě dál). A druhá věc, nepřišel jsem na to jak to provést- nechci ty složky mazat, ale vypsat do okna terminálu (kvůli otestování, že to běhá v pohodě, docházejí mi starší složky:) ). Jak na to?
Nikdy neříkej, že to nejde, protože se najde někdo, kdo o tom neví a udělá to!
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
i5-4430/Asus H97M/Kingston HyperX 8GB DDR3/Asus R9 280X/Seasonic M12II-620/Samsung 850 Pro 128GB
Chcete si nechat sestavit nový počítač?
-
- Master Level 7.5
- Příspěvky: 5837
- Registrován: srpen 07
- Bydliště: Pardubice
- Pohlaví:
Re: zase ty *.bat soubory
Po dobu testování si to můžeš stáhnout na
... If FolderAge =0 Then ...
Skript samotný nehází chybu pokud není co mazat. Budeš to mít pravděpodobně špatně vsazené do dávkového souboru.
... If FolderAge =0 Then ...
Skript samotný nehází chybu pokud není co mazat. Budeš to mít pravděpodobně špatně vsazené do dávkového souboru.
Nejlepší hra je Excel!
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
• Pravidla fóra PC-help • Jak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.
-
- nováček
- Příspěvky: 11
- Registrován: listopad 11
- Pohlaví:
Re: zase ty *.bat soubory
Zdarec.. Omlouvam se, ale vyhodil mi tohle google.. takze nevim jak moc je to stare vlakno, ale vidim ze se tu bavilo a bat souborech, a mel bych ohledne toho dotaz.. chtel bych neco skusit jen takovou zkousku, nic vaznyho se stat nemuze ... sem celkem zacatecnik takze se moc nevyznam ..
ale chtel bych skusit aby se stalo neco jako :
100 000x
{ start cmd
ping www.adresa.cz }
-o zapisu ve skriptech nemam ani paru , takze jsem napsal jen jak by meli asi vypadat kroky..
a aby to byl jakoze cyklus a vykonalo se to treba 100 000x naraz, jestli by tolik pozadavku na neaky server zvladlo.. snad chapete jak to myslim, a dokonce si myslim ze mi neporadite ;D ..

100 000x
{ start cmd
ping www.adresa.cz }
-o zapisu ve skriptech nemam ani paru , takze jsem napsal jen jak by meli asi vypadat kroky..

a aby to byl jakoze cyklus a vykonalo se to treba 100 000x naraz, jestli by tolik pozadavku na neaky server zvladlo.. snad chapete jak to myslim, a dokonce si myslim ze mi neporadite ;D ..
-
- Moderátor
-
Master Level 8.5
- Příspěvky: 6976
- Registrován: duben 06
- Bydliště: Praha
- Pohlaví:
Re: zase ty *.bat soubory
Stáří vlákna najdeš snadno – u každého příspěvku je jeho datum.
Při registraci jsi souhlasil s pravidly, v nichž stojí, že jakkoli podobný problém není přípustné řešit v cizím vlákně. Vždycky si založ svoje vlastní.
Konečně vyřešený dotaz (jako tento – se zelenou fajfkou) se nezobrazuje mezi novými tématy, takže krom těch, kteří do něj přispěli, si ho málokdo všimne.
Zkusím ti přesto odpovědět:
Mám obavu, že v BAT (CMD) to nepůjde – nabízí se sice FOR, který v jiných jazycích dělá přesně to, co potřebuješ, ale jak jsem ho pochopil v DOSu, opakuje příkaz pro zadané soubory, tzn. že dělá něco, co ve skutečnosti nepotřebuješ.
Osobně bych buď použil jiný prostředek, např. PHP, nebo si udělal nekonečnou smyčku:
:start
ping adresa
goto start
a po chvíli sám ručně vykonávání zastavil (klávesou PAUSE, posléze křížkem zavřel).
A tady z výše uvedených důvodů zamykám.
Při registraci jsi souhlasil s pravidly, v nichž stojí, že jakkoli podobný problém není přípustné řešit v cizím vlákně. Vždycky si založ svoje vlastní.
Konečně vyřešený dotaz (jako tento – se zelenou fajfkou) se nezobrazuje mezi novými tématy, takže krom těch, kteří do něj přispěli, si ho málokdo všimne.
Zkusím ti přesto odpovědět:
Mám obavu, že v BAT (CMD) to nepůjde – nabízí se sice FOR, který v jiných jazycích dělá přesně to, co potřebuješ, ale jak jsem ho pochopil v DOSu, opakuje příkaz pro zadané soubory, tzn. že dělá něco, co ve skutečnosti nepotřebuješ.
Osobně bych buď použil jiný prostředek, např. PHP, nebo si udělal nekonečnou smyčku:
:start
ping adresa
goto start
a po chvíli sám ručně vykonávání zastavil (klávesou PAUSE, posléze křížkem zavřel).
A tady z výše uvedených důvodů zamykám.
- Než položíte dotaz, nejprve se ptejte strejdy Gůůgla.
- Výňatek z pravidel fóra PC-HELP:
- Název tématu zvolte takový, aby co nejvýstižněji charakterizoval obsah tématu.
- Nesnažte se řešit jiný problém (i když podobný) v jednom tématu. Raději založte nové téma.
- Mýliti se je Myloš.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 10
- 744
-
od CyberCodeDroid
27 srp 2019 12:36
-
- 1
- 760
-
od petr22
27 čer 2019 22:53
-
- 3
- 498
-
od petr22
06 črc 2019 08:04
-
- 5
- 1094
-
od faraon
15 zář 2019 13:50
-
- 1
- 524
-
od brooksjo
21 led 2019 10:16
Zpět na “Programování a tvorba webu”
Kdo je online
Uživatelé prohlížející si toto fórum: Majestic-12 [Bot] a 1 host