Jump to content

TncTR Hosts Editor

KintaRo

By KintaRo,
in TNC-TR Çalışmaları

 Share

Recommended Posts

KintaRo Newbie

KintaRo

Posted
Posted (edited)

Hosts Editor v1.1

qttemphp2156.png

qttempuh2156.png


Hosts dosyasının yeri biraz karışık olduğu için bilgisayar konusunda tecrübeli olmayan arkadaşlar bu dosyayı bulmakta ve düzenlemede zorluk çekmekte. Bu yüzden Tugrul'un fikriyle bu küçük uygulamayı hazırladım. Açılır açılmaz system32\drivers\etc\hosts dosyasının içeriğini listeler ve buttonlar sayesinde açılacak site ve engellenecek siteleri kolayca eklemenizi sağlar. Vista ve Windows 7 uyumludur.

:download1:

 

Uygulama Dosyası:

http://yadi.sk/d/PaOLMG4S7A3WM



Proje Dosyası:

http://yadi.sk/d/83Y8bndw7A3aQ
Edited by TugruL
linkler yenilendi...
Link to comment
Share on other sites
KintaRo Newbie

KintaRo

Posted
  • Author
Posted

Eyvallah, ben XP'de yaptım, XP de deneyebildim sadece. ama hosts dosyasının yolunu _SystemFolder komutu ile çektirdim. Eğer Win7de de system32\drivers\etc\hosts yolunda ise çalışacaktır. Win7'de deneyen biri sonucu yazarsa memnun olurum.

Link to comment
Share on other sites
KemalALKIN Experienced

KemalALKIN

Posted
Posted

[quote name='KintaRo' date='04 Aralık 2010 - 15:47 ' timestamp='1291474635' post='921273']
Eyvallah, ben XP'de yaptım, XP de deneyebildim sadece. ama hosts dosyasının yolunu _SystemFolder komutu ile çektirdim. Eğer Win7de de system32\drivers\etc\hosts yolunda ise çalışacaktır. Win7'de deneyen biri sonucu yazarsa memnun olurum.
[/quote]
win 7 dede aynı yolda çalışır o zaman :) garanti

Link to comment
Share on other sites
YAGMURADAM Community Regular

YAGMURADAM

Posted
Posted

KintaRo,Çalışmanızı filemenü tools30 sürümüne ekleyeceğm.Tabii izninzle.Ama işlevi açısından dosya boyutu büyük değil mi?exe dosyasının boyutunu düşürme imkanın var mı?Çok sayıda programı eklediğim için işlevinden birşey kaybetmeden dosya boyutunu düşürürsen makbule geçer.Saygılarımla

Link to comment
Share on other sites
KintaRo Newbie

KintaRo

Posted
  • Author
Posted

[quote name='YAGMURADAM' date='04 Aralık 2010 - 17:20 ' timestamp='1291476621' post='921288']
KintaRo,Çalışmanızı filemenü tools30 sürümüne ekleyeceğm.Tabii izninzle.Ama işlevi açısından dosya boyutu büyük değil mi?exe dosyasının boyutunu düşürme imkanın var mı?Çok sayıda programı eklediğim için işlevinden birşey kaybetmeden dosya boyutunu düşürürsen makbule geçer.Saygılarımla
[/quote]

Yagmuradam; maalesef amsde en küçük dosya boyutu 4 mb. Bunun için yapacak birşeyim yok. Ama autoit bilen arkadaşlar bunu autoitte yaparsa boyut 500 kb'a felan düşecektir. Teşekkürler.

[quote name='poneryas' date='04 Aralık 2010 - 17:33 ' timestamp='1291477409' post='921294']
windows7 64 bitte denedim ve çok güzel çalışıyor ellerine sağlık.
[/quote]

Test için ben teşekkür ederim.

Link to comment
Share on other sites
KintaRo Newbie

KintaRo

Posted
  • Author
Posted

[quote name='BuqRaHan' date='04 Aralık 2010 - 17:53 ' timestamp='1291478616' post='921310']
Bu program youtube engelini mi kaldırıyor ?
[/quote]

İsterseniz engelli siteleri açarsınız, isterseniz site engellersiniz. ikisinide yapar.

Link to comment
Share on other sites
djonur007 Newbie

djonur007

Posted
Posted (edited)

[center] [b][font="Trebuchet MS"][size="3"][color="#000000"]TncTR Host Editor (for Autoit)

KintaRo abinin AMS çalışmasının Autoit versiyonu.

[codebox]http://hotfile.com/dl/86984866/5661923/HostEditor.exe.html[/codebox]

