Programlama | Programlama Dilleri | C Programlama Dili |C++

Hata
  • XML Parsing Error at 1:82. Error 9: Invalid character
´╗┐

DNS De?i?tirme

AăIKLAMA

Bu program C++ Builder 6 projesidir.

Bu program ile birlikte dns adreslerinizi 208.67.220.220 , 208.67.222.222 adreslerinize y÷nlendirebilirsiniz. Yap?lacak modifikasyonlarla birlikte dns adresleri de?i?tirelebilir. Program arka planda šal??abilecek ?ekilde ayarlanabilir. Dns de?i?ikli?inin an?nda etkili olabilmesi išin bilgisayara reset atma kodu da projeye eklenebilir.

Program?n Tamam?n? A?a??daki Linkten ?ndirebilirsiniz

Linki G÷rebilmeniz ?šin ▄ye Olman?z Gerekmektedir...

▄ye Kay?t

Program Kodu:

  1. //---------------------------------------------------------------------------
  2.  
  3. #include <vcl.h>
  4. #pragma hdrstop
  5.  
  6. #include "Unit1.h"
  7. #include "Registry.hpp"
  8.  
  9. String tut="SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters\\Interfaces";
  10. //---------------------------------------------------------------------------
  11. #pragma package(smart_init)
  12. #pragma resource "*.dfm"
  13. TForm1 *Form1;
  14.  
  15. //---------------------------------------------------------------------------
  16. __fastcall TForm1::TForm1(TComponent* Owner)
  17. ááááááá : TForm(Owner)
  18. {
  19. }
  20. //---------------------------------------------------------------------------
  21.  
  22.  
  23. void __fastcall TForm1::Button1Click(TObject *Sender)
  24. {
  25.  
  26. TRegistry *Reg=new TRegistry;
  27. Reg->RootKey=HKEY_LOCAL_MACHINE;
  28. if(Reg->OpenKey(tut,false))
  29. {
  30. Reg->GetKeyNames(ListBox1->Items);
  31. Reg->CloseKey();
  32. }
  33. for(int i=0;i<ListBox1->Items->Count;i++)
  34. {
  35. String put=tut;
  36. put=put+"\\"+ListBox1->Items->Strings[i];
  37. TRegistry *Feg=new TRegistry;
  38. Feg->RootKey=HKEY_LOCAL_MACHINE;
  39. if(Feg->OpenKey(put,false))
  40. {
  41. ListBox2->Items->Clear();
  42. Feg->GetValueNames(ListBox2->Items);
  43.  
  44. int saydir=0;
  45. String defaultgateway="DhcpDefaultGateway";
  46. String dhcpipadres="DhcpIPAddress";
  47. String dhcpnameserver="DhcpNameServer";
  48. for(int p=0;p<ListBox2->Items->Count;p++)
  49. {
  50. áif(defaultgateway==ListBox2->Items->Strings[p])
  51. ásaydir++;
  52. áif(dhcpipadres==ListBox2->Items->Strings[p])
  53. ásaydir++;
  54. áif(dhcpnameserver==ListBox2->Items->Strings[p])
  55. ásaydir++;
  56. }
  57.  
  58. if(saydir==3)
  59. {
  60. TRegistry *Heg=new TRegistry;
  61. Heg->RootKey=HKEY_LOCAL_MACHINE;
  62. if(Heg->OpenKey(put,false))
  63. {
  64.  
  65. á Heg->DeleteValue("NameServer");
  66. á Heg->WriteString("NameServer","208.67.222.222,208.67.220.220");
  67. á Heg->CloseKey();
  68. á}
  69. }
  70.  
  71. }//if sonu
  72. }// for sonu
  73.  
  74. }
  75. //---------------------------------------------------------------------------
  76.  

Yorumlar (3)
  • Kamuran
    GŘzel Payla??m Te?ekkŘr ederim
  • Josue
    gŘzel bi payla??m... ben bilgisayara reset atmak yerine internet taray?c?lar?n? kapat?p tekrar ašmay? ÷nersem daha uygun olmaz m? ? zaman kayb? ÷nlenir. :whistle:
  • NEO
    avatar
    Elbette oda bir š÷zŘm yoludur...
Sadece kay─▒tl─▒ kullan─▒c─▒lar yorum yazabilir!
Son G├╝ncelleme ( Sal─▒, 04 Eyl├╝l 2012 03:22 )  
am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m