Hirdetés
Legfrissebb anyagok
PROHARDVER! témák
- Samsung LCD és LED TV-k
- Nagyon bízik az Instinct MI450-ben az AMD alelnöke
- Nvidia GPU-k jövője - amit tudni vélünk
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Vezetékes FEJhallgatók
- Az Intel mindent feltesz az Intel 14A node-ra
- Milyen egeret válasszak?
- Mini-ITX
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- SSD kibeszélő
Mobilarena témák
IT café témák
Aktív témák
-
katona.t
tag
Elakadtam, segítsetek!
Adott egy mappa, amibe azonos nevű file-ok érkeznek. A beérkezett file-t mindig át szeretném nevezni, hogy meglegyen. Tehát olyan szkript kellene ami "filenév+növekvő szám.kiterjesztés" formátumra nevez át.
Eddig ennyi van meg, de a növekvő számot nem tudom megoldani:
Dim fso
i=1
Do While i=101
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFile "bejovo.txt", "bejovo1.txt"
WScript.Sleep(1000)
i=i+1
Loop100 szor fut le a ciklus, és azt kellene megoldani, hogy a bejovo1.txt-nél az 1 helyén az i aktuális értéke legyen.
Tehát bejovo1.txt, bejovo2.txt stb...
Hogy tehetem az i-t a filenévbe?
Aktív témák
Aktív témák
- Milyen légkondit a lakásba?
- Samsung LCD és LED TV-k
- Nagyon bízik az Instinct MI450-ben az AMD alelnöke
- Windows 11
- Nvidia GPU-k jövője - amit tudni vélünk
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Vezetékes FEJhallgatók
- Borderlands 4
- Gurulunk, WAZE?!
- Az Intel mindent feltesz az Intel 14A node-ra
- További aktív témák...
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- HIBÁTLAN iPhone 12 mini 128GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3392, 94% Akkumulátor
- iKing.Hu - Apple iPhone 15 Pro Max Natural Titanium Titán dizájn, 5 optikai zoom 256 GB- Gari
- Telefon felvásárlás!! iPhone 15/iPhone 15 Plus/iPhone 15 Pro/iPhone 15 Pro Max
- PS Plus előfizetések
- Honor X6a 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest