CommandInfoText

[Laymanball]

CommandInfoText

If a statement is incorrect. Help me.

expandcollapse popup

#NoTrayIcon
#cs=====Discription======
Create:9/25/2011
Name:CommandInfoText
Design:Laymanball
#ce======================
CommandInfoText()
Func CommandInfoText()
;==============================System Info===================================
ToolTip("Running..Please wait!", 350, 300, "Run Command System Infomation", 1)
RunWait(@ComSpec & ' /C SYSTEMINFO > SystemInfo.txt', "", 0)
ToolTip("")
ShellExecute(@ScriptDir&"\SystemInfo.txt")
If WinWait("[Class:Notepad]")Then
    WinMove("[Class:Notepad]", "", 46, 61, 922, 588)
    WinSetTitle("[Class:Notepad]", "", "System Infomation")
    FileDelete(@ScriptDir&"\SystemInfo.txt")
EndIf
;============================================================================
;############################################################################
;==============================Ping Info=====================================
If WinWaitNotActive("[Class:Notepad]") Then
If @IPAddress1 = '127.0.0.1' Then
    ToolTip("Running..Please wait!", 350, 300, "Run Command Ping Infomation [Offline]", 1)
    RunWait(@ComSpec & ' /C PING localhost > PingInfo.txt', "", 0)
    ToolTip("")
    ShellExecute(@ScriptDir&"\PingInfo.txt")
    If WinWait("[Class:Notepad]")Then
     WinMove("[Class:Notepad]", "", 213, 164, 592, 270)
        WinSetTitle("[Class:Notepad]", "", "Ping Infomation [Offline]")
        FileDelete(@ScriptDir&"\PingInfo.txt")
    EndIf
Else
    ToolTip("Running..Please wait!", 350, 300, "Run Command Ping Infomation [Online]", 1)
    RunWait(@ComSpec & ' /C PING www.google.com > PingInfo.txt', "", 0)
    ToolTip("")
    ShellExecute(@ScriptDir&"\PingInfo.txt")
    If WinWait("[Class:Notepad]")Then
     WinMove("[Class:Notepad]", "", 213, 164, 592, 270)
        WinSetTitle("[Class:Notepad]", "", "Ping Infomation [Online]")
        FileDelete(@ScriptDir&"\PingInfo.txt")
    EndIf
EndIf
EndIf
;============================================================================
EndFunc ;==> CommandInfoText

[Jos]

Do me a favor and stop posting in this forum for a while.

Only when you are ready to provide good scripts and some comprehensive description you could post here.

Jos

[Laymanball]

Do me a favor and stop posting in this forum for a while.

Only when you are ready to provide good scripts and some comprehensive description you could post here.

Jos

Sorry .. OK. I will stop.

Know why? Some programmers. Using Four website link to download the SourceCode written from the Board because the administrator .. is forced to flow freely in South SourceCode. Is the only professional programmers. The post is long. If amateur programmers are not allowed to post. These actions of the forum moderators. The programmers who are just emerging. No knowledge of its own. Further, it will no longer want to use AutoIt (I got tired of it).

รู้แล้วว่า.. ทำไม? โปรแกรมเมอร์บางคน ใช้วิธีโฟสท์ลิ๊งค์ให้ไปดาวน์โหลด SourceCode ที่เขียนจากที่อื่น ก็เพราะว่า.. ถูกผู้ดูแลเว็บบอร์ดบังคับไม่ให้โฟสท์SourceCodeแบบอิสระ ต้องเป็นโปรแกรมเมอร์มืออาชีพเท่านั้น ถึงจะโพสท์ได้นาน ถ้าโปรแกรมเมอร์มือสมัครเล่นจะถูกห้ามไม่ให้โพสท์ การกระทำเช่นนี้ของผู้ดูแลเว็บบอร์ด จะทำให้โปรแกรมเมอร์ที่เพิ่งเกิดขึ้นมาใหม่ ไม่มีทางพัฒนาความรู้ของตัวเองได้ ต่อไปก็จะไม่มีใครอยากใช้ AutoIt อีก (ผมก็เริ่มเบื่อแล้ว)

Edited September 25, 2011 by Laymanball

[happytc]

Sorry .. OK. I will stop.

Know why? Some programmers. Using Four website link to download the SourceCode written from the Board because the administrator .. is forced to flow freely in South SourceCode. Is the only professional programmers. The post is long. If amateur programmers are not allowed to post. These actions of the forum moderators. The programmers who are just emerging. No knowledge of its own. Further, it will no longer want to use AutoIt (I got tired of it).

รู้แล้วว่า.. ทำไม? โปรแกรมเมอร์บางคน ใช้วิธีโฟสท์ลิ๊งค์ให้ไปดาวน์โหลด SourceCode ที่เขียนจากที่อื่น ก็เพราะว่า.. ถูกผู้ดูแลเว็บบอร์ดบังคับไม่ให้โฟสท์SourceCodeแบบอิสระ ต้องเป็นโปรแกรมเมอร์มืออาชีพเท่านั้น ถึงจะโพสท์ได้นาน ถ้าโปรแกรมเมอร์มือสมัครเล่นจะถูกห้ามไม่ให้โพสท์ การกระทำเช่นนี้ของผู้ดูแลเว็บบอร์ด จะทำให้โปรแกรมเมอร์ที่เพิ่งเกิดขึ้นมาใหม่ ไม่มีทางพัฒนาความรู้ของตัวเองได้ ต่อไปก็จะไม่มีใครอยากใช้ AutoIt อีก (ผมก็เริ่มเบื่อแล้ว)

I looked with misgiving at the strange English. Then I tried to copy your curving characters to Google Translate. Yeah....................

But to be frank, your code had little value

Edited September 26, 2011 by happytc

[Laymanball]

From::The Basic Thai Programmer.

To::happytc

'It is the language Thai. You must use attempt Translation.'

Edited September 27, 2011 by Laymanball

[Zedna]

Your scripts are very poor to be in Examples forum.

[Laymanball]

Zedna

How do you think?. I should stay at the Forum, where?

Edited October 10, 2011 by Laymanball

[Zedna]

It was discussed in private MVP forum and one idea was given:

Don't create new topics in Example scripts for each your script

just add new post to this your already existing topic.

But I think better would be if you will not post in Examples section of this forum

untill you have got something MUCH better to post as Jos said.

Feel free to post in General help section of this forum with descriptive topic titles.

Edited October 10, 2011 by Zedna

[Laymanball]

Zedna

OK..Thanks.

I stoped post in this forum.

I moving go to other forum.

i not know wil baned?