carl1905

[Solved] Extracting text from string and reinsert it.

12 posts in this topic

#1 ·  Posted (edited)

Hi, I'm looking for a way to extract specific binary text data from string(except between "[", "]") and convert it.

And put it back to text. How can I do it? Can someone help me?

Example

$text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82"

Rearrange the text like below

[1F010005300020FF]
0x82CD0A            =>  StringToBinary(0x82CD0A) == A
[030005300020FF]
0x8177          =>  StringToBinary(0x8177) == B
[1F12010000E6300020FF]
0x8178          =>  StringToBinary(0x8178) == C
[1F030000300020FF]
0x82F00A8A6F82A682DC82  =>  StringToBinary(0x82F00A8A6F82A682DC82) == D

$output = "[1F010005300020FF]A[030005300020FF]B[1F12010000E6300020FF]C[1F030000300020FF]D"

 

Edited by carl1905

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

Hi, im maybe wrong but try that :

 

$text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82"

#include <Array.au3>

Func _ArrayAddColumns(ByRef $aArr, $iNumColToAdd = 1)
    If IsArray($aArr) = 0 Then Return SetError(1, 0, -1) ; Filter out non-array
    If $iNumColToAdd < 1 Then Return SetError(2, 0, -1) ; $iNumColToAdd must be greater than zero to add a column.
    If UBound($aArr, 0) > 2 Then Return SetError(3, 0, -1) ; Only allows a 1d or 2d array pass this line.

    If UBound($aArr, 0) = 1 Then ; ====== For 1d array ========
        Local $aRet[UBound($aArr)][$iNumColToAdd + 1] ; Create new 2d array.
        For $r = 0 To UBound($aArr) - 1
            $aRet[$r][0] = $aArr[$r]
        Next
    Else ; ======= For 2d array ============
        Local $aRet = $aArr ; So that ByRef $aArr is not altered outside of function.
        ReDim $aRet[UBound($aRet)][UBound($aRet, 2) + $iNumColToAdd] ; ReDim 2d array only.
    EndIf

    Return $aRet
EndFunc   ;==>_ArrayAddColumns

$split = StringSplit($text,"[]")
_ArrayDisplay($split, "v1")

$split = _ArrayAddColumns($split)
For $i = 1 To Ubound($split) - 1
    $split[$i][1] = BinaryToString("0x" & $split[$i][0])
    $i=$i+1
Next
_ArrayDisplay($split, "v2")

$fill = ""
For $i = 2 to Ubound($split) - 1
    $fill = $fill & "[" & $split[$i][0] & "]" & $split[$i+1][1]
    $i=$i+1
Next
msgbox(0,"Output",$fill)

 

Edit :

$split[$i][1] = BinaryToString("0x" & $split[$i][0], 2);<======= $SB_UTF16LE (2) = binary data is UTF16 Little Endian
$split[$i][1] = BinaryToString("0x" & $split[$i][0], 3);<======= $SB_UTF16BE (3) = binary data is UTF16 Big Endian

 

Edited by Synapsee
1 person likes this

Share this post


Link to post
Share on other sites

Check out StringRegExpReplace()

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

$text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82"

$text = StringReplace($text, "]82CD0A[", "]A[")             ;A
$text = StringReplace($text, "]8177[", "]B[")               ;B
$text = StringReplace($text, "]8178[", "]C[")               ;C
$text = StringReplace($text, "]82F00A8A6F82A682DC82", "]D") ;D

ConsoleWrite($text & @CRLF)

 

Edited by AndyG

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

5 hours ago, Synapsee said:

Hi, im maybe wrong but try that :

Thanks for your reply. However, the last one word is missing. And can the output text be arranged in row? Not column.

#include <Array.au3>
#include <MsgBoxConstants.au3>
#include <FileConstants.au3>
Global Const $CP_SHIFT_JIS = 932

$text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82"

