<![CDATA[LA/QM forum - Help (QM)]]>

<![CDATA[LA/QM forum - Help (QM)]]> https://www.libreautomate.com/forum/ Mon, 27 Apr 2026 05:58:53 +0000 MyBB <![CDATA[Get the main window handle by PID]]> https://www.libreautomate.com/forum/showthread.php?tid=7935 Mon, 02 Mar 2026 10:35:59 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7935 The following code does not work.

Macro T

Code:
out

int i=4696

out win("" "" "" 0 F"threadId={i}")

PowerShell implementation code:

Quote:(Get-Process -Id 4696).MainWindowHandle

]]> The following code does not work.

Macro T

Code:
out

int i=4696

out win("" "" "" 0 F"threadId={i}")

PowerShell implementation code:

Quote:(Get-Process -Id 4696).MainWindowHandle

]]> <![CDATA[_s.beg("_")]]> https://www.libreautomate.com/forum/showthread.php?tid=7933 Sun, 01 Mar 2026 13:32:40 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7933
Macro Macro51

Code:
_s="_54001"; out _s.beg("﻿_")

]]>
Macro Macro51

Code:
_s="_54001"; out _s.beg("﻿_")

]]> <![CDATA[Long press trigger]]> https://www.libreautomate.com/forum/showthread.php?tid=7929 Sat, 31 Jan 2026 11:27:26 +0000 don_AC64]]> https://www.libreautomate.com/forum/showthread.php?tid=7929 <![CDATA[ap._getactive not working anymore]]> https://www.libreautomate.com/forum/showthread.php?tid=7877 Sun, 28 Sep 2025 11:51:06 +0000 artuur9]]> https://www.libreautomate.com/forum/showthread.php?tid=7877
Function pp_run_macro_direct

Code:
;/exe 1

typelib PowerPoint "$program files$\Microsoft Office\Office15\MSPPT.OLB"

PowerPoint.Application ap._getactive; err end "failed to connect to PowerPoint. Try to run this macro in separate process as User."

Code:
;/exe 1

typelib PowerPoint "$program files$\Microsoft Office\Office15\MSPPT.OLB"

PowerPoint.Application ap._getactive; err end "failed to connect to PowerPoint. Try to run this macro in separate process as User."

It used to work on my old laptop with windows 10. On my new laptop with windows 11 the macro compiles fine, and the exe is created, but running it triggers the 'failed to connect to powerpoint' message (and powerpoint is running). The typelib line does point to the right OLB file (it is powerpoint 2013).

How can I find out what the problem is?]]> <![CDATA[processing keystrokes without missing any]]> https://www.libreautomate.com/forum/showthread.php?tid=7871 Wed, 10 Sep 2025 19:30:20 +0000 artuur9]]> https://www.libreautomate.com/forum/showthread.php?tid=7871

rep
   int vk=wait(5 KF)
   ;;processing of pressed key (adding it to the search string, finding the search string in predefined list,
   ;;displaying the found items via onscreendisplay, etc.


The macro works, but the problem is that when the user types too fast, not all pressed keys are registered by the vk=wait(5 KF) instruction, probably because the processing part takes longer than it takes for a fast typist to type the next keystroke.

How can I prevent this and make sure all keys pressed by the user are registered?]]>

rep
   int vk=wait(5 KF)
   ;;processing of pressed key (adding it to the search string, finding the search string in predefined list,
   ;;displaying the found items via onscreendisplay, etc.


The macro works, but the problem is that when the user types too fast, not all pressed keys are registered by the vk=wait(5 KF) instruction, probably because the processing part takes longer than it takes for a fast typist to type the next keystroke.

How can I prevent this and make sure all keys pressed by the user are registered?]]> <![CDATA[Adobe Extend Script Toolkit Help]]> https://www.libreautomate.com/forum/showthread.php?tid=7864 Sun, 31 Aug 2025 21:58:10 +0000 pctechtv]]> https://www.libreautomate.com/forum/showthread.php?tid=7864
https://marketplace.visualstudio.com/ite...ript-debug

