set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd"
WScript.Sleep 100
WshShell.AppActivate "C:\Windows\system32\cmd.exe"
WScript.Sleep 100
WshShell.SendKeys "telnet 192.168.1.254{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "admin{ENTER}" 'login
WScript.Sleep 100
WshShell.SendKeys "xxx{ENTER}" 'haslo
WScript.Sleep 100
WshShell.SendKeys "adsl connection --up{ENTER}" '
WScript.Sleep 200
WshShell.SendKeys "logout{ENTER}" '
WScript.Sleep 200
WshShell.SendKeys "{ENTER}" '
WScript.Sleep 200
WshShell.SendKeys "exit{ENTER}" '

Prosze zmienic ip router (tutaj jest domyślne), login i hasło na właściwe. Skrypt zadziała tylko w przypadku gdy na routerze włączymy dostęp za pomocą usługi telnet.

Poniżej gotowy plik do sciagniecia

Resetuj router

adsl configure --snr x --phyReXmt on

gdzie x jest procentowym określeniem granicznego parametru SNR (100 to wartość oryginalna, 50 o połowę mniejsza itd..) . Parametr –phyReXmt on powoduje włączenie technologii PhyR co dodatkowo powinno wpłynąć na stabilność łącza.

PS. DMT Tool jednak może współpracować z routerem Asmax 1004G, należy na routerze ustawić puste hasło Nie oferuje jednak pełnej funkcjonalności

PPS.  Oczywiście najpierw należy w urządzeniu włączyć dostęp po telnecie.

Management->Access Control->Services-> zaznaczamy Telnet w kolumnie LAN

Na szczęście Asmax 1004G wprowadza normalność w tym temacie i interesujące wartości moge sobie po prostu pobrać za pomocą SNMP i wyświetlić za pomocą MRTG. Poniżej wycinek z konfiga mrtg.

Title[adslsnr]: SNR i ATTN download
YLegend[adslsnr]: db
MaxBytes[adslsnr]: 5000
Options[adslsnr]: growright, gauge
Target[adslsnr]:1.3.6.1.2.1.10.94.1.1.3.1.4.2&1.3.6.1.2.1.10.94.1.1.3.1.5.2:public@192.168.2.1
PageTop[adslsnr]: <h1>SNR i ATTN download</h1>

Wartości zwracane są w liczbach całkowitych zatem zainteresowani powinni dodać parametr Factor.

Dla uploadu konfig wygląda tak:

Title[adslsnrup]: SNR i ATTN upload
YLegend[adslsnrup]: db
MaxBytes[adslsnrup]: 5000
Options[adslsnrup]: growright, gauge
Target[adslsnrup]:1.3.6.1.2.1.10.94.1.1.2.1.4.2&1.3.6.1.2.1.10.94.1.1.2.1.5.2:public@192.168.2.1
PageTop[adslsnrup]:
<h1>SNR i ATTN upload</h1>

Zrealizowalem to skryptem nastepujacej treści:

#!/usr/bin/perl -w

use strict;
use warnings;
use LWP;
use HTTP::Request::Common;

our $ua = LWP::UserAgent->new;

$ua->request(POST 'http://haslo:login@192.168.2.1/apply.cgi',
[submit_button => 'Status_Router', submit_type => 'disconnect',
change_action => 'gozila_cgi', wan_proto => 'pppoe']);

sleep 5;

$ua->request(POST 'http://haslo:login@192.168.2.1/apply.cgi',
[submit_button => 'Status_Router', submit_type => 'connect',
change_action => 'gozila_cgi', wan_proto => 'pppoe']);

Aktualnie korzystam z routera Asmax 1004g (mówi się że darowanemu koniowi nie zagląda się w zęby ale ten router to całkiem dobry sprzęt - dzięki Netio :)) i na szczęście umożliwia on zarządzanie poprzez telnet lub ssh.

Wykorzystując to pierwsze cały wyżej cytowany skrypt zmiescił się w jednej linijce

#!/bin/bash
(sleep 2; echo login; sleep 2; echo haslo; sleep 2; echo "adsl connection --up"; sleep 50) | telnet 192.168.2.1

W ten sam sposób można resetować wiekszość (wszystkie?) routery oparte o chipsety Broadcom i udostepniające zarządzanie poprzez telnet.

Wystarczy zamknąć Visual Studio i wejść do:

C:\Documents and Settings\<uzytkownik> \Ustawienia lokalne\Dane Aplikacji\Microsoft\

zmienić nazwę katalogu CoreCon i ponownie uruchomićVS.