Func _CodepageStructToString($tText, $iCodepage)
    Local $aResult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                                "ptr", 0, "int", 0)
    Local $tWstr = DllStructCreate("wchar[" & $aResult[0] & "]")
    $aResult = DllCall("Kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                        "struct*", $tWstr, "int", $aResult[0])
    Return DllStructGetData($tWstr, 1)
EndFunc

Func _ArrayAddColumns(ByRef $aArr, $iNumColToAdd = 1)
    If IsArray($aArr) = 0 Then Return SetError(1, 0, -1) ; Filter out non-array
    If $iNumColToAdd < 1 Then Return SetError(2, 0, -1) ; $iNumColToAdd must be greater than zero to add a column.
    If UBound($aArr, 0) > 2 Then Return SetError(3, 0, -1) ; Only allows a 1d or 2d array pass this line.

    If UBound($aArr, 0) = 1 Then ; ====== For 1d array ========
        Local $aRet[UBound($aArr)][$iNumColToAdd + 1] ; Create new 2d array.
        For $r = 0 To UBound($aArr) - 1
            $aRet[$r][0] = $aArr[$r]
        Next
    Else ; ======= For 2d array ============
        Local $aRet = $aArr ; So that ByRef $aArr is not altered outside of function.
        ReDim $aRet[UBound($aRet)][UBound($aRet, 2) + $iNumColToAdd] ; ReDim 2d array only.
    EndIf

    Return $aRet
EndFunc   ;==>_ArrayAddColumns

$split = StringSplit($text,"[]")
$Str = ""
$fill = ""
$split = _ArrayAddColumns($split)

For $i = 1 To Ubound($split) - 1
    $split[$i][1] = Binary("0x" & $split[$i][0])
    ;msgbox(0,"Output",$split[$i][1])
    Local $tInp = DllStructCreate("byte[" & BinaryLen($split[$i][1]) & "]")
    DllStructSetData($tInp, 1, $split[$i][1])
    Local $Str  = _CodepageStructToString($tInp, $CP_SHIFT_JIS)
          $Str  = StringRegExpReplace($Str ,@CRLF,"<cf>")
          $Str  = StringRegExpReplace($Str ,@LF,"<lf>")
          $Str  = StringRegExpReplace($Str ,@CR,"<cr>")
          $split[$i][1] = $Str  & @CRLF
          $i=$i+1
Next

$fill = ""
For $i = 2 to Ubound($split) - 1
    $fill = $fill & "[" & $split[$i][0] & "]" & $split[$i+1][1]
    $i=$i+1
Next
msgbox(0,"Output",$fill)
FileWrite ("test.txt", $fill)
FileClose ("test.txt")
TrayTip ("Exporter", "Finish!", 3)
sleep (3000)

 

Edited by carl1905

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

what is the "test.txt" expected ? u want that :

Quote

[1F010005300020FF][030005300020FF][1F12010000E6300020FF][1F030000300020FF]

は<lf>『』を<lf>覚えま・

Or something else ?

Edited by Synapsee

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

1 hour ago, Synapsee said:

what is the "test.txt" expected ? u want that :

Or something else ?

The one that I want is this form.

[1F010005300020FF]<lf>[030005300020FF][1F12010000E6300020FF][1F030000300020FF]<lf>覚えま・

 

Edited by carl1905

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

Ah, I missed some last three byte. 0xB582BD

text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82B582BD"

So, this is the corrected form.

[1F010005300020FF]<lf>[030005300020FF][1F12010000E6300020FF][1F030000300020FF]<lf>覚えました

 

Edited by carl1905

Share this post


Link to post
Share on other sites

Not sure, but try that one :

Local $text = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82"
$out = Execute('"' & StringRegExpReplace($text, "\]\K([^\]]+)(?=\[|$)",  """ & BinaryToString(""0x\1"") & """) & '"')
MsgBox(0, "", $out)

 

Share this post


Link to post
Share on other sites

#10 ·  Posted (edited)

Another examples..

$text2 = "[09020000390011300020FF]82BB82A482CB81428DC58CE382CC90B897EC82C60A8C5F96F182B782E9914F82C90C[1F090200003A0011300020FF]90D882E897A382B582BD82A082C682CC90A28A4582C982C282A282C40A92B282D782C482A882A282BD95FB82AA82A282A282ED82CB"

$result2 = "[09020000390011300020FF]そうね。最後の精霊と<lf>契約する前に�[1F090200003A0011300020FF]切り離したあとの世界について<lf>調べておいた方がいいわね"

$text3 = "814581458145[090200003B0011300020FF]82B182EA82CD8145814581450A88C8914F82E682E88C8382B582AD82C882C182C482A282C882A282A98148"
$result3 = "[090200003B0011300020FF]これは・・・<lf>以前より激しくなっていないか?"

However, $test3 starts with "814581458145" but at the $result3 it disappears.

Maybe this is the corrected form.

#result3_fix = "・・・[090200003B0011300020FF]これは・・・<lf>以前より激しくなっていないか?"

 

Edited by carl1905

Share this post


Link to post
Share on other sites
#include <Array.au3>
#include <MsgBoxConstants.au3>
#include <FileConstants.au3>

Global Const $CP_SHIFT_JIS = 932

Func _CodepageStructToString($tText, $iCodepage)
    Local $aResult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                                "ptr", 0, "int", 0)
    Local $tWstr = DllStructCreate("wchar[" & $aResult[0] & "]")
    $aResult = DllCall("Kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                        "struct*", $tWstr, "int", $aResult[0])
    Return DllStructGetData($tWstr, 1)
EndFunc

Func _ArrayAddColumns(ByRef $aArr, $iNumColToAdd = 1)
    If IsArray($aArr) = 0 Then Return SetError(1, 0, -1) ; Filter out non-array
    If $iNumColToAdd < 1 Then Return SetError(2, 0, -1) ; $iNumColToAdd must be greater than zero to add a column.
    If UBound($aArr, 0) > 2 Then Return SetError(3, 0, -1) ; Only allows a 1d or 2d array pass this line.

    If UBound($aArr, 0) = 1 Then ; ====== For 1d array ========
        Local $aRet[UBound($aArr)][$iNumColToAdd + 1] ; Create new 2d array.
        For $r = 0 To UBound($aArr) - 1
            $aRet[$r][0] = $aArr[$r]
        Next
    Else ; ======= For 2d array ============
        Local $aRet = $aArr ; So that ByRef $aArr is not altered outside of function.
        ReDim $aRet[UBound($aRet)][UBound($aRet, 2) + $iNumColToAdd] ; ReDim 2d array only.
    EndIf

    Return $aRet
EndFunc   ;==>_ArrayAddColumns

$text1 = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82B582BD"
$text2 = "[09020000390011300020FF]82BB82A482CB81428DC58CE382CC90B897EC82C60A8C5F96F182B782E9914F82C90C[1F090200003A0011300020FF]90D882E897A382B582BD82A082C682CC90A28A4582C982C282A282C40A92B282D782C482A882A282BD95FB82AA82A282A282ED82CB"
$text3 = "814581458145[090200003B0011300020FF]82B182EA82CD8145814581450A88C8914F82E682E88C8382B582AD82C882C182C482A282C882A282A98148"

;v1 without @CRLF
$file = "test without crlf.txt"
$text = $text1 & $text2 & $text3
MainFunc($text, $file)

;v2 with @CRLF
$file = "test with crlf.txt"
MainFunc($text1, $file)
FileWrite ($file, @CRLF)
FileClose ($file)
MainFunc($text2 , $file)
FileWrite ($file, @CRLF)
FileClose ($file)
MainFunc($text3, $file)
FileWrite ($file, @CRLF)
FileClose ($file)

Func MainFunc($text, $file)

    $split = StringSplit($text,"[]")
    $Str = ""
    $fill = ""
    $split = _ArrayAddColumns($split)
    ;_ArrayDisplay($split)

    if StringInStr($text, "[") = 1 Then
        $y = 3
    Else
        $y = 1
    EndIf

    For $i = $y-1 To Ubound($split) - 1
        $split[$i][1] = "[" & $split[$i][0] & "]"
        $i=$i+1
        $split[$i][1] = Binary("0x" & $split[$i][0])
        ;msgbox(0,"Output",$split[$i][1])
        Local $tInp = DllStructCreate("byte[" & BinaryLen($split[$i][1]) & "]")
        DllStructSetData($tInp, 1, $split[$i][1])
        Local $Str  = _CodepageStructToString($tInp, $CP_SHIFT_JIS)
              $Str  = StringRegExpReplace($Str ,@CRLF,"<cf>")
              $Str  = StringRegExpReplace($Str ,@LF,"<lf>")
              $Str  = StringRegExpReplace($Str ,@CR,"<cr>")
              $split[$i][1] = $Str
    Next
    ;_ArrayDisplay($split)

    $fill = ""
    For $i = 1 to Ubound($split) - 1
        $fill = $fill & "" & $split[$i][1]
    Next

    ;msgbox(0,"Output",$fill)

    FileWrite ($file, $fill)
    FileClose ($file)

EndFunc

 

1 person likes this

Share this post


Link to post
Share on other sites
10 hours ago, Synapsee said:
#include <Array.au3>
#include <MsgBoxConstants.au3>
#include <FileConstants.au3>

Global Const $CP_SHIFT_JIS = 932

Func _CodepageStructToString($tText, $iCodepage)
    Local $aResult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                                "ptr", 0, "int", 0)
    Local $tWstr = DllStructCreate("wchar[" & $aResult[0] & "]")
    $aResult = DllCall("Kernel32.dll", "int", "MultiByteToWideChar", "uint", $iCodepage, "dword", 0, "struct*", $tText, "int", DllStructGetSize($tText), _
                        "struct*", $tWstr, "int", $aResult[0])
    Return DllStructGetData($tWstr, 1)
