work with cmd

[kolosov]

Excuse if I write not there and with mistakes I don't know the English I write through the translator.

Prompt where it is possible to download cmd library

from doesn't work #include with <cmd.au3>. Thanks in advance</cmd.au3>

[nitekram]

maybe @ComSpec is what you are looking for?

[kolosov]

maybe @ComSpec is what you are looking for?

I don't know to me it is necessary, that robotala with крипт with this team and me on the first line a mistake in #include <cmd.au3>

script-

#include <CMD.au3>

#include <Inet.au3>

#include <GUIConstantsEx.au3>

#include <GuiIPAddress.au3>

#NoTrayIcon

$getip = _GetIP()

If $getip = 1 Then

MsgBox(0, "Ошибка", "Проверьте подключение к Интернету или выключите брандмауэр. Программа не имеет доступа к Интернету.")

EndIf

$Form1 = GUICreate("IP-Changer", 437, 125, -1, -1)

$Group1 = GUICtrlCreateGroup("", 8, 8, 417, 105)

$IPAddress1 = _GUICtrlIpAddress_Create($Form1, 16, 48, 130, 21)

_GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")

$Label1 = GUICtrlCreateLabel("ТекущийIP:", 16, 24, 58, 17)

$Button1 = GUICtrlCreateButton("Возобновить", 16, 72, 131, 25, 0)

$Button2 = GUICtrlCreateButton("Получить новое IP", 168, 24, 243, 33, 0)

$Button3 = GUICtrlCreateButton("Текущий IP в буфере обмена", 168, 64, 243, 33, 0)

GUICtrlCreateGroup("", -99, -99, 1, 1)

_GUICtrlIpAddress_Set($IPAddress1, $getip)

GUISetState(@SW_SHOW)

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

$ip = _ip()

MsgBox(0, "Успешно", "IP-адрес успешно обновлен")

Case $Button2

$pw = InputBox("Пароль", "Пожалуйста, введите свой пароль на маршрутизаторе", "0000", "*")

_CMDStart(0)

_CMDWrite('curl http://192.168.2.1/cgi-bin/login.cgi -d "pws=' & $pw & '"')

_CMDWrite('curl http://192.168.2.1/cgi-bin/disconnect.exe')

_CMDWrite('curl http://192.168.2.1/cgi-bin/connect.exe')

_CMDEnd()

GUICtrlSetState($Button1, @SW_DISABLE)

GUICtrlSetData($Button1, "6")

Sleep(1000)

GUICtrlSetData($Button1, "5")

Sleep(1000)

GUICtrlSetData($Button1, "4")

Sleep(1000)

GUICtrlSetData($Button1, "3")

Sleep(1000)

GUICtrlSetData($Button1, "2")

Sleep(1000)

GUICtrlSetData($Button1, "1")

Sleep(1000)

GUICtrlSetState($Button1, @SW_ENABLE)

GUICtrlSetData($Button1, "Возобновить")

Case $Button3

$ip = _GetIP()

If $ip = 1 Then

MsgBox(0, "Ошибка", "Проверьте подключение к Интернету или выключите брандмауэр. Программа не имеет доступа к Интернету.")

EndIf

ClipPut($ip)

EndSwitch

WEnd

Func _ip()

$aktuelleip = _GetIP()

_GUICtrlIpAddress_Set($IPAddress1, $aktuelleip)

EndFunc

Edited January 3, 2013 by kolosov

[nitekram]

http://autoit.de/index.php?page=Thread&threadID=9272

edit added second link, though not able to read it at work

Edited January 3, 2013 by nitekram

[kolosov]

I thank

Edited January 3, 2013 by kolosov

[kolosov]

I downloaded cmd script that with it to do 7 I include it doesn't react to be exact.

>"C:Program FilesAutoIt3 (3)SciTE..autoit3.exe" /ErrorStdOut "C:Users1Downloadscmd (1).au3"

>Exit code: 0 Time: 1.545

Edited January 3, 2013 by kolosov

[nitekram]

you need to changed the name of your download to be exact - cmd.au3 not cmd(1).au3 or you can change the include statement to the new file name

edit spelling

Edited January 3, 2013 by nitekram

[kolosov]

>"C:Program FilesAutoIt3 (3)SciTE..autoit3.exe" /ErrorStdOut "C:Users1Downloadscmd.au3"

>Exit code: 0 Time: 1.104

[BrewManNH]

The file cmd.au3 is not a script, it's an include file (a UDF file), you can't just run it and expect it to work.

You might want to learn how the language works, before trying to write a script.

[kolosov]

didn't understand. explain

.

Edited January 3, 2013 by kolosov

[nitekram]

the cmd.au3 is not a script. it is a UDF. therefore it will not run by itself. he is saying that you need to learn some basics before attempting to write a script - lots of information in help file and on forum

[kolosov]

it is clear to me. how to make that the cmd function in a script worked.

#include <CMD.au3>

[nitekram]

See if this helps you out.

http://www.autoitscript.com/autoit3/docs/keywords/include.htm