Jump to content
bweather04

Is this a Win 10 thing?

Recommended Posts

bweather04

Line 28

Send("12MouseDown("left")

Error: Unterminated string.

#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409)  ---


#region --- Internal functions Au3Recorder Start ---
Func _Au3RecordSetup()
Opt('WinWaitDelay',100)
Opt('WinDetectHiddenText',1)
Opt('MouseCoordMode',0)
Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '')
If $aResult[1] <> '00000409' Then
  MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')')
EndIf

EndFunc

Func _WinWaitActivate($title,$text,$timeout=0)
 WinWait($title,$text,$timeout)
 If Not WinActive($title,$text) Then WinActivate($title,$text)
 WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---

_WinWaitActivate("Program Manager","")
MouseClick("left",650,44,2)
_WinWaitActivate("classname=WorkerW","")
_WinWaitActivate("Kronos Workforce Central(R) ‎- Microsoft Edge","")
Send("12MouseDown("left")

MouseClick("left",141,186,1)
MouseUp("left")
MouseClick("left",1184,21,1)
#endregion --- Au3Recorder generated code End ---

 

 

Edited by Melba23
Added code tags

Share this post


Link to post
Share on other sites
Jos
11 minutes ago, bweather04 said:

Send("12MouseDown("left")

Error: Unterminated string.

 

Quote
Is this a Win 10 thing?

Why in the world would this be anything else than totally wrong syntax?
Check the helpfile for the proper syntax.

Jos


Visit the SciTE4AutoIt3 Download page for the latest versions  - Beta files                                How to post scriptsource        Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites
bweather04

K. But then the script still pauses::

 

#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409)  ---
#region --- Internal functions Au3Recorder Start ---
Func _Au3RecordSetup()
Opt('WinWaitDelay',100)
Opt('WinDetectHiddenText',1)
Opt('MouseCoordMode',0)
Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '')
If $aResult[1] <> '00000409' Then
  MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')')
EndIf
EndFunc
Func _WinWaitActivate($title,$text,$timeout=0)
 WinWait($title,$text,$timeout)
 If Not WinActive($title,$text) Then WinActivate($title,$text)
 WinWaitActive($title,$text,$timeout)
EndFunc
_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---
_WinWaitActivate("Program Manager","")
MouseClick("left",650,44,2)
_WinWaitActivate("classname=WorkerW","")
_WinWaitActivate("Kronos Workforce Central(R) ‎- Microsoft Edge","")
Send("12MouseDown("left")")
Send("4{BACKSPACE}{BACKSPACE}4161{TAB}{SHIFTDOWN}h{SHIFTUP}3ll0{SHIFTDOWN}1{SHIFTUP}976")
MouseClick("left",141,186,1)
MouseUp("left")
MouseClick("left",1184,21,1)
#endregion --- Au3Recorder generated code End ---
 
Doesn't run. It'll compile. But. No.

Share this post


Link to post
Share on other sites
Jos
20 hours ago, bweather04 said:

K. But then the script still pauses::

Not much info to assist you with is it? 
You could add the following statement which will tell you which line it is hanging when hovering the systray Icon:

Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info

 

20 hours ago, bweather04 said:

Doesn't run. It'll compile. But. No.

Again not must info in that sentence. No idea what you mean with "Doesn't run".
However you didn't really check the statement I pointed you to as far as syntax since it still doesn't make any sense but merely added a double quote to avoid an initial error.

Jos 


Visit the SciTE4AutoIt3 Download page for the latest versions  - Beta files                                How to post scriptsource        Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites
careca

probably hanging in

_WinWaitActivate("classname=WorkerW","")

"classname=WorkerW" should be "[CLASS:WorkerW]"

o.O

Send("12MouseDown("left")")
Send("4{BACKSPACE}{BACKSPACE}4161{TAB}{SHIFTDOWN}h{SHIFTUP}3ll0{SHIFTDOWN}1{SHIFTUP}976")

wow


Spoiler

Paster - Main function is to paste text, but has more functions. (No longer mantained, switched to String Trigger)

Renamer - Rename files and folders, remove portions of text from the filename etc.

GPO Tool - Export/Import Group policy settings.

BeatsPlayer - Music player.

Params Tool - Right click an exe to see it's parameters or execute them.

String Trigger - Triggers pasting text or applications or internet links on specific strings.

Inconspicuous - Hide files in plain sight, not fully encrypted.

Regedit Control - Registry browsing history, quickly jump into any saved key.

Time4Shutdown - Write the time for shutdown in minutes.

Power Profiles Tool - Set a profile as active, delete, duplicate, export and import.

Firefox Profile Backup - Backup/restore previously saved profile.

Finished Task Shutdown - Shuts down pc when specified window/Wndl/process closes.

NetworkSpeedShutdown - Shuts down pc if download speed goes under "X" Kb/s.

