Using copy for a link that you cannot right click and 'copy'?

[chef423]

The 'Link' is a 16 digit number, on a website that is clickable, but when you mouse over it and right click, there is no direct COPY option.
Only the standard:
Save Link as...
Copy Link
etc

Is there a way for AHK to 'force' copy that 16 digit number?

When I use my mouse and and left click (from the left of the first #) and drag to the right, obviously I get the highlight I want and then I can press CRTL+C or simply right click and select copy.

Id rather not have the mouse pointer involved here, so I can keep the code clean and as error-less as possible. I have tried the Shift and arrow, no luck.

Thanks in advance.

[chef423]

Code: Select all

MouseClickDrag, left, 481, 197, 624, 197
	Send, ^c

This 'works' but its hardly what I want...

EDIT: actually it does not work because the 'click' is lifted before I can COPY the text

[jeeswg]

You could try this (requires the Acc library):

Code: Select all

q:: ;get text from element/control/window under cursor
oAcc := Acc_ObjectFromPoint()
;hWnd := Acc_WindowFromObject(oAcc)
vText1 := vText2 := ""
try vText1 := oAcc.accName(0)
try vText2 := oAcc.accValue(0)
;Clipboard := vText1 "`r`n" vText2 "`r`n"
Clipboard := "accName: " vText1 "`r`n" "accValue: " vText2 "`r`n"
return

Acc library (MSAA) and AccViewer download links - AutoHotkey Community
https://autohotkey.com/boards/viewtopic.php?f=6&t=26201

Otherwise you could use Internet Explorer and COM.

[chef423]

You could try this (requires the Acc library):

Code: Select all

q:: ;get text from element/control/window under cursor
oAcc := Acc_ObjectFromPoint()
;hWnd := Acc_WindowFromObject(oAcc)
vText1 := vText2 := ""
try vText1 := oAcc.accName(0)
try vText2 := oAcc.accValue(0)
;Clipboard := vText1 "`r`n" vText2 "`r`n"
Clipboard := "accName: " vText1 "`r`n" "accValue: " vText2 "`r`n"
return

Acc library (MSAA) and AccViewer download links - AutoHotkey Community
https://autohotkey.com/boards/viewtopic.php?f=6&t=26201

Otherwise you could use Internet Explorer and COM.

Thank you.

I am using this:

Code: Select all

MouseClickDrag, L, 481, 197, 630, 197, 50
	SetMouseDelay, 100
	Send, ^c

BUT the 'click' is released before I can ^c the text....

hmmm...

(I have to use Google Chrome for this project)

[jeeswg]

Maybe you can play about with this code to achieve what you want. I'm still having an issue that if LButton is held down, ctrl+c to copy doesn't work, although perhaps this can be resolved.

Code: Select all

q:: ;drag and copy
MouseMove, 481, 197
Send {LButton Down}{Shift Down}
Sleep 100
MouseMove, 630, 197
Sleep 100
Clipboard := ""
Send {LButton Up}{Shift Up}^c
ClipWait, 3
MsgBox, % Clipboard
return

[EDIT:] I'm not sure why I thought Shift was necessary, [EDIT 2: shift+arrows is needed to select text via the keyboard] anyway, this script may actually work for you in its current form:

Code: Select all

q:: ;drag and copy
MouseMove, 481, 197
Send {LButton Down}
MouseMove, 630, 197
Clipboard := ""
Send ^c{LButton Up}
ClipWait, 3
MsgBox, % Clipboard
return

[Almost_there]

If you're using Firefox (haven't tested this on other web browsers) you can jump around between links and other elements on a web site simply by pressing Tab. Then you'll get the normal right-click option using AppsKey. Maybee that works.

[chef423]

Thank you everyone...