EndFunc

Func _ArrayAddColumns(ByRef $aArr, $iNumColToAdd = 1)
    If IsArray($aArr) = 0 Then Return SetError(1, 0, -1) ; Filter out non-array
    If $iNumColToAdd < 1 Then Return SetError(2, 0, -1) ; $iNumColToAdd must be greater than zero to add a column.
    If UBound($aArr, 0) > 2 Then Return SetError(3, 0, -1) ; Only allows a 1d or 2d array pass this line.

    If UBound($aArr, 0) = 1 Then ; ====== For 1d array ========
        Local $aRet[UBound($aArr)][$iNumColToAdd + 1] ; Create new 2d array.
        For $r = 0 To UBound($aArr) - 1
            $aRet[$r][0] = $aArr[$r]
        Next
    Else ; ======= For 2d array ============
        Local $aRet = $aArr ; So that ByRef $aArr is not altered outside of function.
        ReDim $aRet[UBound($aRet)][UBound($aRet, 2) + $iNumColToAdd] ; ReDim 2d array only.
    EndIf

    Return $aRet
EndFunc   ;==>_ArrayAddColumns

$text1 = "[1F010005300020FF]82CD0A[030005300020FF]8177[1F12010000E6300020FF]8178[1F030000300020FF]82F00A8A6F82A682DC82B582BD"
$text2 = "[09020000390011300020FF]82BB82A482CB81428DC58CE382CC90B897EC82C60A8C5F96F182B782E9914F82C90C[1F090200003A0011300020FF]90D882E897A382B582BD82A082C682CC90A28A4582C982C282A282C40A92B282D782C482A882A282BD95FB82AA82A282A282ED82CB"
$text3 = "814581458145[090200003B0011300020FF]82B182EA82CD8145814581450A88C8914F82E682E88C8382B582AD82C882C182C482A282C882A282A98148"