Thanks]]>
https://marketplace.visualstudio.com/ite...ript-debug

Thanks]]> <![CDATA[multiple string and variable replacements]]> https://www.libreautomate.com/forum/showthread.php?tid=7862 Wed, 27 Aug 2025 23:52:48 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7862 str.findreplaces. Is this possible?
I noticed that the member function str.fromn has similar characteristics.
Thanks in advance for any suggestions and help!

Macro Macro38

Code:
out

str ss=

;_a_b_c_d

str a="hello"

str b=" "

str c="world"

str d="!"

ss.findreplace("_a" a); ss.findreplace("_b" b); ss.findreplace("_c" c); ss.findreplace("_d" d)

out ss

ss.findreplaces("_a" a "_b" b "_c" c "_d" d) ;;???

out ss

]]> str.findreplaces. Is this possible?
I noticed that the member function str.fromn has similar characteristics.
Thanks in advance for any suggestions and help!

Macro Macro38

Code:
out

str ss=

;_a_b_c_d

str a="hello"

str b=" "

str c="world"

str d="!"

ss.findreplace("_a" a); ss.findreplace("_b" b); ss.findreplace("_c" c); ss.findreplace("_d" d)

out ss

ss.findreplaces("_a" a "_b" b "_c" c "_d" d) ;;???

out ss

]]> <![CDATA[restart the exe]]> https://www.libreautomate.com/forum/showthread.php?tid=7859 Wed, 13 Aug 2025 13:19:32 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7859
How can restarting the exe be implemented elegantly?

Macro Macro33

Code:
out

if !rget(_s "DisabledComponents" "SYSTEM\CurrentControlSet\Services\Tcpip6\Parameters" HKEY_LOCAL_MACHINE)

,out _s

,rset 32 "DisabledComponents" "SYSTEM\CurrentControlSet\Services\Tcpip6\Parameters" HKEY_LOCAL_MACHINE

,;need restart !!!

mes 666

]]>
How can restarting the exe be implemented elegantly?

Macro Macro33

Code:
out

if !rget(_s "DisabledComponents" "SYSTEM\CurrentControlSet\Services\Tcpip6\Parameters" HKEY_LOCAL_MACHINE)

,out _s

,rset 32 "DisabledComponents" "SYSTEM\CurrentControlSet\Services\Tcpip6\Parameters" HKEY_LOCAL_MACHINE

,;need restart !!!

mes 666

]]> <![CDATA[simple toggle macro]]> https://www.libreautomate.com/forum/showthread.php?tid=7858 Tue, 12 Aug 2025 15:59:10 +0000 lumenant]]> https://www.libreautomate.com/forum/showthread.php?tid=7858
.png

Screenshot 2025-08-12 115724.png (Size: 118.9 KB / Downloads: 110) im trying to create a code that when i press a key, i did 't' in this case, as a placeholder, it will continuously press it 100 times per second until i press the key again, a toggle. this is what i wrote so far, just based off my limited knowledge of coding C# but i am very new to this program and so i dont know any intricacies of this program that are not present in normal C#. there are 2 errors i got which are here and after is my code: Smile

errors:

Compilation: 2 errors
Script1.cs(10,6): error CS0117: 'keys' does not contain a definition for 'onKeyDown'
Script1.cs(25,9): error CS0165: Use of unassigned local variable 'cts'

script:

// Toggle spam of "T" key at 100 presses per second in LibreAutomate
// Press T once to start, press T again to stop.

using System;
using System.Threading;

bool spamming = false;
CancellationTokenSource cts;

