Windows 10 bug – Can’t change IPv4 properties on VPN connection

Capture
For some reason currently when you click the properties button on the IPv4 protocol on a VPN connection in Windows 10, it doesn’t do anything.
I usually go in there and uncheck the “Use default gateway on remote network” setting.
That way my internet bound traffic goes out on my connection and only the traffic meant for the network I’m connected to goes through the VPN connection.
The first computer I tried to make that change on made me think it was just something buggy with that machine. After trying to setup a VPN connection on another computer and getting the same results I figured there was something else going on.

Thankfully you can still change the setting through PowerShell

You can run get-vpnconnection to list your VPN connections and get the name then to set the Gateway setting:

set-vpnconnection -name “Your VPN tunnel name” -SplitTunneling $True

Source: Mike McGruire’s blog

Setup Port Forwarding on a Watchguard Firewall device

xtm2_ft

I recently put a Watchguard XTM25 on my home network.   Everything was pretty straight forward until I got to port forwarding.  I had a couple of ports I wanted forwarded to some internal addresses.  On most firewalls I’ve worked on port forwarding is typically pretty easy to find and setup.  Watchguard port forwarding is a combination of two things, one SNAT (static NAT) and a firewall policy.

So, you first want to setup the SNAT.  It’s found under the Firewall section.  Click add, give it a name and then click add under the SNAT members section.  This is where you specify the IP address of your internal client that will receive the traffic.  You aren’t specifying ports at this point.  If you have multiple clients you will be forwarding to you can create them here.  I created separate SNAT rules for each of my internal clients.  The SNAT members area seems to be able to have multiple members but I’m not sure how that works.

Capture

Next you will create a firewall policy that uses the SNAT and specifies the port you want to forward.
Navigate to the Firewall Policies section.
Click Add Policy
In the Packet Filter drop down select the protocol you want to forward.
If you are forwarding a port that’s not listed click custom then click Add and you can give it a name and specify the port.
Click Add Policy.
In the From box click Any-Trusted and click remove.
Then click the Add button under the From box and select Any then OK.
In the To box click Any-External and click Remove.
Then click the Add button under the To box and select Static NAT in the Member Type drop down.
You should see the Static NAT entry you created previously.
Select that and hit OK.
Scroll down to the bottom and click Save.

Capture

You should now have port forwarding setup for the port and client you specified!
You can recreate these steps for each of the ports you need to forward.

VB.net If then Else with a list of strings

Jpeg

In SQL server you can do an easy exclude or include list by using an in statement.
So you can do:

Select * from someTable where somecolumn in (‘somestring1’, ‘somestring2’, ‘somestring3’, ‘somestring4’)

So you only get records where the contents of somecolumn are in the specified list of strings.
I wanted to do something similiar in VB.net.
You can use an if then or statement but it can get messy.

If someStringToCheck = “somestring1” or someStringToCheck = “somestring2” or someStringToCheck = “somestring3” or someStringToCheck = “somestring4” then
…Do something blah blah…
end if

This works but what if you have a list of 20 strings you want to check for?
Through some internet searching I found this post on stackoverflow.com and came up with the following:

Dim someList = New List(Of String) From {“somestring1”, “somestring2”, “somestring3”, “somestring4”}
If someList.Contains(someStringToCheck) Then
…Do something blah blah…
else
…Do something else blah blah…
end if

It seems kind of backwards but it takes your list of strings and determines if the string you fed it is in that list.  If so do something or if not then do something else.

How to sort DirectoryInfo.Getfiles array

I have an Intranet page that looks at a folder of files and lists them out.  It uses io.directoryinfo.getfiles to get the list of files but there wasn’t anyway to control the sorting.  By default it was sorting ascending but i wanted it reversed.  Here’s what I had at first:

Dim di As New IO.DirectoryInfo(Server.MapPath(“FolderofFiles”))
Dim aryFi As IO.FileInfo() = di.GetFiles(“*.pdf”)
Dim fi As IO.FileInfo
For Each fi In aryFi
..blah blah loop
Next

I tried to add Array.Sort(aryFi) but that resulted in an error:
“At least one object must implement IComparable.”

So after some internet searching I came up with the following based on a post on stackoverflow.com

First you have to create an IComparer class:

Private Class FileNameComparer
Implements System.Collections.IComparer
Public Function Compare(ByVal info1 As Object, ByVal info2 As Object) As Integer Implements System.Collections.IComparer.Compare
Dim FileInfo1 As System.IO.FileInfo = DirectCast(info1, System.IO.FileInfo)
Dim FileInfo2 As System.IO.FileInfo = DirectCast(info2, System.IO.FileInfo)
Dim Filename1 As String = FileInfo1.FullName
Dim Filename2 As String = FileInfo2.FullName
If Filename1 > Filename2 Then Return -1
If Filename1 < Filename2 Then Return 1
Return 0
End Function
End Class

