Ensav AntiVirus 1.0 AntiVirus Lokal Indonesia

Hmm, Saya kembali lagi ke blog saya ini. Saya Ingin Mempublikasikan sebuah antivirus yang di buat oleh anak smk 1 bangkinang, yaitu ENSAV antivirus. Yang di mana antivirus ini di buat dengan bahasa pemrograman visual basic classic. Antivirus ini pertamakali di publikasin di sebuah forum antivirus. tapi karena tempat download untuk antivirus ini di hapus oleh adminnya maka antivirus vakum. antivirus ini saya bilang setara dengan smk antivirus pro edition.
Berikut adalah review dari Ensav Antivirus:

Download ENSAV antivirus 1.0 Via ShareBeast:

DOWNLOAD ENSAV 1.0

Read more »

Source Code RTP Smk Antivir Free Edition In Vb Classic

Hai, apa kabar lgi. Saya kembali ke blog saya ini. saya akan share lagi sebuah source code visual basic classic. Saya akan share source code RTP antivirus lokal, ya mungkin dah basi atau mungkin ada juga yang tidak tau tentang source code ini, baiklah saya akan share Rtp SMK Versi Free Edition. Source ini pengembangan dari source ade shinchi protector. ya menurut saya source ini bagus dan mudah di pahami. Jika anda berminat untuk menggunakan source ini berikan kreditnya ya.. langsung aja lihat screen shotnya di bawah ini,


Screen Shot Rtp Smk Free Edition :

Download Source Code Smk Rtp  Free Edition :

Komentar Anda Saya Tunggu Di Bawah Ini,, ^_^

Read more »

Source Code Wani'ez Antivirus In Vb Classic

Hai, apa kabar semuanya saya kembali lagi ke blog saya ini. saya kali ini akan share sebuah source code yang menggunakan bahasa pemrograman visual basic. Saya akan share sebuah source code antivirus loka indonesia yaitu Wani'ez Antivirus. Mungkin ini masih beta. Tapi kalau versi yang sekarang udah jauh dari source code ini. Tapi Menurut saya source code ini sangat mudah di pahami. Gui nya juga lumayan bagus. Jika anda berminat mempelajari ataupun mengembangkan source ini silahkan anda download. Jika anda ingin melihat screen shot dari Wan'iez antivirus, silahkan lihat di bawah ini :


Screen Shot Wanie'z Antivirus :

Download Source Code Wanie'z Antivirus In Vb Classic :

Read more »

Source Code Aero Suit.ocx In Vb Classic

Hei, Saya kembali lagi ke blog saya ini. Baiklah admin akan share sebuah source code lagi yaitu source code Aero Suite Ocx yang di mana ini hampir mirip dengan code jock atau Graphx.ocx
menurut saya Source Ini hampir lengkap, yang kurang hanya ListView Saja, Mungkin Anda tertarik untuk mengembangkan Source Ini. Source Ini menggunakan Visual Basic Classic 5 - 6. Saya mohon source ini jangan di Jual. Jika Anda ingin lebih tau gimana source ini maka mari kita lihat screen shotnya :




Screen Shot Aero Suite :

Download Source Code Aero Suite :

Read more »

Source Code Gradient Form Seperti Ensav Antivirus

Hai Saya kembali lagi, saya akan share sebuah source code yang di mana menggunakan bahasa visual basic 5 - 6 yang sangat mudah untuk di pahami. Source Code ini yaitu seperti gradientnnya smadav dan ensav. mungkin anda tertarik untuk menggunakannya di aplikasi anda.
Jika anda ingin mengetahui lebih jauh seperti apa, mari kita lihat screen shotnya :






Screen Shot Gradient Form In Vb Classic :

Download Source Code Gradient Form In Vb Classic :

Read more »

Cara Check Koneksi Internet In Vb Classic

Hai Saya kembali lagi, kali ini saya akan share ilmu gimana cara chek koneksi internet dengan menggunakan visual basic clasic 5 - 6
Baiklah Langsung saja Siapkan :
- Buka Visual Basic
- Select Standart Exe
- Buat 1 Form
- Buat 1 Button
- Buat 1 Module
Itu Saja Yang kita butuhkan mari kita masuk ke codenya :


Masukan Kode Berikut Ke Button Yang Telah Anda Buat Tadi :
If Cek_Konek = True Then
MsgBox "Komputer Anda Terkoneksi Inernet!!", vbInformation, "VickHamShare"
Else
MsgBox "Maf Anda Tidak Terkoneksi Dengan Internet!!", vbExclamation, "VickHamShare"
End If

Kemudian masukan kode berikut ke form load, cara cepat klik saja formnya dua kali :
If Cek_Konek = False Then
Me.Caption = "Not-Connect"
Else
Me.Caption = "Connect"
End If

 Kemudian Masukan Kode Berikut Ke Module Yang Telah Anda Buat Tadi :
Public Declare Function RasEnumConnections Lib "RasApi32.dll" Alias "RasEnumConnectionsA" (lpRasCon As Any, lpcb As Long, lpcConnections As Long) As Long
Public Declare Function RasGetConnectStatus Lib "RasApi32.dll" Alias "RasGetConnectStatusA" (ByVal hRasCon As Long, lpStatus As Any) As Long
Public Const RAS95_MaxEntryName = 256
Public Const RAS95_MaxDeviceType = 16
Public Const RAS95_MaxDeviceName = 32
Public Type RASCONN95
    dwSize As Long
    hRasCon As Long
    szEntryName(RAS95_MaxEntryName) As Byte
    szDeviceType(RAS95_MaxDeviceType) As Byte
    szDeviceName(RAS95_MaxDeviceName) As Byte
End Type
Public Type RASCONNSTATUS95
    dwSize As Long
    RasConnState As Long
    dwError As Long
    szDeviceType(RAS95_MaxDeviceType) As Byte
    szDeviceName(RAS95_MaxDeviceName) As Byte
End Type
Public Function Cek_Konek() As Boolean
  Dim TRasCon(255) As RASCONN95
  Dim lg As Long
  Dim lpcon As Long
  Dim RetVal As Long
  Dim Tstatus As RASCONNSTATUS95
     TRasCon(0).dwSize = 412
    lg = 256 * TRasCon(0).dwSize
    RetVal = RasEnumConnections(TRasCon(0), lg, lpcon)
    If RetVal <> 0 Then
        MsgBox "ERROR"
        Exit Function
    End If
    Tstatus.dwSize = 160
    RetVal = RasGetConnectStatus(TRasCon(0).hRasCon, Tstatus)
    If Tstatus.RasConnState = &H2000 Then
        Cek_Konek = True
      Else
        Cek_Konek = False
    End If
End Function

Hasil Dari Check Koneksi Internet :

Download Source Codenya Via VickHamShare :

 

Read more »