Программа для настройки ADSL D-link 2500U

[tarakan1983]

Через sendCh вроде получается, только все равно idtelnet как то криво работает, начал освоение Pure basic.

[sinner123]

tarakan1983 огромная просьба ты не мог бы скинуть исходники проги которые тебе дал programmer(ты у него спрашивал) он написал такую же прогу

[*PB*]

Вот исходник проги http://www.filehoster.ru/files/el5052
Для компиляции нужен PureBasic 4.30 или PureBasic 4.40

Вот здесь есть ещё по этой теме.
http://purebasic.mybb.ru/viewtopic.php?id=12
http://purebasic.mybb.ru/viewtopic.php?id=6

[sinner123]

я пишу прогу на с++ с QT может есть какая нить инфа по написанию такой проги используя данный инструмент
заранее благодарен

[*PB*]

я пишу прогу на с++ с QT может есть какая нить инфа по написанию такой проги используя данный инструмент
заранее благодарен

Ну как вариант, можно использовать DLLку из вложения. Она в месте с исходником и примером использования.
Она будет работать в любой винде, начиная с Win98 (подозреваю что в "чистой" Win95 тоже будет работать) и не требует ни runtime, ни .NET, ни QT, только API.

В библиотеке всего 4 функции

DSL_Init()
DSL_SendModemData(Connect, Command.s, TimeOut)
DSL_Open(IP_Address.s, Login.s, Password.s)
DSL_Close(Connect)

Вначале нужно вызвать DSL_Init для инициализации библиотеки.
Замем, установить связь с модемом, посредством функции DSL_Open.
После этого, можно работать с модемом, отправляя ему команды и получая ответ, с помощью функции DSL_SendModemData.
Фунция DSL_Close разрывает связь с модемом.
Более подробное описание функий и их аргументов, в архиве.

Вот пример, работы с даной библиотекой DSL_ModemControl.dll.
Этот пример, перезагружает модем типа D-Link DSL-2500U/BRU/D

If OpenLibrary(1,"DSL_ModemControl.dll")=0
  MessageRequester("", "Нет DSL_ModemControl.dll", #MB_OK|#MB_ICONERROR)
  End
EndIf

CallFunction(1,"DSL_Init")
Connect=CallFunction(1,"DSL_Open","192.168.1.1","admin","admin")
If Connect>0
  Delay(400)
  CallFunction(1,"DSL_SendModemData", Connect, "reboot",400)
  Delay(800)
  MessageRequester("", "Модем перезагружается")
  CallFunction(1,"DSL_Close", Connect)
Else
  Select Connect
    Case 0
      MessageRequester("", "Нет связи с модемом", #MB_OK|#MB_ICONERROR)
    Case -1
      MessageRequester("", "Нет ответа от модема", #MB_OK|#MB_ICONERROR)
    Case -2
      MessageRequester("", "Неправильный логин или пароль", #MB_OK|#MB_ICONERROR)
  EndSelect
EndIf