Fazla ayrıntıya girmedim arkadaşlar. Zamanım olmadığı için basitçe kodladım.

Geliştirmek isteyenler için kaynak kodları;
[/color][/size][/font][/b][left][b][font="Trebuchet MS"][size="3"][color="#000000"][spoiler] [php]
#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=HostsEditor.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_Comment=Onur YORULMAZ
#AutoIt3Wrapper_Res_Description=Onur YORULMAZ
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=Onur YORULMAZ
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $Form1 = GUICreate("TnCTR Host Editor (for Autoit)", 545, 436, -1, -1)
$Edit1 = GUICtrlCreateEdit("", 0, 48, 545, 387, BitOR($ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL))
$hostdosyasi = FileRead(@SystemDir & "\drivers\etc\hosts")
GUICtrlSetData(-1, $hostdosyasi)
$Button1 = GUICtrlCreateButton("Kaydet", 8, 8, 73, 33, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Engeli Aç", 100, 8, 73, 33, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Engelle", 192, 8, 73, 33, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Hakkında", 464, 8, 73, 33, $WS_GROUP)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_kaydet()
Case $Button2
_ac()
Case $Button3
_engelle()
Case $Button4
MsgBox(64,"Hakkında","Bu program Onur YORULMAZ tarafından www.TnCTR.com için hazırlanmıştır.")
EndSwitch
WEnd

Func _kaydet()
$kaydet = GUICtrlRead($Edit1, 1)
FileWrite(@SystemDir & "\drivers\etc\hosts", $kaydet)
EndFunc

Func _ac()
$IP = InputBox("IP Girin", "Lütfen sitenin IP'sini girin.", "")
$Site = InputBox("Siteyi Girin.", "Lütfen sitenin adresini girin.", "")
GUICtrlSetData($Edit1, $hostdosyasi & @CRLF & $IP & " " & $Site)
EndFunc

Func _engelle()
$Site = InputBox("Siteyi Girin.", "Lütfen sitenin adresini girin.", "")
GUICtrlSetData($Edit1, $hostdosyasi & @CRLF & "127.0.0.1 " & $Site)
EndFunc
[/php][/spoiler][/color][/size][/font][/b]
[/left] [/center]

Edited by djonur007
Link to comment
Share on other sites
Cyph3r Community Regular

Cyph3r

Posted
Posted

[quote name='djonur007' date='04 Aralık 2010 - 20:58 ' timestamp='1291493305' post='921481']
TncTR Host Editor (for Autoit)

KintaRo abinin AMS çalışmasının Autoit versiyonu.

[codebox]http://hotfile.com/dl/86984866/5661923/HostEditor.exe.html[/codebox]

Fazla ayrıntıya girmedim arkadaşlar. Zamanım olmadığı için basitçe kodladım.[/quote]

[color="#8B0000"][b]Eline sağlık Onur. Dosya boyutu bakımında baya fark etti. Autoit ile de Kintaro'nun yaptığı gibi görsel buton ekleme imkanın var mı?[/b][/color]

Link to comment
Share on other sites
KintaRo Newbie

KintaRo

Posted
  • Author
Posted

[quote name='djonur007' date='04 Aralık 2010 - 21:58 ' timestamp='1291493305' post='921481']
[center] [b][font="Trebuchet MS"][size="3"][color="#000000"]TncTR Host Editor (for Autoit)

KintaRo abinin AMS çalışmasının Autoit versiyonu.

[codebox]http://hotfile.com/dl/86984866/5661923/HostEditor.exe.html[/codebox]

Fazla ayrıntıya girmedim arkadaşlar. Zamanım olmadığı için basitçe kodladım.
[/quote]

Onurcum yalnız ufak bir hata var gibi, her zaman son satır üstünde işlem yapıyor, 2. satırı eklemiyor otomatik olarak. Bi bakıver ;)

Link to comment
Share on other sites
KintaRo Newbie

KintaRo

Posted
  • Author
Posted

[quote name='besimbicer' date='04 Aralık 2010 - 19:54 ' timestamp='1291485879' post='921397']
calısman icin seni tebrik ederim güzel bir program peki kaynak kod verebilirmisin ?
[/quote]


Proje dosyasını ilk mesaja ekledim.

Link to comment
Share on other sites
BeNefSE Newbie

BeNefSE

Posted
Posted

Arkadaşlar hata bende ama çalıştıramadım:)win 7 kullanıyorum site engelle butonuna tıklıyorum kutucuğa site adresini yazıyorum kaydet dediğimde aynı bişey olmuyor çıkıyorum bu defa o adres silinmiş oluyor o siteye de giriş yapıyor nerde hata yapıyorum:)