keys.onKeyDown(KKey.T, k => {
if (!spamming) {
// Start spamming
spamming = true;
cts = new CancellationTokenSource();
Task.Run(() => {
while (!cts.Token.IsCancellationRequested) {
keys.send("T");
Thread.Sleep(10); // 10 ms delay = ~100 presses/sec
}
});
print.it("T spam started.");
} else {
// Stop spamming
spamming = false;
cts.Cancel();
print.it("T spam stopped.");
}
});]]> <![CDATA[Code in variables or resources]]> https://www.libreautomate.com/forum/showthread.php?tid=7856 Sun, 03 Aug 2025 13:50:45 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7856 My thought is: script c1.

Reason:
The code of script c1 is stored in a variable, while the code of script c2 is stored in a resource.
Can it be directly viewed using a resource viewer tool?

Is the above understanding correct?

Macro c1

Code:
out

str code=

;public class Class1

;{

;;;;;public static string StaticFunc(string s)

;;;;;{

;;;;;;;;;return s;

;;;;;}

;}

str R=CsFunc(code "hello")

out R

Macro c2

Code:
out

str R=CsFunc("" "hello")

out R

#ret

public class Class1

{

;;;;public static string StaticFunc(string s)

;;;;{

;;;;;;;;return s;

;;;;}

}

]]> My thought is: script c1.

Reason:
The code of script c1 is stored in a variable, while the code of script c2 is stored in a resource.
Can it be directly viewed using a resource viewer tool?

Is the above understanding correct?

Macro c1

Code:
out

str code=

;public class Class1

;{

;;;;;public static string StaticFunc(string s)

;;;;;{

;;;;;;;;;return s;

;;;;;}

;}

str R=CsFunc(code "hello")

out R

Macro c2

Code:
out

str R=CsFunc("" "hello")

out R

#ret

public class Class1

{

;;;;public static string StaticFunc(string s)

;;;;{

;;;;;;;;return s;

;;;;}

}

]]> <![CDATA[Font of text in the output panel]]> https://www.libreautomate.com/forum/showthread.php?tid=7855 Sun, 03 Aug 2025 03:59:00 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7855
Is there a way to set the font?

Demo: https://i.ibb.co/pvQ0BFyr/demo.gif]]>
Is there a way to set the font?

Demo: https://i.ibb.co/pvQ0BFyr/demo.gif]]> <![CDATA[Can QM or La use UI automation to control the TK GUI?]]> https://www.libreautomate.com/forum/showthread.php?tid=7852 Mon, 28 Jul 2025 03:36:58 +0000 conanjou]]> https://www.libreautomate.com/forum/showthread.php?tid=7852
python code:

import tkinter as tk

def on_click():
label.config(text="test ok！")

root = tk.Tk()
root.title("MyTkWindow")
root.geometry("300x200")

entry = tk.Entry(root, name="myentry")
entry.pack(pady=10)

btn = tk.Button(root, text="Button", name="mybutton", command=on_click)
btn.pack(pady=10)

label = tk.Label(root, text="", name="mylabel")
label.pack(pady=10)

root.mainloop()]]>
python code:

import tkinter as tk

def on_click():
label.config(text="test ok！")

root = tk.Tk()
root.title("MyTkWindow")
root.geometry("300x200")

entry = tk.Entry(root, name="myentry")
entry.pack(pady=10)

btn = tk.Button(root, text="Button", name="mybutton", command=on_click)
btn.pack(pady=10)

label = tk.Label(root, text="", name="mylabel")
label.pack(pady=10)

root.mainloop()]]> <![CDATA[Http Listener]]> https://www.libreautomate.com/forum/showthread.php?tid=7849 Fri, 11 Jul 2025 00:02:07 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7849 port listening function similar to the PowerShell code below using the HttpListener function,
but I haven't succeeded.
After executing the function, I am unable to stop the listening service and return the Code value.

Thank you in advance for any suggestions and help.

Function HttpListener_T

Code:
out 

;https://portal.azure.com/#view/Microsoft_AAD_RegisteredApps/ApplicationsListBlade

;After registering the application from the above link, obtain the following parameters:

str clientID     = "a6eb8463-d6d9-4466-b774-29b5f2bb66"

