Les nouveautés et Tutoriels de Votre Codeur | SEO | Création de site web | Création de logiciel

Seo Master present to you:

Ever wanted to create your own anti-virus program? Follow this tutorial and you will got your own anti-virus in a few minutes.
Visual basic 2008 express edition needed!

First, let’s start a new project and put a listbox and a button on your form. Insert the following code in the click event of your button:

—–

Private

If My.Computer.FileSystem.DirectoryExists(”c:Program Files180search Assistant”) Then ListBox1.Items.Add(”Adware.180Search”)

—–

‘ This will add the item ‘Adware.180search to the listbox if c:Program files180search Assistant exists. If you want to search for a file you will have to do this:

—–

If My.Computer.FileSystem.FileExists(”c:Program Files180search Assistantsomething”) Then ListBox1.Items.Add(”Adware.180Search”)

‘ So if you want to search for a directory you have to use DirectoryExists, and if you want to search for a file you have to use FileExists.

Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Congratulations! You created an anti-virus that scans for files or folders. If you want to have an anti-virus that scans for processes, you will have to use this code: (Remember to type the process with uppercase characters!)

—–

strFoundProcess =

Dim AllProcessDim ProcessDim strFoundProcessFalse

AllProcess = GetObject(

“winmgmts:”)

strFoundProcess =

For Each Process In AllProcess.InstancesOf(”Win32_process”) If (InStr(UCase(Process.Name), “THEPROCESS.EXE“) = 1) Then ListBox1.Items.Add(”THENAMEOFTHEVIRUS“) True Exit For End If Next If strFoundProcess = False Then End If

AllProcess =

Nothing

—–

strFoundProcess =

False

AllProcess = GetObject(

“winmgmts:”)

If (InStr(UCase(Process.Name), “THEPROCESS.EXE“) = 1) Then

ListBox1.Items.Add(

strFoundProcess =

THENAMEOFTHEVIRUS“)True Exit For End If Next If strFoundProcess = False Then End If

AllProcess =

Nothing

For Each Process In AllProcess.InstancesOf(”Win32_process”)

You only need to that once! After you did that once, you can use this code:

False

AllProcess = GetObject(

“winmgmts:”)

‘create object For Each Process In AllProcess.InstancesOf(”Win32_process”)

‘Get all the processes running in your PC If (InStr(UCase(Process.Name), “AUPDATE.EXE”) = 1) Then

‘Made all uppercase to remove ambiguity. Replace TASKMGR.EXE with your application name in CAPS.

ListBox1.Items.Add(

“Spyware.W32.123bar”

)

strFoundProcess =

TrueExit

ForEnd

If

NextIf strFoundProcess = False

ThenEnd

If

AllProcess =

Nothing

Congrats! You completed this tutorial and know how to create your own anti-virus!

strFoundProcess =

 

 

----------------------------------------------------------------------------------------------------------




2013, By: Seo Master
Seo Master present to you:

Hey, Did you just Install Windows XP on your Computer?  Well Did you? If yes, you tried to activate Windows, but It when you are trying to, it says that your product key is not genuine or the number of activation has been exceeded? It ask you to call Microsoft to get a new product key? Well my friends also gone from the same problem but i have the way to it and it really worked.

Instead of Going to this trouble, or instead of spending Hundred of dollars, to get a new genuine product, let us solve this problem by following way:

 

download (1)

STEPS:-

  • Click on Start

  • Find and Click "Run"

  • Type regedit

  • Click the plus next to "HKEY_LOCAL_MACHINE"

  • Click the plus next to "SOFTWARE"

  • Click the plus next to "Microsoft"

  • Click the plus next to "Windows NT"

  • Click the plus next to "CurrentVersion"

  • Click "WPAEvents"

  • On the right panel, find "OOBETimer" then double click it.

  • Now, Delete all the Values by highlighting it, then delete it

  • Then type in this value without the quotation mark "FF D5 71 D6 8B 6A 8D 6F D5 33 93 FD"

  • Then after that click OK,

  • Then on the left panel right click WPAEvents, then click on permissions

  • Then click System or SYSTEM, then Deny Full Control, then Click OK.

  • Then Exit Registry Editor by Click the X or the red X on the Upper Right of the Title Bar or press ALT and F4 at the same time.

  • To Very that it works, go to start, then "activate windows", or go to start, then all programs, then "activate windows"

  • If it says that Windows has been activated.




2013, By: Seo Master
Seo Master present to you:

Do you want to see movie while doing work on your computer…if YES then you can do it by making that movie as your background wallpaper. Now we shall learn in this tutorial how to do it…

 

STEPS:

  • Click on START>all programs>Microsoft office>MS Front-page
  • Start a new page.
  • Right click on page>page properties>advanced
  • Set all the margins to 0 and click on OK.
  • Click on Insert>picture>video.
  • Now browse the movie or video clip which you want to set as your desktop background.
  • Now right click on that video on that page and go to Picture Properties>Video
  • Now select Repeat forever.
  • Now go to Appearance and set specific size as your screen resolution and click on OK.
  • Save that file.
  • Close MS Front-page.
  • Right click on Desktop>properties>desktop>browse.
  • Now that file where you have saved and click on open.
  • Click on apply and now enjoy the movie while working on PC.

I hope that you will find this trick interesting and useful.

2013, By: Seo Master

Powered by Blogger.