Hi Cesar,
I wrote the following module a while back for some simple SENDKEYS type useage. It's pretty simple to understand and you can extend it as you need. Hope this helps.
LPARAMETERS pcCommands
DECLARE keybd_event IN Win32API INTEGER KeyCode, INTEGER Scan, LONG dwFlags, LONG dwExtraInfo
#DEFINE KEYDOWN 0
#DEFINE KEYUP 1
LOCAL lcCommands
lcCommands = UPPER(pcCommands)
DO CASE
CASE lcCommands == "{ENTER}"
keybd_event(13, 0, KEYDOWN, 0)
OTHERWISE
keybd_event(ASC(lcCommands), 0, KEYDOWN, 0)
ENDCASE
________________________
Ben Santiago, MCP & A+
Programmer Analyst (SQL, FoxPro, VB, VB.Net, Java, HTML, ASP, JSP, VBS)
Eastern Suffolk BOCES - Student Data Services
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning.
-Rich Cook