;v1 without @CRLF
$file = "test without crlf.txt"
$text = $text1 & $text2 & $text3
MainFunc($text, $file)

;v2 with @CRLF
$file = "test with crlf.txt"
MainFunc($text1, $file)
FileWrite ($file, @CRLF)
FileClose ($file)
MainFunc($text2 , $file)
FileWrite ($file, @CRLF)
FileClose ($file)
MainFunc($text3, $file)
FileWrite ($file, @CRLF)
FileClose ($file)

Func MainFunc($text, $file)

    $split = StringSplit($text,"[]")
    $Str = ""
    $fill = ""
    $split = _ArrayAddColumns($split)
    ;_ArrayDisplay($split)

    if StringInStr($text, "[") = 1 Then
        $y = 3
    Else
        $y = 1
    EndIf

    For $i = $y-1 To Ubound($split) - 1
        $split[$i][1] = "[" & $split[$i][0] & "]"
        $i=$i+1
        $split[$i][1] = Binary("0x" & $split[$i][0])
        ;msgbox(0,"Output",$split[$i][1])
        Local $tInp = DllStructCreate("byte[" & BinaryLen($split[$i][1]) & "]")
        DllStructSetData($tInp, 1, $split[$i][1])
        Local $Str  = _CodepageStructToString($tInp, $CP_SHIFT_JIS)
              $Str  = StringRegExpReplace($Str ,@CRLF,"<cf>")
              $Str  = StringRegExpReplace($Str ,@LF,"<lf>")
              $Str  = StringRegExpReplace($Str ,@CR,"<cr>")
              $split[$i][1] = $Str
    Next
    ;_ArrayDisplay($split)

    $fill = ""
    For $i = 1 to Ubound($split) - 1
        $fill = $fill & "" & $split[$i][1]
    Next

    ;msgbox(0,"Output",$fill)

    FileWrite ($file, $fill)
    FileClose ($file)