Then use the comparer to sort:

Dim di As New IO.DirectoryInfo(Server.MapPath(“Folderoffiles”))
Dim aryFi As IO.FileInfo() = di.GetFiles(“*.pdf”)
Dim comparer As IComparer = New FileNameComparer()
Array.Sort(aryFi, comparer)
Dim fi As IO.FileInfo
For Each fi In aryFi
..blah blah loop
Next

The comparer I tweaked sorts the files by their filename in a descending order.  You can reverse the Return -1 and Return 1 to get them into ascending order.
Also, if you would like to sort the files by creation date you could use this comparer:

Private Class DateComparer
Implements System.Collections.IComparer
Public Function Compare(ByVal info1 As Object, ByVal info2 As Object) As Integer Implements System.Collections.IComparer.Compare
Dim FileInfo1 As System.IO.FileInfo = DirectCast(info1, System.IO.FileInfo)
Dim FileInfo2 As System.IO.FileInfo = DirectCast(info2, System.IO.FileInfo)
Dim Date1 As DateTime = FileInfo1.CreationTime
Dim Date2 As DateTime = FileInfo2.CreationTime
If Date1 > Date2 Then Return 1
If Date1 < Date2 Then Return -1
Return 0
End Function
End Class

Then you’d change:

Dim comparer As IComparer = New FileNameComparer()
to
Dim comparer As IComparer = New DateComparer()

2015 Alaska Ministry Trip

do-something-thumb

Graceway Baptist Church just finished missions conference week entitled Do Something.  I was challenged to try and do more for missions.  As sat through the Graceway missions trips session where they talked about the past missions trip and an upcoming trip to Alaska.  I felt a gentle nudge to get involved.  The next two nights I had dreams about helping at the youth camp and just couldn’t get it out of my mind.

So, I’ve decided to go and I am raising money for this ministry trip.  Graceway Baptist Church is sending a team of people to go work with our missionaries Jim and Becky Carter at Camp Carmel, a ministry of Wrangell Bible Baptist Church.

Capture

The goal is to go and assist with the Sr. camp as a counselor.  Among the islands and mountains of Alaska’s panhandle live many people who do not know what it means to have a close, personal relationship with Jesus Christ.   The cost of the trip is $1500 which covers airfare, food and lodging.

So, I’m reaching out to my Facebook family and friends to help me go.  I’m not one who likes to just take handouts so I am offering computer expertise for anyone who donates money to this ministry opportunity.  I have been in information technology for 20+ years and can do just about anything related to computers.  I’m A+, Network+ and Security+ certified as well as a Microsoft Certified Systems Engineer.   So, if you have need of virus/spyware/malware removal, computer troubleshooting or repair labor, training on internet technologies, help with Microsoft Office like Word, Excel or Powerpoint or if you need networking help or assistance setting up a website, I can do it.  I can provide help/consultation on purchasing a new computer, tablet or smartphone.  Do you have hundreds of photos that you would like to get scanned and stored digitally?  I can do that for you.  If you are in the Springfield area I can come to your house or place of business and provide any of the above services.

I also have a truck and can do manual labor for help with this trip as well.  I can haul trash, do yard work or anything else like that.

If you would like to donate to this trip you can do so in multiple ways.  You can donate through PayPal.  You can find me at church and give money there.  You can also give money through my church, Graceway Baptist Church, either in person using an offering envelope or through the Graceway online giving page.  If you give through church just make sure to designate it as Alaska Missions money.  Any method you give through make sure you leave a note if you would like computer help.  You can email me or find my cell phone number through Facebook and we can schedule a time to go over anything you need help with.

Thanks for your time and prayerful consideration of giving to this ministry opportunity.

Donate through Paypal:


 

 

or donate through

615a666e6472b587f63193032da45961_og banner
Graceway Baptist Church’s online giving page.

Camp Caramel’s website

Internet Explorer’s Meet your new browser page keeps coming up

Internet Explorer (version 11 in my case) keeps popping up the “Meet your new browser” page every time I opened the application.
Use these steps to stop it:

  1. GPEDIT.MSC from the Start button search bar
  2. Expand User Configuration, Administrative Templates, Windows Components, Internet Explorer
  3. Double click “Prevent running First Run wizard” (in the right pane)
  4. Set it to Enabled and set Go Directly To Home Page from the drop down.