Hirdetés
- gban: Ingyen kellene, de tegnapra
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Szólánc.
- Lalikiraly: A nagy ő! Stohl...
- Elektromos rásegítésű kerékpárok
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- MasterDeeJay: RAM gondolatok: Mennyi a minimum? DDR3 is jó?
- bambano: Bambanő háza tája
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
Aktív témák
-
Sunzi
aktív tag
http://msdn.microsoft.com/library/default.asp
Ugyanez az adatbázis található a Visual Studio-hoz tartozó MSDN Library CD-ken.
Itt lehet keresni ezerrel
S. -
Sunzi
aktív tag
Valóban, ha tegyük fel pontbn éjfél előtt 1-2 ezredmásodperccel futtatja, akkor a hiba előálhat..
új kód:
set fso=CreateObject(''Scripting.Filesystemobject'')
Dim fnamed
fnamed=Date()
fname=Right(Year(fnamed),2)
fname=fname & ''-'' & Left(''00'',2-Len(Month(fnamed))) & Month(fnamed)
fname=fname & ''-'' & Left(''00'',2-Len(Day(fnamed))) & Day(fnamed)
set f=fso.Createfolder(''C:\'' & fname)
Kevésbé bonyolult mondjuk nem lett tőle...
S. -
Sunzi
aktív tag
válasz
TheVeryGuest
#7
üzenetére
Jaja, azaz.
a vbs file önnmagában is futtatható, a file-t egyébként a wscript.exe dolgozza fel.
Ütemezőbe így írnám be:
''wscript ''C:\...\akarmi.vbs''
Szólja, ha sikerült...
S. -
Sunzi
aktív tag
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
Hirdetés
- Intel Core I7 14700KF - 24mag/32szál - Új, Gari 2029.09.06. -ig - Eladó!
- Xiaomi Redmi Note 14 Pro+ 5G 8/256GB, Megkímélt, Kártyafüggetlen, Töltővel, 1 Év Garanciával!
- Vadonatúj MCHOSE V9 Turbo
- Intel Core I9 14900K - 24mag/32szál - Új, Gari 2030.11.23. -ig - Eladó!
- Apple iPhone 15 Pro Max 256GB, Akku: 86%, Megkímélt, Kártyafüggetlen, Töltővel, Dobozzal, 1 Év Gari!
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 64GB RAM RTX 5090 32GB GAMER PC termékbeszámítással
- ÚJ! 32GB (2x16GB) Kingston DDR5 5600MT/s RAM készlet Bontatlan
- Samsung Galaxy Note 20 256GB,Újszerű,Adatkabel,12 hónap garanciával
- Lenovo L13 Core I3-10110U / 4GB DDR4 / LAPTOP 1
- Dell XPS 13 9310 i7-1185G7 16GB 512GB 13" FHD+ 1 év garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest




