Win32 batch

Ha linux alatt megy, akkor vélhetően cygwin-bash páros is viszi.

Úgy tudom a windows batch nyelve erre nem képes. (nem biztos)
Na most ha ez így van, akkor mindenképp fel kell tenned valamilyen
értelmezőt! Alapból szerintem javascript meg vbscript értelmező van, de
azt nem tudom, konzolra tudnak e írni.
Én ilyen esetekre perl-t vagy python-t használok, az jó mert van windowsra meg linuxra is. Sok szerencsét!

mindezt Linux alatt meg tudom csinálni, Win32 alatt pascalban meg tudom csinálni (aztán exe-nek fordítani), viszont programozás nélkül Win32 alatt sajnos nem. segítsetek ki kérlek, nagyon kéne.
köszi

Valakinek a napi teendői közé fel kell venni a feladatot.
Az majd összekattingatja az intézőben amikor szükséges...
:-D

--
maszili

http://unxutils.sf.net

idézet az oldalról:
"Here are some ports of common GNU utilities to native Win32. In this context, native means the executables do only depend on the Microsoft C-runtime (msvcrt.dll) and not an emulation layer like that provided by Cygwin tools."

szoktam használni őket, szerintem próbáld ki.

Ahogy már korábban említették: van a Windows-ban egy WSH (Windows Scripting Host) nevű dolog (win98-ban már igen, szvsz NT-ben is) amiben pl VisualBasic-ben írogathatsz dolgokat.

Szvsz változóval/nélkül egy dátumnak megfelelő nevű könyvtárat nemigen tudsz létrehozni.

--
Felnőtt férfi vagyok! Azt teszem amit a nők mondanak.

Nem túl elengáns, de működő megoldás az előző nap kiszámolására:

@echo off

for /f "tokens=1,2,3*" %%i in ("%DATE:.= %") do (
	set YEAR=%%i
	set MONTH=%%j
	set DAY=%%k
)

echo Akt dátum: %YEAR%-%MONTH%-%DAY%

set /A DAY=%DAY%
set /A MONTH=%MONTH%

set /A DAY=%DAY%-1

set /A YEAR_MOD_4=%YEAR%%%4
set /A YEAR_MOD_100=%YEAR%%%100
set /A YEAR_MOD_400=%YEAR%%%400

set /A PREV_MONTH=%MONTH%-1


if %DAY% LEQ 0 (
	if %PREV_MONTH% EQU  0 SET DAY=31
	if %PREV_MONTH% EQU  1 SET DAY=31
	if %PREV_MONTH% EQU  3 SET DAY=31
	if %PREV_MONTH% EQU  4 SET DAY=30
	if %PREV_MONTH% EQU  5 SET DAY=31
	if %PREV_MONTH% EQU  6 SET DAY=30
	if %PREV_MONTH% EQU  7 SET DAY=31
	if %PREV_MONTH% EQU  8 SET DAY=31
	if %PREV_MONTH% EQU  9 SET DAY=30
	if %PREV_MONTH% EQU 10 SET DAY=31
	if %PREV_MONTH% EQU 11 SET DAY=30

	if %PREV_MONTH% EQU 2 (
		if %YEAR_MOD_4% EQU 0 (	
			if %YEAR_MOD_100% EQU 0 (
				if %YEAR_MOD_400% EQU 0 (
					SET DAY=29
				) else (
					SET DAY=28
				)				
			) else (				
				SET DAY=29
			)
		) else (
			SET DAY=28
		)
		
	)
	set MONTH=%PREV_MONTH%
)

if %MONTH% LEQ 0 (
 	set    MONTH=12
 	set /A YEAR=%YEAR%-1
)


if %DAY%   LSS 10 set DAY=0%DAY%
if %MONTH% LSS 10 set MONTH=0%MONTH%


echo Előző nap: %YEAR%-%MONTH%-%DAY% 

YourJob.vbs

Sub Syntax
  msg = "YourJob.vbs [Dir | /? - help]"
  Wscript.Echo(msg)
  Wscript.Quit(1)
End Sub

Function CreateDir( sPath )
 Dim fso 'File System Object
 set fso = CreateObject("Scripting.FileSystemObject")

 if Not fso.FolderExists( sPath ) then
  Call CreateDir( fso.GetParentFolderName( sPath ) )
  fso.CreateFolder( sPath )
 end if
End Function

Function DeleteDir( sPath )
 Dim fso 
 set fso = CreateObject("Scripting.FileSystemObject")

 if fso.FolderExists( sPath ) then
  fso.DeleteFolder( sPath )
 end if

End Function

Select Case WScript.Arguments.Count
  Case 0
    ' "c:\" the default dir
    strDir = "c:\"
  Case 1
    Select Case WScript.Arguments(0)
      ' "?", "-?" or "/?" invoke help
      Case "?"
        Syntax
      Case "-?"
        Syntax
      Case "/?"
        Syntax
      Case Else
        strDir = WScript.Arguments(0)
    End Select
  Case Else
    ' More than 1 argument is not allowed
    Syntax
End Select

CreateDir(strDir & "\" & Date())

Dim y, m, d, strM, strD

y = Year(Date())
m = Month(Date())
d = Day(Date())

' A feltetelt kell megirni.
'if y & m & d-1 == valid then
  if m < 10 then
  ' mar. -> 3 -> 03
   strM = 0 & m
  end if

  if d < 10 then
   strD = 0 & d
  end if

  DeleteDir(strDir & "\" & y & "." & strM & "." & strD)
'end if

Wscript.Quit(1)

Elso probalkozasra ment. A y, m, d valtozokban ott van az Ev, Ho, Nap a te feladatod kitalalni, hogy melyik az elozo nap.

Udv.: Ben

Egyszer feltettem a keresztkérdést a prog.hu-n, miszerint hogyan
lehet egy adott dátumnál régebbi fájlokat törölni NT4+SP6 alatt.
Na kb. ilyen egyszerű / triviális megoldásokat javasoltak
mint ez a fenti kettő. :)

Ezzel nem a két segítőt akartam piszkálni, csak szerintem
egyszerűen nincsenek (normális) eszközök az ilyen feladatok
megoldására.

--
maszili

Haonló feladatokra én a
Free Basic Script Language ( http://www.fbsl.net/ ) -et használom.

Ilyenkor hol vannak a winesek a tanácsaikkal? :-P

Mennyi szép megoldás....
Nemazért srácok, de 15 perc gugli után összehoztam ezt:

akarmi.js:

function date2str(d)
{
    return d.getYear()+'.'+(d.getMonth()+1)+'.'+d.getDate()+'.';
}

function getYesterday()
{
    var yesterday=new Date();
    yesterday.setDate(yesterday.getDate()-1);

    return date2str(yesterday);
}

function getToday()
{
    return date2str(new Date());
}

var FSO = WScript.CreateObject("Scripting.FileSystemObject");

try 
{
    FSO.CreateFolder(getToday());
    FSO.DeleteFolder(getYesterday());
} catch (err)
{ 
    WScript.Echo("ERROR");
}

Elvileg simán futnia kell mint egy .bat-nak, ha mégsem, akkor:
wscript akarmi.js

Ha konzolos végrehajtást akarsz, akkor:
cscript akarmi.js
Ilyenkor hiba esetén konzolra ír, és nem MessageBox-ba.

Ja, és a könyvtárakat az aktuális könyvtárba hozza létre, de gondolom ezt átírni már megy egyedül is... :)

"...handing C++ to the average programmer seems roughly comparable to handing a loaded .45 to a chimpanzee."
-- Ted Ts'o