Acil yardım! Sürekli notepad açılıyor.

Meraba arkadaşlar konuyu kısa tutacağım.Windows 7 kullanıyorum ve sürekli notepadde bir şey açılıyor.Virüs herhalde.Ben bunu format atmadan nasıl giderebilirim.Yazanlar şunlar:

Set WshShell = CreateObject("WScript.Shell")
PINGFlag = Not CBool(WshShell.run("ping -n 1 www.google.com",0,True))
Set objFSO=CreateObject("Scripting.FileSystemObject")
Dim status
If PINGFlag = True Then
status="ok"
Else
status="no"
End If
outFile="C:\Configration\Trtpg\tik_MOzhyH.txt"
Set objFile = objFSO.CreateTextFile(outFile,True)
objFile.Write status & vbCrLf
objFile.Close

Hepsinde bunun gibi şeyler yazıyor ama bazılarında outFile="C:\Configration\Trtpg\tik_MOzhyH.txt" yazacağına outFile="C:\Configration\Trtpg\tik_gtEe.txt" yazıyor nasıl düzeltebilirim.Programıda kaldırdım.

Konuyu yanlış yere açtıysam özür dilerim.Teşekkürler

Bilen kimse yokmuu???

çok sağlam bir virüs programı kullanman lazım eset olur norton olur kafana göre. bul indir ve güzelce bilgisayarını tarat. format öncesi iyi bir çözüm olabilir.