Forum Informatika
Silahkan Login

Kami sarankan anda register atau daftar terlebih dahulu agar anda dapat mendownload atau membuka category forum secara keseluruhan....
karena ada beberapa forum yang tertutup untuk tamu dan dengan Login Anda bisa menggunakan fasilitas Chatting yang kami miliki.

Selamat Bergabung

Forum Informatika

Created By Hanafi Sukawa Ginting
 
HomeFAQPasang Iklanfacebook InformatikaRegisterLog inNew Tab Newscomputer

Share | 
 

 Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6

View previous topic View next topic Go down 
AuthorMessage


Change Your Avatar -------------->


admin

Admin
Rank : Admin


My Pets :
Jumlah posting : 550
Point : 2147483647
Reputasi : 47
Join date : 2010-04-23
Age : 24
Lokasi : indonesia

PostSubject: Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6   Wed 27 Oct 2010, 08:57



Code:
Dim Windows_Firewall

Dim DigitalCat

Private Sub Command1_Click()

Set Windows_Firewall = CreateObject("HNetCfg.fwMgr")

Set DigitalCat = Windows_Firewall.LocalPolicy.CurrentProfile

DigitalCat.FIREWALLENABLED = False

MsgBox "Firewall OFF", vbInformation

End Sub

Private Sub Command2_Click()

Set Windows_Firewall = CreateObject("HNetCfg.fwMgr")

Set DigitalCat = Windows_Firewall.LocalPolicy.CurrentProfile

DigitalCat.FIREWALLENABLED = True
MsgBox "Firewall ON", vbInformation
End Sub




Aplikasi ini di gunakan untuk mematikan dan menghidupkan Firewall komputer anda..


mau tau lebih lanjut download project nya di link bawah ini

Klik Download
Back to top Go down
http://software-download1001.blogspot.com/


Change Your Avatar -------------->


syahwani

Level one
Rank : Level one


Jumlah posting : 1
Point : 1
Reputasi : 0
Join date : 2012-02-26

PostSubject: Re: Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6   Sun 26 Feb 2012, 15:37

linknya kagak bisa gan...
Back to top Go down


Change Your Avatar -------------->


admin

Admin
Rank : Admin


My Pets :
Jumlah posting : 550
Point : 2147483647
Reputasi : 47
Join date : 2010-04-23
Age : 24
Lokasi : indonesia

PostSubject: Re: Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6   Wed 29 Feb 2012, 10:01

syahwani wrote:
linknya kagak bisa gan...

di buat aja lagi buat form seperti itu
kodingnya tinggal kopas
simpan di setiap button
Back to top Go down
http://software-download1001.blogspot.com/


Change Your Avatar -------------->


Sponsored content

Rank :



PostSubject: Re: Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6   Today at 23:00

Back to top Go down
 

Aplikasi Menghidupkan dan Mematikan Firewall Dengan VB6

View previous topic View next topic Back to top 
Page 1 of 1

Permissions in this forum:You cannot reply to topics in this forum
Forum Informatika ::  :: VB6-
Jump to:  

Free forum | © phpBB | Free forum support | Contact | Report an abuse | Free forum