25. juli 2006 - 18:37 Der er 12 kommentarer og
2 løsninger

WallPaper ændring via .CMD eller .REG ell. .VBS - automatisk

WallPaper ændring via *.CMD eller *.REG ell. *.VBS - automatisk - hvordan smartest ?

Skal indbygges i Login script ell. lign. for at til en hver tid sætte WallPaper til et bestemt billed/fil.

Skal være et Firmalogo ell. lign... Centreret...

(Det må være varmen at jeg ikke pt. har fundet det selv...)
Avatar billede thesurfer Nybegynder
25. juli 2006 - 20:18 #1
Ret stien "c:\billeder\billede.bmp":

Set wshShell = WScript.CreateObject("WScript.Shell")
wshShell.RegWrite ("HKCU\Control Panel\Desktop\Wallpaper"), "c:\billeder\billede.bmp"
wshShell.RegWrite ("HKCU\Control Panel\Desktop\WallpaperStyle"), "0"
wshShell.Run "RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters", 1, True
Set wshShell = nothing

Gem koden i en .VBS fil.
Avatar billede thesurfer Nybegynder
25. juli 2006 - 20:19 #2
Ret stien "c:\billeder\billede.bmp", og det skal være en BMP fil, for at skrivebordet automatisk opdateres:

Set wshShell = WScript.CreateObject("WScript.Shell")
wshShell.RegWrite ("HKCU\Control Panel\Desktop\Wallpaper"), "c:\billeder\billede.bmp"
wshShell.RegWrite ("HKCU\Control Panel\Desktop\WallpaperStyle"), "0"
wshShell.Run "RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters", 1, True
Set wshShell = nothing

Gem koden i en .VBS fil.
Avatar billede thesurfer Nybegynder
25. juli 2006 - 20:25 #3
Center:
- WallpaperStyle: 0

Stræk
- WallpaperStyle: 2

Side om side
- WallpaperStyle: 0
- TileWallpaper : 1

Læg mærke til, at "Side om side/Tile" har en tilføjelse til registreringsdatabasen.
Avatar billede bertelbrander Novice
25. juli 2006 - 20:58 #4
Man kan også gøre det med en .bat/.cmd fil. Denne vil vælge en tilfældig ud af listen og bruge den som baggrund.

@echo off
setlocal
set /A XXX= %random%
set /A XXX="%XXX% %%3"
if %XXX% EQU 0 set Image=C:\\test\\sample2.bmp
if %XXX% EQU 1 set Image=C:\\test\\c.bmp
if %XXX% EQU 2 set Image=C:\\test\\009.bmp

echo Windows Registry Editor Version 5.00>regtemp.reg
echo [HKEY_CURRENT_USER\Control Panel\Desktop]>>regtemp.reg
echo "Wallpaper"="%Image%">>regtemp.reg
regedit /S regtemp.reg
RUNDLL32.EXE USER32.DLL,UpdatePerUserSystemParameters ,1 ,True
endlocal
25. juli 2006 - 21:22 #5
<thesurfer>: Jooo - den variant (*.VBS) ka' godt bruges...

<bertelbrander>: Nåja - den _har_ jeg jo set før... Hvis det nu kun skal være en *.REG fil med en bestemt fil/mappe ?
Læg [svar] under alle omstændigheder...
Avatar billede bertelbrander Novice
25. juli 2006 - 21:33 #6
En .reg fil:

Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Control Panel\Desktop]
"Wallpaper"="C:\\test\\009.bmp"

Du kan importere den med:
regedit /S whatever.reg

rundll32 linien i .cmd filen sikrer at wallpaper bliver skiftet med det samme, ellers venter den til næste boot.
Avatar billede thesurfer Nybegynder
25. juli 2006 - 21:33 #7
Kun en reg:

---
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Control Panel\Desktop]
"Wallpaper"="INDSÆT STI TIL FIL HER"
"WallpaperStyle"="0"
"TileWallpaper"="0"

---

Husk at sidste linie i .reg filen, er en tom linie.

Du kan registrere filen med: regedit /S FilNavn.reg
Avatar billede thesurfer Nybegynder
25. juli 2006 - 21:37 #8
bertelbrander> Man skal huske at sætte "TileWallpaper" til "0", da "TileWallpaper" har første prioritet.

Dvs, hvis "TileWallpaper" er sat til "1", og man sætter "WallpaperStyle" til 0, vil den stadig blive vist som "side om side", selvom man har valgt at den skal være centreret.
Avatar billede bertelbrander Novice
25. juli 2006 - 21:44 #9
På XP (og måske 2000) kan man gøre det med:
reg ADD "HKCU\Control Panel\Desktop" /v Wallpaper /d Wallpaper2.bmp /f
25. juli 2006 - 21:52 #10
... det ka' jeg godt bygge videre på ...

<bertelbrander>: Læg [svar] under alle omstændigheder...
Avatar billede bertelbrander Novice
25. juli 2006 - 22:05 #11
Jeg samler stadig ikke på point.
Avatar billede thesurfer Nybegynder
25. juli 2006 - 22:26 #12
Takker for points :-)
27. juli 2006 - 09:56 #13
<thesurfer>: Der var godt at du skrev om den lille detalje -

Så det endte med dette
-----------------------

Set wshShell = WScript.CreateObject("WScript.Shell")
wshShell.RegWrite ("HKCU\Control Panel\Desktop\Wallpaper"), "%SYSTEMROOT%\web\wallpaper\Logo.bmp"
wshShell.RegWrite ("HKCU\Control Panel\Desktop\WallpaperStyle"), "0"
wshShell.RegWrite ("HKCU\Control Panel\Desktop\TileWallpaper"), "0"
wshShell.Run "RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters", 1, True
Set wshShell = nothing

-----------------------

Er hermed indført her og der...

Forudsat at "%SYSTEMROOT%\web\wallpaper\Logo.bmp" indeholder det ønskede billed
"%SYSTEMROOT%\web\wallpaper\Logo.bmp" ...

Man ka' selvfølgelig få den til at peje på et sted på det interne firmanet så hvis der skiftes navn/logo vil dette automatisk ændres på alle Wallpaper ...
27. juli 2006 - 23:19 #14
<thesurfer> + <bertelbrander>: Pls GoSub http://www.eksperten.dk/spm/722683 ...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester