Automatic change DNS for Facebook

16Feb/100

Automatic change DNS for Facebook

For the last few month, the Vietnamese Government has issue a ban on Facebook, just like in China. My friend has take his little time to write a small bot to change DNS between openDNS, Google Public DNS and DHCP DNS. Using this program you can switch between those 3 type DNS fast. Simply just download, run it as Administrator (if you are using Vista / Win 7) and it do the job for you.

Now you can surf web safer without restriction. and better yet, I recommend you buy a SSH and use it as Sock5 for safer web browse in some location.

Một vài tháng trước Đảng ta đã chặn facebook và cho facebook vào 1 trong những trang "Có Nội Dung Chống Phá Nhà Nước Việt Nam". Thực sự sự việc có nhiều âm mưu đằng sau đó, như là việc sau khi nhà nước xóa sổ facebook thì zing me lại nổi lên với kiểu mạng xã hội copy/ăn theo/ăn cắp ý tưởng. Một phần khác cũng là do việc có nhiều nhóm chống phá nhà nước VN trụ tại facebook.

Nhưng facebook đã trở thành phương tiện liên lạc của nhiều người VN ở trong nước lẫn những du học sinh, người Việt nam ở nước ngoài, phải gọi là 1 cổng thông tin giữa VN và bạn bè trên tòan thế giới. Việc chặn lại facebook đã gây vấn đề bức xúc cho người dân VN ta.

Đây là chương trình tự động đổi DNS do một người bạn của Đức viết để cỏ thể tự động chuyển đổi giữa Open DNS, Google Public DNS hoặc DNS gốc của mạng bạn. Những ai ít có kinh nghiệm máy tính có thể dùng chương trình này để đổi DNS của mình một cách gọn gàng nhất.

Lưu ý: đối với ngưoiừ nào sử dụng Win 7 hoặc Vista, bạn phải chạy với chế độ "Run as Administrator".
-> Chương trình không có gì ngoải việc chạy ipconfig để đổi lại DNS. Chương trình đựơc viết = AutoIt. Đựơc quét virus và khẳng định kô có mã bẩn.

Source and Download: http://ducdigital.com/dns

Source code:

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#AutoIt3Wrapper_icon=facebook.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=Chương trình thay đổi DNS Sever của máy thành các loại DNS Sever khác
#AutoIt3Wrapper_Res_Description=DNS Sever Option
#AutoIt3Wrapper_Res_Fileversion=2.0.1.0
#AutoIt3Wrapper_Res_LegalCopyright=Hoàng Ðức Nghiêm (HĐN)
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

Local $Temp = @TempDir&"\NetworkConnection.tmp"
 
GUICreate("",100,116,-1,-1,0x00400000)
$ISP = GUICtrlCreateButton("ISP DNS Sever",0,0,117,30)
$Open = GUICtrlCreateButton("Open DNS Sever",0,30,117,30)
$Google = GUICtrlCreateButton("Google Public DNS",0,60,117,30)
 
GUISetState()
ToolTip("Xin vui lòng chọn một loại DNS Sever để thay đổi","","","DNS Sever (Unknow DNS)",1)
 
While (1)
	$Msg = GUIGetMsg()
	Select
		Case $Msg = $ISP
			$DNS = "ISP DNS"
			$DNS1 = "dhcp"
			$DNS2 = "dhcp"
			ExitLoop
		Case $Msg = $Open
			$DNS = "Open DNS"
			$DNS1 = "208.67.222.222"
			$DNS2 = "208.67.220.220"
			ExitLoop
		Case $Msg = $Google
			$DNS = "Google Public DNS"
			$DNS1 = "8.8.8.8"
			$DNS2 = "8.8.4.4"
			ExitLoop
	EndSelect
WEnd
 
GUIDelete()
ToolTip("Tạo File đệm và lấy thông tin kết nối","","","DNS Sever ("&$DNS&")",1)
_RunDOS("ipconfig > "&$Temp)
 
$Connection = FileReadLine($Temp,5)
$Connection = StringTrimLeft($Connection,17)
$Connection = StringTrimRight($Connection,1)
FileDelete($Temp)
 
ToolTip("Thay đổi thông số của DNS Sever","","","DNS Sever ("&$DNS&")",1)
_RunDOS('ipconfig/flushdns')
_RunDOS('netsh interface ip set dns "'&$Connection&'" static '&$DNS1&' primary')
_RunDOS('netsh interface ip add dns "'&$Connection&'" '&$DNS2)
 
ToolTip("")
MsgBox(64,"Đã xong","Thay đổi DNS Sever thành công!"&@CRLF&"Chúc bạn vui vẻ...  *~(^.^)~*")
 
Func _RunDOS($sCommand)
	Local $nResult = RunWait(@ComSpec & " /C " & $sCommand, "", @SW_HIDE)
	Return SetError(@error, @extended, $nResult)
EndFunc

Tagged as: autoit, china, dns, facebook, vietnam Leave a comment

Comments (0) Trackbacks (1) ( subscribe to comments on this post )

[Tip] - Chuyển DNS để vào facebook bằng vài nhấp chuột. | Tip4PC

« Open selling Vbulletin 3 4x and VbSeo license New chrome! »

Licenses Status

VBB 4 Available: 0
VBB 4 Sold: 3
VBB 4 Suite Available: 0
VBB 4 Suite Sold: 9
VBB 3 Available: 0
VBB 3 Sold: 6
VbSeo Available: 0
VBSeo Sold: 4
IPB Available: 5
IPB Sold: 4

Spam cleared

9,619 spam comments blocked by
Akismet

DucDigital for ( $girl = 1; $girl < $required; $girl++ ) { echo “I love DucDigital”; }