str clientSecret = "r.I8Q~O5UKQU~9RZNn7~uCinjnDR~Z2hagY5Ob"

str redirectUri  = "http://localhost:7654/"

str uri =

F

;https://login.microsoftonline.com/common/oauth2/v2.0/authorize?client_id={clientID}

;scope=offline_access files.readwrite

;response_type=code

;redirect_uri={redirectUri}

uri.findreplace("[]" "&")

run uri

out HttpListener(7654)

Function HttpListener

Code:
function~ port

if(getopt(nthreads)>1) ret

#compile "__TcpSocket"

AddTrayIcon "close.ico" "TcpSocket_server[]Ctrl+click to end."

str code

TcpSocket x.ServerStart(port &sub.OnClientConnected &code)

x.Close

ret code

#sub OnClientConnected

function TcpSocket&client $clientIp str&code !*reserved

str method path headers

if(!client.HttpRead(method path headers)) ret

out "method:[]%s"method

out "path:[]%s"path

if method="GET" and !empty(path)

,_s.get(path find(path "=")+1)

,code=_s

Powershell Code:

Code:
# -- https://portal.azure.com/#view/Microsoft_AAD_RegisteredApps/ApplicationsListBlade

# -- After registering the application from the above link, obtain the following parameters:

$clientID     = 'a6eb8463-d6d9-4466-b774-29b5f2bb66'

$clientSecret = 'r.I8Q~O5UKQU~9RZNn7~uCinjnDR~Z2hagY5Ob'

$redirectUri  = 'http://localhost:7654/'

# -- Microsoft Graph OAuth2.0 Authorization Code Flow

$uri = 'https://login.microsoftonline.com/common/oauth2/v2.0/authorize?client_id={0}&scope=offline_access files.readwrite&response_type=code&redirect_uri={1}' -f $clientID, $redirectUri

start $uri

#################################################### Implement the following functionality in the HttpListener function of qm.

$listener = New-Object 'System.Net.HttpListener'

$listener.Prefixes.Add($redirectUri)

$listener.Start()

$ctx  = $listener.GetContext()

$code = $ctx.Request.QueryString.GetValues('code') | select -First 1

if($code -eq $null){

    $bytes = [Text.Encoding]::Default.GetBytes('Authorization Failed')

} else {

    $bytes = [Text.Encoding]::Default.GetBytes('Authorization Successful, Please Close the Current Page')

}

$ctx.Response.ContentLength64 = $bytes.Length

$ctx.Response.OutputStream.Write($bytes, 0, $bytes.Length)

$listener.Stop()

$ctx.Response.Close()

$listener.Dispose()

]]> port listening function similar to the PowerShell code below using the HttpListener function,
but I haven't succeeded.
After executing the function, I am unable to stop the listening service and return the Code value.

Thank you in advance for any suggestions and help.

Function HttpListener_T

Code:
out 

;https://portal.azure.com/#view/Microsoft_AAD_RegisteredApps/ApplicationsListBlade

;After registering the application from the above link, obtain the following parameters:

str clientID     = "a6eb8463-d6d9-4466-b774-29b5f2bb66"

str clientSecret = "r.I8Q~O5UKQU~9RZNn7~uCinjnDR~Z2hagY5Ob"

str redirectUri  = "http://localhost:7654/"

str uri =

F

;https://login.microsoftonline.com/common/oauth2/v2.0/authorize?client_id={clientID}

;scope=offline_access files.readwrite

;response_type=code

;redirect_uri={redirectUri}

uri.findreplace("[]" "&")

run uri

out HttpListener(7654)

Function HttpListener

Code:
function~ port

if(getopt(nthreads)>1) ret

#compile "__TcpSocket"

AddTrayIcon "close.ico" "TcpSocket_server[]Ctrl+click to end."

str code

TcpSocket x.ServerStart(port &sub.OnClientConnected &code)

x.Close

ret code

#sub OnClientConnected

function TcpSocket&client $clientIp str&code !*reserved

str method path headers