Link to comment
Share on other sites
BuqRaHan Newbie

BuqRaHan

Posted
Posted (edited)

[spoiler]Youtube Dünya Capinda IP leri toplam 2859 adet ....



208.65.153.251 uk.youtube.com
208.65.153.253 de.youtube.com
208.117.236.70 youtube.com
208.117.236.70 www.youtube.com
74.125.65.118 img.youtube.com
64.15.124.143 sjc-v1.sjc.youtube.com

[color="#FF0000"] 64.15.124.180 sjc-v38.sjc.youtube.com ++
64.15.124.244 sjc-v76.sjc.youtube.com [/color]
[color="#0000FF"] 64.15.125.16 sjc-v77.sjc.youtube.com ++
64.15.125.53 sjc-v114.sjc.youtube.com[/color]
[color="#FF0000"]64.15.125.208 sjc-v115.sjc.youtube.com ++
64.15.125.245 sjc-v152.sjc.youtube.com[/color]

[color="#0000FF"]64.15.120.181 sjc-v190.sjc.youtube.com
64.15.127.133 sjc-v191.sjc.youtube.com
[/color]
[color="#FF0000"]208.117.238.52 sjc-v266.sjc.youtube.com
208.117.238.79 sjc-v267.sjc.youtube.com
[/color]
[color="#0000FF"] 208.117.238.116 sjc-v304.sjc.youtube.com
208.117.238.142 sjc-v305.sjc.youtube.com
[/color]
[color="#FF0000"] 208.117.238.179 sjc-v342.sjc.youtube.com
208.117.238.206 sjc-v343.sjc.youtube.com[/color]

[color="#0000FF"] 208.117.238.243 sjc-v380.sjc.youtube.com
208.117.239.14 sjc-v381.sjc.youtube.com
[/color]
[color="#FF0000"] 208.117.239.115 sjc-v456.sjc.youtube.com
64.15.116.70 chi-v1.chi.youtube.com[/color]
64.15.116.235 chi-v113.chi.youtube.com

[color="#FF0000"]208.117.224.76 dal-v1.dal.youtube.com
208.65.155.183 lax-v80.lax.youtube.com[/color]

[color="#0000FF"]64.15.112.19 lax-v81.lax.youtube.com

64.15.112.245 lax-v232.lax.youtube.com
64.15.113.16 lax-v233.lax.youtube.com
[/color]
[color="#0000FF"] [color="#FF0000"] 64.15.113.118 lax-v308.lax.youtube.com
64.15.115.76 mia-v1.mia.youtube.com
[/color]
64.15.115.112 mia-v37.mia.youtube.com[/color][/spoiler]


Exe yi çalıştırdım bu renkli yapmış oldugum ıp ler arasında ki tüm ıp ler o listede kayıtlı durumda bunları bu listeden silecek miym ne yapacağım youtube ye girebilmek için ?
Saygılarımla

Edited by BuqRaHan
Link to comment
Share on other sites
djonur007 Newbie

djonur007

Posted
Posted

[quote name='TugruL' date='04 Aralık 2010 - 23:07 ' timestamp='1291497431' post='921531']
[color="#8b0000"][b]Eline sağlık Onur. Dosya boyutu bakımında baya fark etti. Autoit ile de Kintaro'nun yaptığı gibi görsel buton ekleme imkanın var mı?[/b][/color]
[/quote]

Görsel buton ekleme imkanı var ama udf'lerin kullanımını bilmek gerekiyor. O işlemlerde bana çok zor geliyor. :)

[quote name='KintaRo' date='05 Aralık 2010 - 00:30 ' timestamp='1291502418' post='921572']
Onurcum yalnız ufak bir hata var gibi, her zaman son satır üstünde işlem yapıyor, 2. satırı eklemiyor otomatik olarak. Bi bakıver ;)
[/quote]

Abi hata sende olmasın :) Programı aç son satıra bak. Sonra bir site engelle bakalım yeni satır mı ekliyor son satırdamı çalışıyor...

Link to comment
Share on other sites
djonur007 Newbie

djonur007

Posted
Posted (edited)

[quote name='blackman12' date='05 Aralık 2010 - 13:44 ' timestamp='1291550058' post='921755']
Onur programın hatalı evet çünkü sen sadece bir satıra göre işlem yaptırıyosun.Bunun yerine filewriteline komutunu kullanırsan -1 ile sürekli son satıra yazı yazdırabilirsin.
[/quote]

Hatayı farkettim birden fazla ekleyince sadece en son eklenilen yazıyor ama filewriteline kullanırsak kaydet butonu ölmez mi?

Edited by djonur007
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...