integer li_rc OleObject ole_wsh ole_wsh = CREATE OleObject li_rc = ole_wsh.ConnectToNewObject ( "WScript.Shell" ) ole_wsh.Run ("Notepad") ole_wsh.AppActivate("Untitled - Notepad") Sleep (500) ole_wsh.SendKeys ("Hola mundo")Pero primero debe declarar la subroutina Sleep
Subroutine Sleep (Long dwMilliseconds) Library "kernel32" Alias for "Sleep"
No hay comentarios:
Publicar un comentario
Nota: solo los miembros de este blog pueden publicar comentarios.