Skrevet tor. d. 11. marts 2010 kl. 11:30:11| #1

tpo (nedlagt brugerprofil) (45.516 point)

Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKLM\Software\BrowserChoice\", Enable, "REG_DWORD"
WshShell.RegWrite "HKLM\Software\BrowserChoice\Enable", 0, "REG_DWORD"
Set WshShell = Nothing

:-)

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 12:56:48| #2

lsskaarup (19.458 point)

Virker ikke, der sker i hvert fald ikke noget i reg.db.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 14:18:13| #3

tpo (nedlagt brugerprofil) (45.516 point)

Du skal køre det som et Startup script. Så kører det under SYSTEM kontoen.

Hvis du kører det som et logon script, kører det med de tilladelser brugeren har.
"Almindelige" brugere har ikke tilladelse til at skrive i HKEY_LOCAL_MACHINE.

:-)

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 15:33:02| #4

lsskaarup (19.458 point)

Heller ikke som lokal administratorer?

Jeg måtte lige ændre linje 3...

Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKLM\Software\BrowserChoice\", Enable, "REG_DWORD"
WshShell.RegWrite "HKLM\Software\BrowserChoice\Enable", 0, "REG_DWORD"
Set WshShell = Nothing

Før den lavede Enable med værdien 0

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 15:36:18| #5

thov (39.295 point)

Det er opdateringen 'kb976002' vi bliver belemret med, som er årsagen.
Jeg har fjernet fluebenet fra den i Windows Update, men har man automatisk opdatering aktiveret, ryger den jo bare ind.

Her er mere om det http://www.grouppolicy.biz/ (...)

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 16:03:12| #6

lsskaarup (19.458 point)

Kæmper lidt med også at få fjernet den skide genvej der kommer på skrivebordet.

Jeg troede det var en genvej (.lnk), men den bliver ikke slettet, så den må hedde noget andet

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 16:08:46| #7

lsskaarup (19.458 point)

Jeg har følgend kode, men det virker ikke. Jeg har prøvet med .lnk og .exe efter filnavnet.

Set filesys = CreateObject("Scripting.FileSystemObject")
desktop = WshShell.SpecialFolders("Desktop")
file = desktop & "\Valg af webbrowser"
'filesys.CreateTextFile "c:\somefile.txt", True
If filesys.FileExists(file) Then
  filesys.DeleteFile file
  Response.Write("File deleted")
End If

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 16:21:47| #8

tpo (nedlagt brugerprofil) (45.516 point)

lsskaarup #4

Før den lavede Enable med værdien 0

http://support.microsoft.com/ (...)
Possible values:

1          Display the Browser Choice update (default)
0          Do not display the Browser Choice update

:-)

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 16:25:41| #9

lsskaarup (19.458 point)

#8 Jeg fik en fejl på det, så jeg måtte jo prøve noget andet.

Men jeg har lavet en GPO i stedet for, var faktisk nemmere, men jeg mangler stadig lige at slette filen.

Hvordan angiver jeg brugerens sti til skrivebordet, så det gælder for både Windows XP og Windows 7?

C:\Users\administrator\Desktop\Valg af webbrowser.lnk

Alt for "\Valg af webbrowser.lnk", skal jo kunne tilpasse sig, både OS og sproget.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tor. d. 11. marts 2010 kl. 17:12:12| #10

tpo (nedlagt brugerprofil) (45.516 point)

#8

Dim WSHShell, DesktopPath, Filesys

Set WSHShell = WScript.CreateObject("WScript.Shell")
DesktopPath = WSHShell.SpecialFolders("Desktop")

File = DesktopPath + "\Valg af webbrowser.lnk"

Set Filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists(file) Then
  Filesys.DeleteFile file
End If

Set Filesys = Nothing
Set WSHShell = Nothing

:-)

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet ons. d. 26. maj 2010 kl. 14:25:13| #11

lsskaarup (19.458 point)

Nå, nu fik jeg lige tid til at teste dit script, men det ser ikke ud til at virke, filen forsvinder i hvert fald ikke...

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet lør. d. 29. maj 2010 kl. 21:39:48| #12

leif (72.650 point)

:-) Vi klarede os over den ved ikke at acceptere den i vores WSUS

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet man. d. 02. august 2010 kl. 14:49:37| #13

lsskaarup (19.458 point)

*bump*

Jeg mangler stadig en central mulighed, for at slette genvejen på skrivebordet, hvis updateringen er blevet hentet.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 03. august 2010 kl. 09:12:42| #14

tpo (nedlagt brugerprofil) (45.516 point)

Scriptet i #10 virker fint her hos mig (Windows 7).
Det kræver selvfølgelig at genvejen hedder: Valg af webbrowser.lnk

Hvis der er andre navne kan de bare tilføjes:

File = DesktopPath + "\Valg af webbrowser.lnk"

Set Filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists(file) Then
  Filesys.DeleteFile file
End If

File = DesktopPath + "\Et andet navn.lnk"

Set Filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists(file) Then
  Filesys.DeleteFile file
End If

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 03. august 2010 kl. 15:12:21| #15

lsskaarup (19.458 point)

Hmm, mærkeligt for genvejen hedder netop Valg af webbrowser...

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 03. august 2010 kl. 20:54:26| #16

karise_larry (259.266 point)
www.ballade.dk

Nu kender jeg ikke liiiiiige til den slag programering, men variablen
[DesktopPath]
dækker den
* nuværende bruger's Skrivebord
eller
* "All User" skrivebord
???

Forstået på den måde at jeg mener at [Valg af webbrowser.lnk] bliver lagt i "All User" skrivebord ... og hvis det ikke er der du kigger sååååå....

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet søn. d. 22. august 2010 kl. 13:39:25| #17

lsskaarup (19.458 point)

Hmm, hvorfor har jeg ikke set, der var endnu et indlæg til dette spørgsmål.

Jeg mener at DesktopPath refererer til de naktuelle bruger, så det kunne være et godt bud.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet ons. d. 15. september 2010 kl. 09:24:20| #18

lsskaarup (19.458 point)

Sådan, nu fik jeg lige 5 minutter til at kigge på dette problem igen.

Det viste sig netop at være fordi DesktopPath refererede til den aktuelle bruger, og ikke all users som filen/genvjen lå i.

Så tpo og karise_larry, hvis I lige smider et svar hver, så fordeler jeg pointene imellem Jer og får lukket spørgsmålet.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet ons. d. 15. september 2010 kl. 17:34:04| #19

karise_larry (259.266 point)
www.ballade.dk

Ping...

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 05. oktober 2010 kl. 13:12:33| #20

lsskaarup (19.458 point)

De mails fra E! er godt nok noget ustabile. Det er så anden gang jeg tilfældigt kommer ind på et af mine spørgsmål, hvor der er kommet et svar, som jeg ikke er blevet fortalt om.

Begge svar er dog fra den 15. sep., så måske der var problemer den dag.

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 05. oktober 2010 kl. 18:00:14| #21

karise_larry (259.266 point)
www.ballade.dk

Ref #20: Bruger du en TDC E-mail konto ?

Anmeld misbrug

Skriv et svar | Skriv en kommentar

Skrevet tir. d. 05. oktober 2010 kl. 19:31:21| #22

lsskaarup (19.458 point)

Prøver at holde mig så langt væk fra TDC som overhovedet muligt. Nej, har egent domæne med tilhørende mail, og der har ikke været problemer med andre mails.

Anmeld misbrug

Skriv et svar | Skriv en kommentar