Just A Problem don't know how to name it^^

[RaiNote]

Well Hello,

I currently a bit sad because i can't find anywhere in helpfiles and google away in autoit to check if a number between another number is the same as 4 variables which is checking if the main variable got the same princip of looking >.<.( I really can't explain it at all)

Case $Send2Box
            $ReadText2Box = GuictrlRead($Text2Box)
            _GUICtrlEdit_AppendText($Console, $ReadText2Box & @CRLF)
            If $ReadText2Box = '/ping ' & $ip1 & '.' & $ip2 & '.' & $ip3 & '.' & $ip4 Then
                $IP = StringRight('/ping ', 1)
                $Ping = Ping($IP)
                _GUICtrlEdit_AppendText($Console,'Ping is: ' & $Ping & 'ms')
                GUICtrlSetData($Text2Box,'')
            EndIf

Next try to explain ^-^ i want to check if the text in the inputbox($Text2Box which is read from $ReadText2Box) the same looking like a ip but with a '/ping ' before and i don't know how to make the variables to check this.. and getting after it checked that it is truly a IP to ping it and send it to $Console to display the ms

I hope i could explained it anyway to understand it(if i write more i am getting more confused)

Thanks to everyone who try's to help me

[Jfish]

This looks like you are pinging the letter g which is what StringRight('/ping',1) will return.

$IP = StringRight('/ping ', 1)
                $Ping = Ping($IP)

I think you want to to ping:

$ip1 & '.' & $ip2 & '.' & $ip3 & '.' & $ip4

From what I can tell maybe the issue is that you are reading an IP address from the textbox that starts with "/ping".  If you want to remove that you could just trim it off from $ReadTextBox2.  StringTrimLeft is how you could chop off those characters. $IP=StringTrimLeft($ReadTextBox2,5).  That is all a guess based on what I think I read in your post.

[SadBunny]

The StringRight call as you have it there just returns the rightmost character of "/ping ", which is a space.

Change

$IP = StringRight('/ping ', 1)

to

$IP = StringTrimLeft($ReadText2Box, 6)

It will trim 6 characters from the $RestText2Box, exactly the length of string "/ping ", and return the result, which should be your IP address.

[RaiNote]

But i want also to test if $IP which is after '/ping ' looks like an IP xxx.xxx.xxx.xxx which i tried with $ip1 $ip2.. but it won't work out

 

[SadBunny]

What's in your $ip1, $ip2...? Judging from your current code it looks like you are checking whether it is a specific IP-address, defined in your $ip1 etc.. If you mean you want to check if the thing after "/ping " ($IP) is a string in the format of "<0-255>.<0-255>.<0-255>.<0-255>", you can take multiple approaches. One is to write a function to split $IP into parts using "." as a delimiter, then checking whether you get 4 results, each being a number between 0 and 255. Like so:

ConsoleWrite(_isIpAddress("abc") & @CRLF)
ConsoleWrite(_isIpAddress("12.34.56.78.90") & @CRLF)
ConsoleWrite(_isIpAddress("999.999.999.999") & @CRLF)
ConsoleWrite(_isIpAddress("127.0.0.1") & @CRLF)

Func _isIpAddress($IP)

    $splitResult = StringSplit($IP, ".")

    If $splitResult[0] <> 4 Then Return False
    For $supposedNumber In $splitResult
        If $supposedNumber < 0 Or $supposedNumber > 255 Then Return False
    Next
    Return True
EndFunc   ;==>_isIpAddress

 

[RaiNote]

Thank you very much. *-*

but still i am bit stucked xD but that's just to check which command i wrote ^^

 

Edited July 12, 2015 by RaiNote

[RaiNote]

Hello,

I got a problem with my Code. Only GUI code works out but when i use with all my Functions the Gui goes down to the endless >.<

Code:

expandcollapse popup

;*****************************************
;CraTool.au3 by RaiNote
;Erstellt mit ISN AutoIt Studio v. 0.98 BETA
;*****************************************


;Includes
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <String.au3>
#include "Forms\CraTool.isf"
#include "Functions.au3" 
#include <Inet.au3>
#include <_UskinDLL.au3>
#include <_UskinLibrary.au3>
#include <Skins\Descent.au3>
;Includes

_Uskin_LoadDLL()
_USkin_Init(_Descent(True))

;Variablen


GUISetState(@SW_SHOW, $CraTool)

