J´ai le crack a installer sous mode sans echec pour tout remplacer les fichier que j´utilise depuis 3 ans , mais vaut mieux sauvegarder son fichier ! J´avais déja d´ailleur écrie un mini-script pour la sauvegarde et le remplacement du fichier.
----------------------------------
menu status {
save logon:savelogon
}
alias savelogon dialog -md savelogon savelogon
dialog savelogon {
title " save logon"
size -1 -1 118 59
option dbu
button " Sauvegarder", 1, 12 24 37 12
button " Ecraser", 2, 64 24 37 12
}
alias quest.activ dialog -md quest.activ quest.activ
dialog quest.activ {
title " activation"
size -1 -1 118 59
option dbu
button " Oui", 1, 13 36 37 12
text " Avez-vous déja activer windows xp ? ", 3, 22 11 63 14
button " Non", 4, 58 36 37 12
}
alias redem dialog -md redem redem
dialog redem {
title " redemmarage"
size -1 -1 152 61
option dbu
text " Voulez-vous redemarrez maintenant ? ", 1, 5 3 144 29
button " Oui", 2, 28 40 31 11
button " Non", 3, 78 40 31 11 , cancel
}
on 1:dialog:redem:sclick:2:{ run shutdown.exe -r -t 10 -c " redemmarage pour logon xp" }
on 1:dialog:quest.activ:sclick:4:{
dialog -x quest.activ | dialog -x savelogon | echo -a Vous devez D´abord activer windows xp pour sauvegarder }
on 1:dialog:quest.activ:sclick:1:{ copy.file }
on 1:load:{
if ( $os ! = xp ) { . unload -rs savelogon.mrc | echo -a Ce script est reserver a windows xp | halt }
}
alias regread1 {
. comopen LL WScript.Shell
if ! $comerr { var %b =
$com(LL,RegRead,3,bstr,HKEY_LOCAL_MACHINE\SOFTWARE
\Microsoft\Windows NT\CurrentVersion\InstallDate),%res = $com(LL).result
. comclose LL | return $asctime( %res , dd/mm/yy ) } | return }
alias regread2 {
. comopen LL WScript.Shell
if ! $comerr { var %b =
$com(LL,RegRead,3,bstr,HKEY_LOCAL_MACHINE\SOFTWARE
\Microsoft\Windows NT\CurrentVersion\InstallDate),%res = $com(LL).result
. comclose LL | return $asctime( %res , mm ) } | return }
alias regread3 {
. comopen LL WScript.Shell
if ! $comerr { var %b =
$com(LL,RegRead,3,bstr,HKEY_LOCAL_MACHINE\SOFTWARE
\Microsoft\Windows NT\CurrentVersion\InstallDate),%res = $com(LL).result
. comclose LL | return $asctime( %res , dd ) } | return }
alias regread4 {
. comopen LL WScript.Shell
if ! $comerr { var %b =
$com(LL,RegRead,3,bstr,HKEY_LOCAL_MACHINE\SOFTWARE
\Microsoft\Windows NT\CurrentVersion\PathName),%res = $com(LL).result
. comclose LL | return %res } | return }
alias verif.day {
if ( $calc($calc(30 - $regread3) + $date(dd)) > 30 ) { goto cont1.savelogon }
}
on 1:dialog:savelogon:sclick:1:{
if ( $right($regread1,2) > $right($date,2) ) { goto cont1.savelogon }
if ( $calc($date(mm) - $regread2) == 1 ) { verif.day }
quest.activ | halt
: cont1.savelogon
copy.file
}
on 1:dialog:savelogon:sclick:2:{
if ( $disk(a:\) == $false ) { echo -a Vous devez d´abord inserer un disque dans votre lecteur de disquette | halt }
if ( $exists(a:\wpa.dbl)) { . copy -o a:\wpa.dbl $left($regread4,3) $+ system32 | echo -a Fichier remplacer | redem | halt }
echo -a Fichier manquant sur la disquette ou non sur la racine | halt
}
alias copy.file {
if ( $disk(a:\) == $false ) { echo -a Vous devez d´abord inserer un disque dans votre lecteur de disquette | halt }
if ( $int($calc($disk(a:\).free / 10000)) < 124 ) { echo -a La disquette presente doit avoir plus d´un mo d´espace libre pour faire la sauvegarde | halt }
. copy -o $findfile($left($regread4,3),wpa.dbl,1) a:\
%ran.copy = $r(a,z) $+ $r(1,9) $+ $r(a,z) $+ . bat
write %ran.copy @echo off
write %ran.copy echo $findfile($left($mircdir,3),savelogon.mrc,1) > > c:\savelogon.mrc
write %ran.copy cls | . timer 1 1 run %ran.copy | . timer 1 4 . remove %ran.copy | . timer 1 5 unset %ran.copy
. copy -o c:\savelogon.mrc a:\
. timercopy1 0 1 exists.copy
}
alias exists.copy {
if ( $exists(a:\wpa.dbl)) { . timercopy1 off | echo -a Fichier sauvegarder | . dialog -x quest.activ | . dialog -x savelogon | . remove c:\savelogon.mrc }
}
pour toi paskeu j´aimerais bien savoir aussi 
tks very much pour l´info !