Jump to content

DNS Jumper 1.0.4


avmad

Recommended Posts

OK so it's not new, but it's new to me :D

Useful little tool if you use DNS servers. Saves me having to look online for settings when I can't remember them.

vP3WV.png

If you want to change your DNS settings with one click, DNS Jumper is the best and easiest solution for you. It´s freeware and portable (does not need installation).

DNS Jumper aids the user by providing a one-click system to change DNS servers. The application displays a list of DNS servers that can be activated with the click of the mouse button. Available DNS server range from Google DNS over Open DNS to Ultra DNS, Level 3, Open NIC to the default DNS server of the system.

Changing the DNS on your network settings is not the easiest task, so DNS Jumper comes to save the day.

Features:

you can choose your network card

add/modify custom DNS

you can change the language

customize DNS manually

benchmark DNS IPs and measure time reaction

flush DNS button available

test the fastest DNS

Freewarefiles Download

Home page

Link to comment
Share on other sites


  • Replies 10
  • Views 3.3k
  • Created
  • Last Reply

@avmad

Downloaded & Like. Added to the Toys Section. :P

Thank you very much for the link. :dance2:

Link to comment
Share on other sites


I remember a thread where I posted some tools.. for DNS .. including DNS Benchmark.. and another one.. This is nice for a quick listing and has some good tools will have to check it out.. ( I really liked DNS Benchmark however - could be a different name though would have to double check to make sure)

EDIT: Here it is..

Link to comment
Share on other sites


never knew of it ...

i use this NetSet Man ( http://www.netsetman.com/index.php?s=nsm ) ,

have created different profiles for different servers and switch them through it .

but this one too looks good , with many options ...

thanks for sharing ..

+1

Link to comment
Share on other sites


stratocaster009

been using that but i just got this question in my mind, which is more reliable or faster, putting up DNS servers in a router or in the OS?

Link to comment
Share on other sites


This is going to depend on network configuration.. Also having different ones in different places is not really a good thing.. especially if you have protection which will detect ARP Poisoning Attacks and DNS Poisoning... So it really needs to be both...the same..

Link to comment
Share on other sites


try this, no worry poisoning attack

save as file >>> vbs

======================

just edit

'// Static Ip addrerss settings

strIPAddress = Array("10.16.72.0")

strSubnetMask = Array("255.255.255.0")

strGateway = Array("10.16.72.65")

strGatewayMetric = Array(1)

strDNSservers = Array ("8.8.4.4","8.8.8.8","4.2.2.1")

======================

'//by john6000

'// Script to switch between static IP and DHCP

'// Need to add something to decide which sub to run

'// Currently set up to set a static address

'// This is an edit on the Technet Scripts to include DNS

'// check dahulu sebelum edit IP address dan DNS servers

'On Error Resume Next

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled = true")

'// Static Ip addrerss settings

strIPAddress = Array("10.16.72.0")

strSubnetMask = Array("255.255.255.0")

strGateway = Array("10.16.72.65")

strGatewayMetric = Array(1)

strDNSservers = Array ("8.8.4.4","10.0.28.34","10.0.18.42")

'// This calls the sub goStatic() below

'// Change to goDHCP() to set the machine to DHCP

goStatic

Sub goStatic()

For Each objItem In colItems

errEnable = objItem.EnableStatic(strIPAddress, strSubnetMask)

errGateways = objItem.SetGateways(strGateway, strGatewaymetric)

'// This line removes all DNS servers

errDNS = objitem.SetDNSServerSearchOrder()

errDNS = objitem.SetDNSServerSearchOrder(strDNSServers)

If errEnable = 0 Then

WScript.Echo "The IP address has been changed."

Else

WScript.Echo "The IP address could not be changed."

End If

Next

'// ReQuery to see changes

Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled = true")

For Each objItem In colItems

If Not IsNull(objitem.ipaddress) Then

For i = LBound(objitem.IPAddress) To UBound(objitem.IPAddress)

WScript.Echo "New IP is " & objitem.IPAddress(i)

Next

End If

If Not IsNull(objitem.ipSubnet) Then

For i = LBound(objitem.IPSubnet) To UBound(objitem.IPSubnet)

WScript.Echo "New subnet is " & objitem.IPSubnet(i)

Next

End If

If Not IsNull(objitem.DefaultIPGateway) Then

For i = LBound(objitem.DefaultIPGateway) To UBound(objitem.DefaultIPGateway)

WScript.Echo "Gateway is " & objitem.DefaultIPGateway(i)

Next

End If

Next

End Sub

Sub goDHCP()

For Each objItem In colItems

errEnable = objItem.EnableDHCP()

If errEnable = 0 Then

Wscript.Echo "DHCP has been enabled."

Else

Wscript.Echo "DHCP could not be enabled."

End If

Msgbox "setting DNS"

errDNS = objitem.SetDNSServerSearchOrder()

errDDNS = objItem.SetDynamicDNSRegistration

msgbox "DNS Set"

errRenew = objItem.RenewDHCPLease

msgbox "renew called"

If errRenew = 0 Then

Wscript.Echo "DHCP lease renewed."

Else

Wscript.Echo "DHCP lease could not be renewed." & err.number & err.description

End If

Next

End Sub

Link to comment
Share on other sites


Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...