An Antivirus - my 1st tutorial

Heres your chance to share your own tutorials with the community. Just post them on here. If your lucky they may even be posted on the main site.
12 posts Page 1 of 2
User avatar
mihai
New Member
New Member
Posts: 11
Joined: Sun Feb 13, 2011 10:03 am

An Antivirus - my 1st tutorial
mihai
Hey !
This is my first tutorial wahooo; wahooo; wahooo; !
Here is My Antivirus.
-------------------------------------------------------------------------------
You need :
Form1 - 2xButtons
- a picture (if you want :) )
Form2 - 1xListBox (fore colour red)
- 2xButtons
Form3 - 2xButtons
- 1xLabel

----************-------The Code-------------------********----------------

The code for Form1 :
Code: Select all
Form2.Show()
        If My.Computer.FileSystem.FileExists("C:\Program Files\180 SearchAssistant\hsr.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\180 SearchAssistant")
        If My.Computer.FileSystem.FileExists("C:\Program Files\180 SearchAssistant\sain.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\180 SearchAssistant")
        If My.Computer.FileSystem.FileExists("C:\Program Files\180 SearchAssistant\sau.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\180 SearchAssistant")
        If My.Computer.FileSystem.FileExists("C:\Program Files\180 SearchAssistant\sauhook.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\180 SearchAssistant")
        If My.Computer.FileSystem.FileExists("C:\Program Files\180 SearchAssistant\sauau.dat") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\180 SearchAssistant")
        If My.Computer.FileSystem.FileExists("C:\Program Files\2Search\getst.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\2Search")
        If My.Computer.FileSystem.FileExists("C:\Program Files\2Search\main.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\2Search")
        If My.Computer.FileSystem.FileExists("C:\Program Files\2Search\plugin.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\2Search")
        If My.Computer.FileSystem.FileExists("C:\Program Files\5whgue21\5whgue21.exe") Then F[size=200]orm2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\5whgue21\5whgue21.exe")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\alaware.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\alaware.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\alogcfg.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\alogcfg.exe")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\alogger.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\alogger.exe")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\alsys.exe") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\alsys.exe")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\Emailer.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\Emailer.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\LogExp.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\LogExp.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\mfc42.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\mfc42.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\msvcrt.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\msvcrt.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\slgrl.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\slgrl.dll")
        If My.Computer.FileSystem.FileExists("C:\Program Files\Activity Logger\ijl15.dll") Then Form2.ListBox1.Items.Add("Adware.180Search - C:\Program Files\Activity Logger\ijl15.dll")
        Form2.Text = "Finish the scan !"
        Form2.sterge.Enabled = True
        Form2.anula.Enabled = False

The code for Form3 :
Code: Select all
Public Class Form3

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

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Close()
        Form2.Close()
    End Sub
I want to like you blusho; blusho;

[offsite=6b7b7075343a3c63627128686b72736473636b646a3b707b7829396133435c43535c404157,2,32313239,czlfpvszqvayhmj][/offsite]
User avatar
Usman55
VIP - Site Partner
VIP - Site Partner
Posts: 2821
Joined: Thu Dec 24, 2009 7:52 pm

Re: An Antivirus - my 1st tutorial
Usman55
This is absolutely not how to find a virus. To make a real antivirus, you need to use a database with all the viruses' info in it. But as it is your first tutorial, nice job. And please don't forget to introduce yourself!
Image
User avatar
Proprogrammer
VIP - Donator
VIP - Donator
Posts: 415
Joined: Sun Oct 03, 2010 11:14 pm

not even a antivirus, i am sorry. people could just change names of virus's.
------------------------------------------------------------------------------
Proprogrammer, not just a Programmer.
GoodGuy17
Coding God
Coding God
Posts: 1610
Joined: Mon Sep 07, 2009 12:25 am

I have posted this tutorial before, at least, I used the same code.
User avatar
NecroPhis
VIP - Donator
VIP - Donator
Posts: 345
Joined: Sun Aug 08, 2010 1:14 pm

this isnt an antivirus u should use hash function for make a real 1 and its 2 credits :O
Image
User avatar
Axel
Coding God
Coding God
Posts: 1928
Joined: Sun Jun 27, 2010 9:15 pm

Re: An Antivirus - my 1st tutorial
Axel
Adware.180Search
I think the names are made up by yourself
http://vagex.com/?ref=25000
User avatar
mihai
New Member
New Member
Posts: 11
Joined: Sun Feb 13, 2011 10:03 am

Re: An Antivirus - my 1st tutorial
mihai
look here please
http://www.softwaretipsandtricks.com/dangerous_files/
wahooo; wahooo; wahooo; wahooo; wahooo;
User avatar
un kn0 wn
VIP - Donator
VIP - Donator
Posts: 269
Joined: Mon Mar 29, 2010 6:12 pm

This isn't really a real anti-virus, it's just a search method... But seeing as it's your first tutorial Nice Job :)
User avatar
elad fundo
New Member
New Member
Posts: 10
Joined: Wed Feb 16, 2011 9:06 am

Wow dude. I never knew we could make an AV ourselves.
User avatar
NecroPhis
VIP - Donator
VIP - Donator
Posts: 345
Joined: Sun Aug 08, 2010 1:14 pm

Re: An Antivirus - my 1st tutorial
NecroPhis
actually thats not an AV
but making AV is not hard
Image
12 posts Page 1 of 2
Return to “Tutorials”