CTRL&V failure rate ~ 1 in 15

[JayHawkfl]

I wrote a program to automate the tickets at the office. My problem is, I'm using ClipPut to make the process faster, and 1 in every 10 to 15 lines it pastes I just get a letter "v" or, I get what ever is in the users clipboard at that moment. The reason that is such a large issue is sometimes the program could need to put out 30 lines of text, and if the program throws bad text the user will have to 1 notice and 2 go reenter their parameters. I'll list my attempts in the code box.

Func SendFast($ClipVar)
    $UserClipBoard = ClipGet()
    ClipPut($ClipVar)
    Send("{CTRLDOWN}")
    Send("v")
    Send("{CTRLUP}")
    Send("{ENTER}")
    ClipPut($UserClipBoard)
EndFunc

Func SendFast($ClipVar)
    $UserClipBoard = ClipGet()
    ClipPut($ClipVar)
    Send("{CTRLDOWN}v")
    Send("{CTRLUP}")
    Send("{ENTER}")
    ClipPut($UserClipBoard)
EndFunc

Func SendFast($ClipVar)
    $UserClipBoard = ClipGet()
    ClipPut($ClipVar)
    Send("^v")
    Send("{ENTER}")
    ClipPut($UserClipBoard)
EndFunc 

Is there a more reliable way to send the paste command?
 

Edited April 14, 2014 by JayHawkfl

[FireFox]

Is there a more reliable way to send the paste command?

ControlSetText.

[JayHawkfl]

I've been running hardware calls all day. I'll try this the next time I get a minute. Thank you for the quick responce

[BigDod]

Try sending shift + insert

[FireFox]

Try sending shift + insert

Hotkey is a hotkey, that won't change anything.

[JohnOne]

Func SendFast($ClipVar)
    $iSleep = 10
    $UserClipBoard = ClipGet()
    Do
        ClipPut($ClipVar)
    Until ClipGet() = $ClipVar
    Send("^v")
    Sleep($iSleep)
    Send("{ENTER}")
    Do
        ClipPut($UserClipBoard)
    Until ClipGet() = $UserClipBoard
EndFunc   ;==>SendFast

[nitekram]

Func SendFast($ClipVar)
    $iSleep = 10
    $UserClipBoard = ClipGet()
    Do
        ClipPut($ClipVar)
    Until ClipGet() = $ClipVar
    Send("^v")
    Sleep($iSleep)
    Send("{ENTER}")
    Do
        ClipPut($UserClipBoard)
    Until ClipGet() = $UserClipBoard
EndFunc   ;==>SendFast

 

I am not sure I understand this, but it has been a long day.

Are you just grabbing the clipboard to begin with, and then putting the clipped data back into the clipboard?

[JohnOne]

Yes, but I have know ClipPut to fail which is why it's in a loop.

Of course it only works with text, but that's the way the OP had it.

Edited April 14, 2014 by JohnOne

[nitekram]

Thanks, I have seen it fail in my scripts, so I just reran the hotkey, I will now add this bit to my code, so it will not fail next time - we hope.