Jump to content

javascript unescape Question


Recommended Posts

  • Moderators

youtuber,

It is a simple ASCII conversion:

#include <MsgBoxConstants.au3>

$sString = "AutoIt"

$sCoded = StringTrimLeft(StringToBinary($sString), 2)

MsgBox($MB_SYSTEMMODAL, "Encoded", $sCoded)

$sDecoded = BinaryToString("0x" & $sCoded)

MsgBox($MB_SYSTEMMODAL, "Decoded", $sDecoded)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites

@Melba23 Thanks

I could not do the same:(

$Form1 = GUICreate("Unescape Decoder and Encoder", 876, 422, 192, 124)
$Edit1 = GUICtrlCreateEdit("AutoitTest", 48, 48, 337, 305)
$Edit2 = GUICtrlCreateEdit("", 412, 49, 425, 305)
$Label1 = GUICtrlCreateLabel("String", 56, 24, 50, 17)
$Label2 = GUICtrlCreateLabel("Unescape", 416, 24, 50, 17)

$ButtonEncoder = GUICtrlCreateButton("Encoder", 150, 376, 147, 25)
$ButtonDecoder = GUICtrlCreateButton("Decoder", 550, 376, 147, 25)

GUISetState(@SW_SHOW)
While 1
  $nMsg = GUIGetMsg()
  Switch $nMsg
     Case -3
        Exit
     Case $ButtonEncoder
        GUICtrlSetData($Edit2, "%" & StringTrimLeft("%" & StringToBinary(GUICtrlRead($Edit1)), 2))

     Case $ButtonDecoder
        GUICtrlSetData($Edit1,BinaryToString("0x" & GUICtrlRead($Edit2)),2)
  EndSwitch
WEnd

 

Link to post
Share on other sites

Can you help me please

#include <Array.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Form1_1 = GUICreate("Unescape Decoder and Encoder", 877, 669)
$Edit1 = GUICtrlCreateEdit("", 48, 48, 337, 249)
GUICtrlSetData(-1, "AutoitTest")
$Edit2 = GUICtrlCreateEdit("", 412, 49, 425, 249)
$Label1 = GUICtrlCreateLabel("String", 56, 24, 50, 17)
$Label2 = GUICtrlCreateLabel("Unescape", 416, 24, 50, 17)
$ButtonEncoder = GUICtrlCreateButton("Encoder", 150, 312, 147, 25)
$ButtonDecoder = GUICtrlCreateButton("Decoder", 550, 312, 147, 25)
$Edit3 = GUICtrlCreateEdit("", 40, 408, 801, 233)
$Label3 = GUICtrlCreateLabel("Decode", 40, 384, 122, 17)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $ButtonEncoder
            $aData = StringTrimLeft(StringToBinary(GUICtrlRead($Edit1)), 2)
            $aArray = _StringEqualSplit($aData, 2)
            GUICtrlSetData($Edit2, "%" & _ArrayToString($aArray, "%"))

        Case $ButtonDecoder
            GUICtrlSetData($Edit3,GUICtrlRead($Edit2)

  EndSwitch
WEnd

Func _StringEqualSplit($sString, $iNumChars)
    If (Not IsString($sString)) Or $sString = "" Then Return SetError(1, 0, 0)
    If (Not IsInt($iNumChars)) Or $iNumChars < 1 Then Return SetError(2, 0, 0)
    Return StringRegExp($sString, "(?s).{1," & $iNumChars & "}", 3)
EndFunc

 

Link to post
Share on other sites
  • Moderators

youtuber,

Do not be so impatient - some of us have more important things to do.

This works for me:

#include <GUIConstantsEx.au3>

$Form1 = GUICreate("Unescape Decoder and Encoder", 876, 422, 192, 124)
$Edit1 = GUICtrlCreateEdit("AutoitTest", 48, 48, 337, 305)
$Edit2 = GUICtrlCreateEdit("", 412, 49, 425, 305)
$Label1 = GUICtrlCreateLabel("String", 56, 24, 50, 17)
$Label2 = GUICtrlCreateLabel("Unescape", 416, 24, 50, 17)

$ButtonEncoder = GUICtrlCreateButton("Encoder", 150, 376, 147, 25)
$ButtonDecoder = GUICtrlCreateButton("Decoder", 550, 376, 147, 25)

GUISetState(@SW_SHOW)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $ButtonEncoder
            $sBinary = StringTrimLeft(StringToBinary(GUICtrlRead($Edit1)), 2)
            $sEscaped = StringRegExpReplace($sBinary, "(.{2})", "%$1")
            GUICtrlSetData($Edit2, $sEscaped)
            GUICtrlSetData($Edit1, "")

        Case $ButtonDecoder
            $sEncoded = GUICtrlRead($Edit2)
            $sStripped = StringReplace($sEncoded, "%", "")
            ConsoleWrite($sStripped & @CRLF)
            $sDecoded = BinaryToString("0x" & $sStripped)
            ConsoleWrite($sDecoded & @CRLF)
            GUICtrlSetData($Edit1, $sDecoded)
    EndSwitch
WEnd

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

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
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...