EndFunc

 

Thank you!!

1 person likes this

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now

  • Similar Content

    • cu0x
      By cu0x
      Hello guys,
       
      im trying to solved a problem that I have.
       
      Need to get some chinese text from an old Wise script, and in the wise file says f.e. Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä. Is there any way to convert it to traditional chinese?
       
      Already tryied the following code...
       
      #include <MsgBoxConstants.au3> Example() Func Example() ; Define the string that will be converted later. ; NOTE: This string may show up as ?? in the help file and even in some editors. ; This example is saved as UTF-8 with BOM. It should display correctly in editors ; which support changing code pages based on BOMs. Local Const $sString = "Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä" ; Temporary variables used to store conversion results. $dBinary will hold ; the original string in binary form and $sConverted will hold the result ; afte it's been transformed back to the original format. Local $dBinary = Binary(""), $sConverted = "" ; Convert the original UTF-8 string to an ANSI compatible binary string. $dBinary = StringToBinary($sString) ; Convert the ANSI compatible binary string back into a string. $sConverted = BinaryToString($dBinary) ; Display the resulsts. Note that the last two characters will appear ; as ?? since they cannot be represented in ANSI. DisplayResults($sString, $dBinary, $sConverted, "ANSI") ; Convert the original UTF-8 string to an UTF16-LE binary string. $dBinary = StringToBinary($sString, 2) ; Convert the UTF16-LE binary string back into a string. $sConverted = BinaryToString($dBinary, 2) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF16-LE") ; Convert the original UTF-8 string to an UTF16-BE binary string. $dBinary = StringToBinary($sString, 3) ; Convert the UTF16-BE binary string back into a string. $sConverted = BinaryToString($dBinary, 3) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF16-BE") ; Convert the original UTF-8 string to an UTF-8 binary string. $dBinary = StringToBinary($sString, 4) ; Convert the UTF8 binary string back into a string. $sConverted = BinaryToString($dBinary, 4) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF8") EndFunc ;==>Example ; Helper function which formats the message for display. It takes the following parameters: ; $sOriginal - The original string before conversions. ; $dBinary - The original string after it has been converted to binary. ; $sConverted- The string after it has been converted to binary and then back to a string. ; $sConversionType - A human friendly name for the encoding type used for the conversion. Func DisplayResults($sOriginal, $dBinary, $sConverted, $sConversionType) MsgBox($MB_SYSTEMMODAL, "", "Original:" & @CRLF & $sOriginal & @CRLF & @CRLF & "Binary:" & @CRLF & $dBinary & @CRLF & @CRLF & $sConversionType & ":" & @CRLF & $sConverted) EndFunc ;==>DisplayResults Thanks a lot!
    • nacerbaaziz
      By nacerbaaziz
      Hi dear
      I want create retractable bar using autoit
      I tried creating slider, but there's a problem with screen reader for the blind, so is there another retractable tape?
      It is advisable to not accept dragging with the keybord only with  mouse
      note:
      This bar is needed in the process of raising and lowering the volume
      I hope that there is a solution to do that
      i waiting your responses.
      Thanks in advance to all members and administrators
    • XanzyX
      By XanzyX
      Is there a function out there that will edit an existing file witha a "Save" and "Cancel" at the bottom?
      Example: Funcrion("TestFile.txt")
    • rte7
      By rte7
      Hello. We work with the BMC Remedy site to manage incidents and would like to automate the processes of clicking through this button code:
      <a href="javascript:" class="btn btn3d menu" style="top:21; left:184; width:21; height:21;"> <img class="btnimg" src="../../../../resources/images/mt_sprites.gif" alt="menu category issue" title=""> </a> I use firefox with mozrepl and autoit with include FF.au3
      I need your help
      I read the topic https://www.autoitscript.com/forum/topic/95595-ffau3-v0601b-10/ but I could not run the code from the listed commands
      ...
      It is necessary to press the button and from the list of the menu of cahorsations to select the item = "zone of trust abonent"
      Screen # 1 http://joxi.ru/52aJK7bh4a7ypA or below.
      1) Press button
      <a href="javascript:" class="btn btn3d menu" style="top:21; left:184; width:21; height:21;"> <img class="btnimg" src="../../../../resources/images/mt_sprites.gif" alt="menu category issue" title=""> </a>
      2) After pressing the button, I need to choose in this menu of 4 items to select an item called "zone of trust abonent", Screen # 2 - http://joxi.ru/p27gwQKHo71VQ2
      html code table items
      <table class="MenuTable" cellpadding="0" cellspacing="0" style="width: 179px;"> <tbody class="MenuTableBody"> <tr class="MenuTableRow"> <td class="MenuEntryName" nowrap="">zone of trust abonent</td> <td class="MenuEntryNoSub" arvalue="zone of trust abonent"></td> </tr> <tr class="MenuTableRow"><td class="MenuEntryName" nowrap="">zone of trust operator</td> <td class="MenuEntryNoSub" arvalue="zone of trust operator"></td> </tr> <tr class="MenuTableRow"><td class="MenuEntryName" nowrap="">zone of trust third operator</td> <td class="MenuEntryNoSub" arvalue="zone of trust third operator"></td></tr> <tr class="MenuTableRow"><td class="MenuEntryNameHover" nowrap="">No settings</td> <td class="MenuEntryNoSubHover" arvalue="No settings"></td> </tr> </tbody> </table>
       
       
      More in detail, I choose from the menu item "zone of trust abonent" Screen # 3 - http://joxi.ru/GrqVq4ZIQEPW4m

       
      3) The choice is made, Screen # 4 http://joxi.ru/v297w6aC3PovLr
      <textarea class="text sr " wrap="off" id="arid_WIN_0_1000002488" cols="20" maxlen="60" style="top:21; left:0; width:179; height:21;" armenu="CFG:PRC:CategoryHPD-Res-T1-Q" mstyle="2" arautoc="1" arautocmb="1" arautocak="0" arautoctt="400" rows="1"> </textarea>
       
      It's all. I would be very grateful to you =) !!!!!!!!!!
      Here are more detailed codes in the attachment. 
      button1.txt
      menu - table.txt
      all.txt
    • nacerbaaziz
      By nacerbaaziz
      Hello
      How are you
      I have a question, please.
      I've created a window and i need
      when i run the script if it detect an other copy from the same script was runing
       the script close the first copy Automatically and run a new copy
      I want an example to understand it