IUIAutomation - Topic with framework and examples

Au3Record.exe

Share this post


Link to post
Share on other sites
bweather04

Yeah Yeah... I knew it was something within the class name. I've had this discussion before. - Can't remember what the proper syntax is.

AND YES. I knwo my pass is in there. I don't care. -- It's only for a timestamp at work.

#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409)  ---

Func _Au3RecordSetup()
Opt('WinWaitDelay',100)
Opt('WinDetectHiddenText',1)
Opt('MouseCoordMode',0)
Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '')
If $aResult[1] <> '00000409' Then
  MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')')
EndIf

EndFunc

Func _WinWaitActivate($title,$text,$timeout=0)
 WinWait($title,$text,$timeout)
 If Not WinActive($title,$text) Then WinActivate($title,$text)
 WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---

_WinWaitActivate("Program Manager","");
MouseClick("left",650,44,2)
_WinWaitActivate("[CLASS:WorkerW]","")
_WinWaitActivate("Kronos Workforce Central(R) ‎- Microsoft Edge","")
Send("12MouseDown("left")")

MouseClick("left",141,186,1)
MouseUp("left")
MouseClick("left",1184,21,1)
#endregion --- Au3Recorder generated code End ---

 

Now it just doesn't error. Nor run? Error LIne #17

Edited by bweather04

Share this post


Link to post
Share on other sites
bweather04

#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409)  ---
Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info
Func _Au3RecordSetup()
Opt('WinWaitDelay',100)
Opt('WinDetectHiddenText',1)
Opt('MouseCoordMode',0)
Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '')
If $aResult[1] <> '00000409' Then
  MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')')
EndIf

EndFunc

Func _WinWaitActivate($title,$text,$timeout=0)
 WinWait($title,$text,$timeout)
 If Not WinActive($title,$text) Then WinActivate($title,$text)
 WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---

_WinWaitActivate("[class:WorkerW]","")
MouseClick("left",650,44,2)
_WinWaitActivate("Kronos Workforce Central(R) ‎- Microsoft Edge","")
Send("12MouseDown("left")")

MouseClick("left",141,186,1)
MouseUp("left")
MouseClick("left",1184,21,1)
#endregion --- Au3Recorder generated code End ---

 

Error Syntax Line 26::
Send("12MouseDown("left")")
Send("12MouseDown("^ERROR

Error: Unknown function name.

Edited by bweather04

Share this post


Link to post
Share on other sites
bweather04

#region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000409)  ---
Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info
Func _Au3RecordSetup()
Opt('WinWaitDelay',100)
Opt('WinDetectHiddenText',1)
Opt('MouseCoordMode',0)
Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '')
If $aResult[1] <> '00000409' Then
  MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000409->' & $aResult[1] & ')')
EndIf

EndFunc

Func _WinWaitActivate($title,$text,$timeout=0)
 WinWait($title,$text,$timeout)
 If Not WinActive($title,$text) Then WinActivate($title,$text)
 WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---

_WinWaitActivate("[class:WorkerW]","")
MouseClick("left",650,44,2)
_WinWaitActivate("Kronos Workforce Central(R) ‎- Microsoft Edge","")

MouseClick("left",141,186,1)
MouseUp("left")
MouseClick("left",1184,21,1)
#endregion --- Au3Recorder generated code End ---

 

Got it! THANK YOU FOR THE PROPER CLASS NAME!! @careca

  • Like 1

Share this post


Link to post
Share on other sites
careca

Send("12MouseDown("left")") syntax was wrong.


Spoiler

Paster - Main function is to paste text, but has more functions. (No longer mantained, switched to String Trigger)

Renamer - Rename files and folders, remove portions of text from the filename etc.

GPO Tool - Export/Import Group policy settings.

BeatsPlayer - Music player.

Params Tool - Right click an exe to see it's parameters or execute them.

String Trigger - Triggers pasting text or applications or internet links on specific strings.

Inconspicuous - Hide files in plain sight, not fully encrypted.

Regedit Control - Registry browsing history, quickly jump into any saved key.

Time4Shutdown - Write the time for shutdown in minutes.

Power Profiles Tool - Set a profile as active, delete, duplicate, export and import.

Firefox Profile Backup - Backup/restore previously saved profile.

Finished Task Shutdown - Shuts down pc when specified window/Wndl/process closes.

NetworkSpeedShutdown - Shuts down pc if download speed goes under "X" Kb/s.

IUIAutomation - Topic with framework and examples

Au3Record.exe

Share this post


Link to post
Share on other sites
Jos
10 minutes ago, careca said:

Send("12MouseDown("left")") syntax was wrong.

That shouldn't be any news anymore ;) 


Visit the SciTE4AutoIt3 Download page for the latest versions  - Beta files                                How to post scriptsource        Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

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

×