Extensii, extensii, extensii!

[Lucky Luke 4]

Dununduidan:

Executa codul asta :

 

 

@ECHO OFF

IF NOT "%OS%"=="Windows_NT" (

ECHO.

ECHO This batch file will only work on Windows 2000 and later.

GOTO Syntax

)

VER | FIND "Windows NT" >NUL

IF NOT ERRORLEVEL 1 (

ECHO.

ECHO This batch file will only work on Windows 2000 and later.

GOTO Syntax

)

FINDSTR.EXE /? >NUL 2>&1

IF ERRORLEVEL 1 (

ECHO.

ECHO FINDSTR.EXE not found

GOTO Syntax

)

IF NOT "%~2"=="" GOTO Syntax

ECHO "%~1" | FIND "?" >NUL

IF NOT ERRORLEVEL 1 GOTO Syntax

ECHO "%~1" | FIND "/" >NUL

IF NOT ERRORLEVEL 1 GOTO Syntax

 

SETLOCAL

:: Define direcory where bitmaps are located

SET WorkingDir=%~1

IF NOT DEFINED WorkingDir SET WorkingDir=%windir%

 

:: Count number of read-only bitmap files

FOR /F "tokens=1 delims=:" %%A IN ('ATTRIB.EXE "%WorkingDir%.\*.bmp" 2^>NUL ^| FINDSTR.EXE /R /B /C:".....R" ^| FINDSTR.EXE /N "R"') DO SET NumPics=%%A

IF NOT DEFINED NumPics (

ECHO.

ECHO No read-only bitmap files found in %WorkingDir%

GOTO Syntax

)

 

:: Calculate random to number of bitmaps factor

SET /A Factor = 32768 / %NumPics%

 

:: Make variable Random really random by using a more or less random "seed"

FOR /F "tokens=* delims=" %%A IN ('VER ^| TIME ^| FINDSTR.EXE /R /C:"[0-9]"') DO SET TimeStr=%%A

SET TimeStr=%TimeStr::= %

SET TimeStr=%TimeStr:.= %

SET TimeStr=%TimeStr:,= %

FOR %%A IN (%TimeStr%) DO SET Seed=%%A

SET /A Seed = %Seed% + 2

FOR /L %%A IN (0,1,%Seed%) DO CALL SET Dummy=%%Random%%

 

:Again

:: Select a random bitmap from the "array"

SET /A PicsIndex = %Random% / %Factor% + 1

:: Force a new selection on array out of bound errors

IF %PicsIndex% GTR %NumPics% GOTO Again

IF %PicsIndex% LSS 1 GOTO Again

 

:: Make the randomly selected bitmap file the current user's wallpaper

FOR /F "tokens=1* delims=:" %%A IN ('ATTRIB.EXE %WorkingDir%.\*.bmp ^| FINDSTR.EXE /R /B /C:".....R" ^| FINDSTR.EXE /N "R"') DO (

IF %PicsIndex% EQU %%A CALL :MakeWallpaper "%%~B"

)

ENDLOCAL

GOTO:EOF

 

 

:MakeWallpaper

:: Extract bitmap file name from line

SET PicsChoice=%~1

SET PicsChoice=%PicsChoice:~11%

:: Display wallpaper file name

ECHO New wallpaper bitmap: %PicsChoice%

:: Create, merge and then delete temporary REG file

:: to change the Wallpaper setting in the registry

SET PicsChoice=%PicsChoice:\=/%

SET PicsChoice=%PicsChoice:/=\\%

> "%Temp%.\wallpaper.dat" ECHO REGEDIT4

>> "%Temp%.\wallpaper.dat" ECHO.

>> "%Temp%.\wallpaper.dat" ECHO [HKEY_CURRENT_USER\Control Panel\Desktop]

>> "%Temp%.\wallpaper.dat" ECHO "Wallpaper"="%PicsChoice%"

>> "%Temp%.\wallpaper.dat" ECHO.

START /WAIT REGEDIT.EXE /S "%Temp%.\wallpaper.dat"

DEL "%Temp%.\wallpaper.dat"

:: Activate the changes; thanks for Pete Smith for this RUNDLL32 command

RUNDLL32.EXE USER32.DLL,UpdatePerUserSystemParameters ,1 ,True

GOTO:EOF

 

Spune-mi daca-ti place dupa asta :ill:

[Dunedain 2]

marlboro..esti funny mai..da chestii din astea incearca cu fetele :ill:

[Lucky Luke 4]

mey pikachu, tu fa ce ti-am trimis eu si p-orma exprima-ti parerile despre funny sau nu.

Lasa garagatza. :ill:

[TOUAREG 0]

Dupa ce instalez Daemon Tools imi zice ca Host Controller-ul SCSI/RAID nu poate fi oprit acum, sa incerc mai tarziu. Cere reboot si...dupa aia tot asa. Ce se intampla? Help, please. Am incercat 2 variante de DT

[dany89 0]

:spiteful: cu ce sa deschid o imagine iso.bc! ????

[De-jay 0]

bc! este extensia pentru fisiere neterminate din BitComet, ori le termini de downloadat ori schimbi extensia la simplu .iso si incerci sa faci ceva cu imaginea..

[scorpi_on 0]

Hy,poti sa deschizi fisierele de tip iso cu deamon tools sau cu un program PowerISO.acest program il gasesti foarte usor si repede pe net. ;) Iti dau si o adresa..sper sa mai functioneze :stars: http://www.download3000.com/download-Power...-reg-10958.html

[Scar_face 0]

Stie careva cum pot face un fisier bat pentru lansarea aplicatiei de conectare la internet a modemului adsl de la romtelecom?

Sau cum pot seta chestia aia sa se conecteze automat ca in Windows Vista?

Sunt un novice si vreau sa invat sa creez si sa folosesc fisierele bat daca acestea merg folosite pe windows XP.

Va multumesc.

[Shocker_ 0]

Stie careva cum pot face un fisier bat pentru lansarea aplicatiei de conectare la internet a modemului adsl de la romtelecom?

Pentru a face asta poti sa te folosesti de rasdial. Sintaxa este: rasdial numeconexiune user parola

Exemplu: rasdial romtelecom user 123456 [scrii doar linia asta intr-un .bat si adaugi bat-ul la startup].

 

Ca sa adaugi ceva la startup ai 2 variante:

- Faci un shortcut la fisierul respectiv in :\Documents and Settings\xxxxxxx\Start Menu\Programs\Startup\

- Deschizi regedit [start / Run / regedit], mergi la HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run, faci o intrare noua de tip String [click dreapta / New / String Value]. La nume introduci orice, iar la value bagi path-ul fisierului respectiv [ex: C:\test.bat]

Editat Octombrie 28, 2006 de Shockeru

[Scar_face 0]

Pentru a face asta poti sa te folosesti de rasdial. Sintaxa este: rasdial numeconexiune user parola

Exemplu: rasdial romtelecom user 123456 [scrii doar linia asta intr-un .bat si adaugi bat-ul la startup].

 

Ca sa adaugi ceva la startup ai 2 variante:

- Faci un shortcut la fisierul respectiv in :\Documents and Settings\xxxxxxx\Start Menu\Programs\Startup\

- Deschizi regedit [start / Run / regedit], mergi la HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run, faci o intrare noua de tip String [click dreapta / New / String Value]. La nume introduci orice, iar la value bagi path-ul fisierului respectiv [ex: C:\test.bat]

 

 

Multumesc mult pentru sfat, am reusit cu varianta startup, a fost chiar foarte simplu.