Delphi den ADSL modem i resetleme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
husonet
Admin
Mesajlar: 2962
Kayıt: 25 Haz 2003 02:14
Konum: İstanbul
İletişim:

Delphi den ADSL modem i resetleme

Mesaj gönderen husonet »

s.a.

Delphi den ADSL modem i resetlemek istiyorum bu konu hakkında bilgisi olan varmı?

Teşekkür Ederim...

Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
Kullanıcı avatarı
lazio
Moderator
Mesajlar: 1527
Kayıt: 11 Tem 2003 04:55
Konum: İstanbul

Mesaj gönderen lazio »

a.s.
benim modem de;

Kod: Tümünü seç

if( F.rebootmode[0].checked == 1 )

		{

		if(!confirm('Will you really want to hard reboot the device?'))

			{return;}
		validate_win = window.open('Reboot_validate.asp','Hardreboot','alwaysRaised,noresizable,noscrollbars,width=380,height=260,top=0,left=0');

		}
	else if( F.rebootmode[1].checked == 1)

		{

		if(!confirm('Will you really want to soft reboot the device?'))

			{return;}
		validate_win = window.open('Reboot_validate.asp','Softreboot','alwaysRaised,noresizable,noscrollbars,width=380,height=260,top=0,left=0');
		}


	validate_win.focus();

olduğu gibi Reboot_validate.asp bazı parametrelerle çağrılıyor.

Reboot_validate.asp'de de aşağıdaki kontrol kapıldıktan sonra apply.cgi dosyası çağrılıyor..

Kod: Tümünü seç

function to_submit(F)
{

		if(F.reboot_username.value=="")
		{
			alert("Please input username!");
			F.reboot_username.focus();
			return false;
		}
		if(F.reboot_password.value=="")
		{
			alert("Please input password!");
			F.reboot_password.focus();
			return false;
		}
	
	   if(window.name=='Hardreboot')
       	    F.submit_type.value="HRebootvalidate";
       	else if(window.name=='Softreboot')
       	    F.submit_type.value="SRebootvalidate";
       	
	F.submit_button.value="Reboot_validate";

       F.action.value='Rebootvalidate';
       F.submit();
}
function init()
{
	var width=screen.availWidth/2-190;
	var height=screen.availHeight/2-130;
	window.moveTo(width,height);
	window.focus();
}
</script>
sanırım web browser gibi bir komponent le bu asp ve cgi dosyaları kullanılarak bu işlem gerçekleştirilebilir..
DeveloperToolKit

..::|YeşilMavi|::..
Kullanıcı avatarı
sadettinpolat
Moderator
Mesajlar: 2131
Kayıt: 07 Ara 2003 02:51
Konum: Ankara
İletişim:

Mesaj gönderen sadettinpolat »

modemin telnet arabiriminde ilgili komut varsa delphi ile modeme telnet bağlantısı yapılıp reset atılabilir. - teoride yemesi lazim :) -
"Sevmek, ne zaman vazgececegini bilmektir." dedi, bana.

---
http://sadettinpolat.blogspot.com/
Kullanıcı avatarı
husonet
Admin
Mesajlar: 2962
Kayıt: 25 Haz 2003 02:14
Konum: İstanbul
İletişim:

Mesaj gönderen husonet »

lazio yazdı:a.s.
benim modem de;

Kod: Tümünü seç

if( F.rebootmode[0].checked == 1 )

		{

		if(!confirm('Will you really want to hard reboot the device?'))

			{return;}
		validate_win = window.open('Reboot_validate.asp','Hardreboot','alwaysRaised,noresizable,noscrollbars,width=380,height=260,top=0,left=0');

		}
	else if( F.rebootmode[1].checked == 1)

		{

		if(!confirm('Will you really want to soft reboot the device?'))

			{return;}
		validate_win = window.open('Reboot_validate.asp','Softreboot','alwaysRaised,noresizable,noscrollbars,width=380,height=260,top=0,left=0');
		}


	validate_win.focus();

olduğu gibi Reboot_validate.asp bazı parametrelerle çağrılıyor.

Reboot_validate.asp'de de aşağıdaki kontrol kapıldıktan sonra apply.cgi dosyası çağrılıyor..

Kod: Tümünü seç

function to_submit(F)
{

		if(F.reboot_username.value=="")
		{
			alert("Please input username!");
			F.reboot_username.focus();
			return false;
		}
		if(F.reboot_password.value=="")
		{
			alert("Please input password!");
			F.reboot_password.focus();
			return false;
		}
	
	   if(window.name=='Hardreboot')
       	    F.submit_type.value="HRebootvalidate";
       	else if(window.name=='Softreboot')
       	    F.submit_type.value="SRebootvalidate";
       	
	F.submit_button.value="Reboot_validate";

       F.action.value='Rebootvalidate';
       F.submit();
}
function init()
{
	var width=screen.availWidth/2-190;
	var height=screen.availHeight/2-130;
	window.moveTo(width,height);
	window.focus();
}
</script>
sanırım web browser gibi bir komponent le bu asp ve cgi dosyaları kullanılarak bu işlem gerçekleştirilebilir..
bu şekilde bende düşünmüştüm :roll: ama browserdan ziyade javascript i direk tetiklemem lazım yada FLASH içine gömerek delphi de adapte etmeyi düşünüyorum henüz araştırma aşamasındayım :?

Teşekkür Ederim Fatih.

Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
Kullanıcı avatarı
husonet
Admin
Mesajlar: 2962
Kayıt: 25 Haz 2003 02:14
Konum: İstanbul
İletişim:

Mesaj gönderen husonet »

sadettinpolat yazdı:modemin telnet arabiriminde ilgili komut varsa delphi ile modeme telnet bağlantısı yapılıp reset atılabilir. - teoride yemesi lazim :) -
telnet le hiç uğraşmadım öneri için teşekkür ederim bunuda araştıracam...

Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
heskin35
Üye
Mesajlar: 132
Kayıt: 30 Haz 2004 09:48

Mesaj gönderen heskin35 »

Telnet olayı şu şekilde oluyor hüseyin abi.
dos ortamında iken

Kod: Tümünü seç

c:\>telnet
ile telnete giriş yapıp

Kod: Tümünü seç

o 192.168.1.1 //benim modem ip si
ile kullanıcı adı ve şifresini girip modeme bağlanıyoruz

sonrasında help yazarak zaten verilebilecek komutları görebilirsin.
Genelde bu komut reboot oluyor zoom da ve benim d-link te o şekilde.

Bunuda tek tıkla yapmak için bi batch file yada bat dosyası yapılabilir sanırım.
Cevapla