Windows 8

[baelecedr]

Bonjour à tous !

Nous avons tester aujourd'hui l'intégration de Windows 8 (inclut dans notre contrat de licences en volume Microsoft avec Software Assurance) au domaine.
Tout s'est passer sans problème sauf qu’apparemment, les scripts de connexions aux lecteurs réseaux ne s'exécutent pas et les paramètres qui en découlent ne sont pas activés (comme le fond d'écran par exemple !)

Peut-on faire quelque chose pour cela soit corrigé ou doit-on passer par le helpdesk ?

[raphaelmasson]

Bonjour

J'avais tenté aussi par curiosité d'installer une version beta test.

J'avais fait l'installation en faisant une mise à jour du windows 7 vers windows 8 et non pas une réinstallation complète.

La mise en réseau des dossiers fonctionnait bien mais pour les fonds d'écrans je ne sais pas vu qu' on laisse le choix aux élèves...

Raphaël Masson
Collège Saint-Remacle Stavelot

[baelecedr]

Ici, nous avons installé la version Entreprise de Windows 8

Apparemment tout se passe bien sauf le mappage des disques réseaux et l'attribution du fond d'écran obligatoire (vert/bleu/brun). En fait il n'y a pas de fond d'écran, nous avons un bureau noir quel que soit le compte loggué.

Par contre le fait d'imposer un fond d'écran est déjà devenu obsolète, 2 jours après la mise en route de nos cyber classes. J'explique :
Des élèves ont vite trouvé qu'avec Firefox, il était possible de changer le fond d'écran en faisant un clic droit sur une image et de choisir l'option ad hoc...
Ils ont râlé quand ils ont vu que ça ne se sauvegardait pas dans leur profile (à chaque relog, c'est le fond brun qui revient). Ils doivent donc relancer Firefox, rechercher leur image et à nouveau la remettre en fond d'écran.
Ils ont estimé cela trop fastidieux, du coup il sont revenus le lendemain avec un VBscript à lancer (2-3 fois pour que ça marche) et qui chage le fond d'écran tout seul !

Pour info, voici le fameux code :

Code: Tout sélectionner

Dim oShell
Set oShell = CreateObject("WScript.Shell")
Set oFSO = CreateObject("Scripting.FileSystemObject")
sWallPaper = "\\ccserveur\UsersData\user_login\chemin_complet_vers_le_fichier_image"
oShell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper", sWallPaper
oShell.RegWrite "HKCU\Control Panel\Desktop\TileWallpaper", 0
oShell.RegWrite "HKCU\Control Panel\Desktop\WallpaperStyle", 10
oShell.Run "%windir%\System32\RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters",1,True

Pour la petite anecdote, ce sont les élèves de la section Technique de Transition Informatique qui ont trouvé le ByPass.... Difficile de mettre 0 dans les compétences au bulletin avec ça !