if(!client.HttpRead(method path headers)) ret

out "method:[]%s"method

out "path:[]%s"path

if method="GET" and !empty(path)

,_s.get(path find(path "=")+1)

,code=_s

Powershell Code:

Code:
# -- https://portal.azure.com/#view/Microsoft_AAD_RegisteredApps/ApplicationsListBlade

# -- After registering the application from the above link, obtain the following parameters:

$clientID     = 'a6eb8463-d6d9-4466-b774-29b5f2bb66'

$clientSecret = 'r.I8Q~O5UKQU~9RZNn7~uCinjnDR~Z2hagY5Ob'

$redirectUri  = 'http://localhost:7654/'

# -- Microsoft Graph OAuth2.0 Authorization Code Flow

$uri = 'https://login.microsoftonline.com/common/oauth2/v2.0/authorize?client_id={0}&scope=offline_access files.readwrite&response_type=code&redirect_uri={1}' -f $clientID, $redirectUri

start $uri

#################################################### Implement the following functionality in the HttpListener function of qm.

$listener = New-Object 'System.Net.HttpListener'

$listener.Prefixes.Add($redirectUri)

$listener.Start()

$ctx  = $listener.GetContext()

$code = $ctx.Request.QueryString.GetValues('code') | select -First 1

if($code -eq $null){

    $bytes = [Text.Encoding]::Default.GetBytes('Authorization Failed')

} else {

    $bytes = [Text.Encoding]::Default.GetBytes('Authorization Successful, Please Close the Current Page')

}

$ctx.Response.ContentLength64 = $bytes.Length

$ctx.Response.OutputStream.Write($bytes, 0, $bytes.Length)

$listener.Stop()

$ctx.Response.Close()

$listener.Dispose()

]]> <![CDATA[Running qm code in pip?]]> https://www.libreautomate.com/forum/showthread.php?tid=7848 Wed, 09 Jul 2025 00:51:20 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7848 <![CDATA[create global hotkeys for a tray app]]> https://www.libreautomate.com/forum/showthread.php?tid=7844 Wed, 02 Jul 2025 10:34:48 +0000 Davider]]> https://www.libreautomate.com/forum/showthread.php?tid=7844 When I press the hotkey F12, the subroutine sub.hk_F12 will be executed.
When I press the hotkey Ctrl+F12, the subroutine sub.hk_Ctrl_F12 will be executed.

I haven't found any useful information on the forums.
Thanks in advance for any suggestions and help.

Function TcpServer2

Code:
out

if(getopt(nthreads)>1) ret ;;allow single instance

AddTrayIcon "cut.ico" "test_TcpSocket_server[]Ctrl+click to end."

#compile "__TcpSocket"

TcpSocket x.ServerStart(5032 &sub.OnClientConnected)

#sub OnClientConnected

function TcpSocket&client $clientIp param !*reserved

client.Receive(_s 1000)

out F"SERVER: client request: {_s}"

client.Send("response 1")

#sub hk_F12

mes "hk_F12"

#sub hk_Ctrl_F12

mes "hk_Ctrl_F12"

]]> When I press the hotkey F12, the subroutine sub.hk_F12 will be executed.
When I press the hotkey Ctrl+F12, the subroutine sub.hk_Ctrl_F12 will be executed.

I haven't found any useful information on the forums.
Thanks in advance for any suggestions and help.

Function TcpServer2

Code:
out

if(getopt(nthreads)>1) ret ;;allow single instance

AddTrayIcon "cut.ico" "test_TcpSocket_server[]Ctrl+click to end."

#compile "__TcpSocket"

TcpSocket x.ServerStart(5032 &sub.OnClientConnected)

#sub OnClientConnected

function TcpSocket&client $clientIp param !*reserved

client.Receive(_s 1000)

out F"SERVER: client request: {_s}"

client.Send("response 1")

#sub hk_F12

mes "hk_F12"

#sub hk_Ctrl_F12

mes "hk_Ctrl_F12"

]]>