While 1
    
    $nMsg = GUIGetMsg()
    Switch $nMsg
        
        Case $GUI_EVENT_CLOSE
            Exit
            
        Case $Send2Box
            
            ;Some Main needs for Commands
            $ReadText2Box = GuictrlRead($Text2Box)
            $IP = StringTrimLeft($ReadText2Box, 6)
            $IsIP = _isIpAddress($IP)
            $IP2 = StringTrimLeft($ReadText2Box, 4)
            $IsDomain = _isIpAddress($IP)
            $CheckCom4Digits = StringLeft($ReadText2Box,5)
            $CheckCom2Digits = StringLeft($ReadText2Box,3)
            _GUICtrlEdit_AppendText($Console, $ReadText2Box & @CRLF)
            ;
            
            If $CheckCom4Digits = '/ping' Then
                
                If $IsIP = 1 Then
                $Ping = Ping($IP)
                _GUICtrlEdit_AppendText($Console,'Ping is: ' & $Ping & 'ms' & @CRLF)
                
                ElseIf $IsIP = 0 Then
                    $PingDom = Ping($IP)
                    
                    If $PingDom > 0 Then
                    _GUICtrlEdit_AppendText($Console,'Ping is: ' & $PingDom & 'ms' & @CRLF)
                    
                    Else
                    _GUICtrlEdit_AppendText($Console,$IP & " isn't a valid IP" & @CRLF)
                    EndIf
                    
                EndIf
                
            EndIf
            
            If $CheckCom2Digits = '/ip' Then
                
                If $IsDomain = 0 Then
                    $IpGet = TCPNameToIP($IP2)
                _GUICtrlEdit_AppendText($Console,'IP is: ' & $IpGet & @CRLF)
                    
                ElseIf $IsDomain = 1 Then
                    $DomainGet = _TCPIpToName($IP2)
                    _GUICtrlEdit_AppendText($Console,$IP2 & ' is already an IP' &  @CRLF)
                    _GUICtrlEdit_AppendText($Console,$DomainGet & @CRLF & '->Domain of ' & $IP2 & @CRLF)
                EndIf
                
            EndIf
            GUICtrlSetData($Text2Box,'')
        Case $LoupCom
            _GUICtrlEdit_AppendText($Console, 'IIIIIIIIIIIIIIIIIIIIIIIIIIIIII' & @CRLF & 'vvvvvvvvvvvvvvvvvvvvvvvvvvvvvv' & @CRLF & 'Command: Ping' & @CRLF & 'Usage-> /ping Ip or Domain' & @CRLF & 'Info-> It shows the time it takes to connect from your Computer to another.' & @CRLF)
            
    EndSwitch

WEnd

GUI:

#include-once

; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <EditConstants.au3>
#Include <GuiMenu.au3>

$CraTool = GUICreate("CraTool",618,386,-1,-1,-1,-1)
$MenuItem681 = GUICtrlCreateMenu("Plugins")
$PluginsEnableMenu = GUICtrlCreateMenuItem("Enable",$MenuItem681,-1,1)
$PluginsDisableMenu = GUICtrlCreateMenuItem("Disable",$MenuItem681,-1,1)
$Send2Box = GUICtrlCreateButton("Send",413,323,60,19,-1,-1)
$Console = GUICtrlCreateEdit("",413,0,198,303,2244,-1)
GUICtrlSetFont(-1,8,400,0,"Lucida Console")
GUICtrlSetColor(-1,"0x0000A0")
GUICtrlSetBkColor(-1,"0x00FF80")
$Text2Box = GUICtrlCreateInput("Text to Box",413,303,194,20,192,512)
$LoupCom = GUICtrlCreateButton("Lookup Commands",473,323,100,19,-1,-1)
GUISetState(@SW_SHOW,$CraTool)

Functions:

;Functions.au3

Func _isIpAddress($IP)

    $splitResult = StringSplit($IP, ".")

    If $splitResult[0] <> 4 Then Return False
    For $supposedNumber In $splitResult
        If $supposedNumber < 0 Or $supposedNumber > 255 Then Return False
    Next
    Return True
EndFunc   ;==>_isIpAddress

That's all i can provide as code but i really don't get where the problem is. Maybe it's my Laptop because before on my computer it worked fine everything. ^^

I hope someone could help me :3

Thanks to everyone ^-^

Edit: Wups wrong section just saw it right now sorry If someone could move would be nice^^

Edited July 12, 2015 by RaiNote
Wrong Section

[RaiNote]

The Problem could be the Skin but why? °^°

 

[Jfish]

Are you trying to look at a string and see if it is formatted as an IP address?  xxx.xxx.xxx.xxx?  If so, have a look at StringRegExp to test for a pattern.  If that is not what you are after maybe you could post in your native language as something may be getting lost in translation (or use Google translate to explain).

[RaiNote]

Just to test if it looks like xxx.xxx.xxx.xxx but currently everything works without Uskin ^^ it destroys anyway my GUI Y-axis it ends somewhere in the nowhere^^

 

[JohnOne]

Explain "somewhere in the nowhere^^"

[RaiNote]

if the endborder goes beyound your taskbar where you can't see it also if u try to pull it to the top

 

[Jfish]

Are you testing a string or trying to display something on a GUI or both?  Maybe post some more code to show what you are doing...

[RaiNote]

complete Code and i know wrong section but i saw it to late e.e

[Jfish]

complete Code and i know wrong section but i saw it to late e.e

????  Not really sure what that means.  Is this the same issue you posted here with code?: https://www.autoitscript.com/forum/topic/173874-gui-problem/

 

[RaiNote]

exactly the same

 

[RaiNote]

and it looks it's due the skin but i don't get why >.< on my other Programs it work and a hour before it worked also

[Jos]

@RaiNote, Threads are merged and hope you will stick to one single thread for the same question from here on.

Believe this is "strike two" today.

Jos

[Jfish]

@RaiNote:  you are posting snippets of your code - that would very hard (at least for me - maybe others have a better opinion) to test and figure out the problem.  If you don't want to post the entire code can you create a simple "reproducer" script that shows the exact issue with working code?

[RaiNote]

I know right now the Problem so i would like if someone could Lock/close this and the other thread^^

And Thanks to everyone.