Tips BDD 2007

Bonjour à tous,

Je constate régulièrement, quand j'arrive chez un nouveau client, que vous êtes assez demandeurs de petits réglages et petites modifications dans les scripts de BDD. En voici deux que je trouve indispensable et d'autres viendront sans doute par la suite :

La première semble tomber sous le sens, j'aimerai faire en sorte que le poste déployé ne reste pas avec une session ouverte avec le compte « administrateur » local. Pour cela, j'ai pensé a plusieurs choses : modifier le task sequencer ou modifier le fichier unattend.xml mais la seule qui a vraiment répondu à mes besoins consiste à modifier le script LiteTouch.wsf dans la région suivante :

        ' Copy the logs

        oLogging.CopyLog

 

        ' Clean up

        Cleanup

    End
if

 

Juste après la phase de nettoyage (cleanup) il faut rajouter une instruction de reboot… et voila le resultat :

        ' Copy the logs

        oLogging.CopyLog

 

        ' Clean up

        Cleanup

        Reboot

    End
if

 

C'est tout J

La deuxième petite modification concerne le nom des fichiers de log, si vous faites du deployment LiteTouch, vous vous apercevrez vite que les noms ressemblent à MININT-123456.log, pas très pratique pour savoir à quel poste cela correspond. J'ai donc modifié le script ZTIUtility.vbs pour pouvoir nommer le fichier de log en fonction du nom de la machine (trouvé dans une base de données ou dans le customsettings.ini) J'ai donc remplacé ça :

        ' Figure out the computer name

 

        If oEnvironment.Item("OSDCOMPUTERNAME") <> ""
and Instr(oEnvironment.Item("OSDCOMPUTERNAME"), ":") = 0 then

            sComputer = oEnvironment.Item("OSDCOMPUTERNAME")

        ElseIf oEnvironment.Item("OSDNEWMACHINENAME") <> ""
then

            sComputer = oEnvironment.Item("OSDNEWMACHINENAME")

        ElseIf oEnvironment.Item("OSVersion") = "WinPE"
then

            sComputer = oEnvironment.Item("OSDCOMPUTERNAME")

            re.Pattern = ":"

            sComputer = re.Replace(sComputer, "")

        Else

            sComputer = oEnvironment.Item("HostName")

        End
if

Par ça :

        ' Figure out the computer name

 

        If oEnvironment.Item("COMPUTERNAME") then

            sComputer = oEnvironment.Item("COMPUTERNAME")

ElseIf oEnvironment.Item("OSDCOMPUTERNAME") <> ""
and Instr(oEnvironment.Item("OSDCOMPUTERNAME"), ":") = 0 then

            sComputer = oEnvironment.Item("OSDCOMPUTERNAME")

        ElseIf oEnvironment.Item("OSDNEWMACHINENAME") <> ""
then

            sComputer = oEnvironment.Item("OSDNEWMACHINENAME")

        ElseIf oEnvironment.Item("OSVersion") = "WinPE"
then

            sComputer = oEnvironment.Item("OSDCOMPUTERNAME")

            re.Pattern = ":"

            sComputer = re.Replace(sComputer, "")

        Else

            sComputer = oEnvironment.Item("HostName")

        End
if

C'est tout pour aujourd'hui J