Jobs
Author: kanytu Date Submitted: 5/10/2007 Category: Internet Compatibility: .NET,VB 6 This code has been accessed 4385 times.
Email Yourself this snippet:
need 1 textbox and 1 button
Code
Private Sub Command1_Click() Shell ("netsh firewall set portopening TCP " & Text1.Text) end