Type Clipboard contents

[sb1920alk]

I'm trying to make a hotkey (Ctrl-Shift-v) to type the contents of the clipboard for use in situations where a traditional "paste" doesn't work for whatever reason. The problem I'm having is that the script seems to break my regular shift and ctrl keys, as if they're stuck down. I have to exit the script and press and release the "stuck" keys to fix it. Any ideas? Here is the script:

;Set Hotkey of Ctrl-Shift-V to type clipboard text.
;Useful for situations that don't permit traditional pasting
#include <Clipboard.au3>
HotKeySet("+^v", "TypeClipText")
HotKeySet("{ESC}", "Terminate")

While 1
Sleep(100)
WEnd


Func TypeClipText()
$Text = ClipGet ( )
Send($Text,1)
EndFunc

Func Terminate()
Exit 0
EndFunc ;==>Terminate

[PhoenixXL]

This is a possible workaround

#include <WinapiEx.au3>
#include <Misc.au3>

Global $iReset = 1
HotKeySet("+^v", "TypeClipText")
HotKeySet("{ESC}", "Terminate")

While 1
Sleep(100)
WEnd


Func TypeClipText( )
$Text = ClipGet()
Send($Text, 1)
If Not $iReset Then Return
Local $string
If _IsPressed( '11' ) Then $string = '{CTRLUP}'
If _IsPressed( '10' ) Then $string &= '{SHIFTUP}'
If _IsPressed( '12' ) Then $string &= '{ALTUP}'
Send( $string )
EndFunc   ;==>TypeClipText

Func Terminate()
Exit 0
EndFunc   ;==>Terminate

Thumbs up if it helped

[sb1920alk]

Sorry, I'm having the same issue with that change.

[PhoenixXL]

From the WIki

;Set Hotkey of Ctrl-Shift-V to type clipboard text.
;Useful for situations that don't permit traditional pasting
#include <Clipboard.au3>
HotKeySet("+^v", "TypeClipText")
HotKeySet("{ESC}", "Terminate")

While 1
Sleep(100)
WEnd


Func TypeClipText()
$Text = ClipGet()
ControlSend("", "", "", $Text, 0)
EndFunc   ;==>TypeClipText

Func Terminate()
Exit 0
EndFunc   ;==>Terminate

Does this help ?