sendkey usage

[sendkey]

Can anyone tell me sendkey usage?

 

[TheOtherKiwi]

WshShell.Sendkeys keys

or

WshShell.SendKeys("10&quot

to type 10

easy eh?

remember

Shift is {+}
Ctrl is {^}
Alt is {%}

 

[Guest_imported]

I am after the same thing as "Sendkey"... see question submitted today!
I tried your solution in the following way but it didn't work:
sub eften()
if gms.lbuttonup then
WshShell.Sendkeys("{F10}&quot
else
exit sub
end if
end sub

The error given was a runtime:
"object required: 'WshShell' (errcode=0x01A8)

I am sure that this all points to my poor understanding of some VBScript basics, but any help would be appreciated.

 

[GlennBSI]

Neil,

I'm not totally sure this is the correct object, but what you're missing is the instantiation of the object that does the sendkeys.

sub eften()
   dim objShell

   set objShell = CreateObject("wscript.shell")
   if gms.lbuttonup then
      objShell.Sendkeys("{F10}")
   else
      exit sub
   end if
end sub

 

[Guest_imported]

Glen,
thanks, I think I'm getting closer...
The response is still a run-time error, but it is now:

Type mismatch 'SendKeys' (errcode = 0x000D)

..Any suggestions

..Neil