private static Color GetContrastColor(Color c)
{
	return (c.GetBrightness() > 0.4) ? Color.Black : Color.White;
}

Całość zagadnienia sprowadza się do wywołania funkcji DestroyWindow z biblioteki coredll.dll .

Kod wygląda następująco (podobnie jak poprzednio tworze własną kontrolkę dziedzicząc po WebBrowser - wydaje mi sie to najprostszym rozwiązaniem)

using System;
using System.Runtime.InteropServices;
using System.Windows.Forms;

namespace Dudzik.Helpers
{
    public class WebBrowserExt : System.Windows.Forms.WebBrowser
    {
        private IntPtr child, pieHtml;

        [DllImport("coredll")]
        extern static IntPtr GetCapture();

        [DllImport("coredll.dll", EntryPoint = "GetWindow")]
        private static extern IntPtr GetWindow(IntPtr handleWindow, int cmd);

        [DllImport("coredll.dll")]
        private static extern bool DestroyWindow(IntPtr hwnd);  

        protected override void OnHandleCreated(EventArgs e)
        {
            IntPtr webHandle = GetHWND(this);
            child = GetWindow(webHandle, 5);
            pieHtml = GetWindow(child, 5); //MSPIE Status

            DestroyWindow(pieHtml);

            base.OnHandleCreated(e);
        }

        private IntPtr GetHWND(Control ctl)
        {
            ctl.Capture = true;
            IntPtr hWnd = GetCapture();
            ctl.Capture = false;
            return hWnd;
        }
    }
}

Oczywiście nic nie stoi na przeszkodzie by połączyć to z ukrywaniem ContextMenu. Uzyskany kod powinien  wyglądać następująco

using System;
using System.Runtime.InteropServices;
using System.Windows.Forms;

namespace Dudzik.Helpers
{
    public class WebBrowserExt : System.Windows.Forms.WebBrowser
    {
        private IntPtr child, pieHtml;
        private static WndProcDelegate newWndProc;
        private static IntPtr oldWndProc = IntPtr.Zero, oldSipProc = IntPtr.Zero;

        internal const int GWL_WNDPROC = -4;
        internal const int WM_LBUTTONUP = 0x0202;

        [DllImport("coredll")]
        extern static IntPtr GetCapture();

        [DllImport("coredll.dll", EntryPoint = "GetWindow")]
        private static extern IntPtr GetWindow(IntPtr handleWindow, int cmd);

        [DllImport("coredll.dll", EntryPoint = "GetWindowLong")]
        private static extern IntPtr GetWindowLong(IntPtr hWnd, int nIndex);

        [DllImport("coredll.dll")]
        private static extern int SetWindowLong(IntPtr hWnd, int nIndex, IntPtr newWndProc);

        [DllImport("coredll.dll")]
        private static extern int PostMessage(IntPtr hWnd, uint Msg, int wParam, int lParam);

        [DllImport("coredll.dll")]
        private static extern IntPtr CallWindowProc(IntPtr lpPrevWndFunc, IntPtr hWnd, uint Msg, IntPtr wParam, IntPtr lParam);

        [DllImport("coredll.dll")]
        private static extern bool DestroyWindow(IntPtr hwnd);  

        delegate IntPtr WndProcDelegate(IntPtr hWnd, uint msg, IntPtr wParam, IntPtr lParam);

        protected override void OnHandleCreated(EventArgs e)
        {
            IntPtr webHandle = GetHWND(this);
            child = GetWindow(webHandle, 5);
            pieHtml = GetWindow(child, 5); //MSPIE Status
            child = GetWindow(pieHtml, 2); //PIEHTML

            newWndProc = new WndProcDelegate(WndProc);
            oldWndProc = GetWindowLong(child, GWL_WNDPROC);
            int success = SetWindowLong(child, GWL_WNDPROC, Marshal.GetFunctionPointerForDelegate(newWndProc));

            DestroyWindow(pieHtml);

            base.OnHandleCreated(e);
        }

        private IntPtr WndProc(IntPtr hWnd, uint msg, IntPtr wParam, IntPtr lParam)
        {
            if (msg == 0x0020)
            {
                PostMessage(this.Handle, WM_LBUTTONUP, 0, 0);
                return IntPtr.Zero;
            }

            return CallWindowProc(oldWndProc, child, msg, wParam, lParam);
        }

        private IntPtr GetHWND(Control ctl)
        {
            ctl.Capture = true;
            IntPtr hWnd = GetCapture();
            ctl.Capture = false;
            return hWnd;
        }
    }
}

Polecam.