result = MsgBox ("explorer.exe ne s'est pas fermé correctement, voulez vous revenir à la dernière session ?", vbCritical + vbYesNo ,"L'Explorateur Windows ne s'est pas fermer correctement :(")

Select Case result
Case vbYes
WScript.Sleep 1000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "exploreryes.vbs"

Case vbNo
WScript.Sleep 1000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "explorerno.vbs"

End Select