BGG=ShellExecute (0, "Open", "D: \ SinoTrans exe," vbNullString, vbNullString, 1) '
IOTHER (1.) and Delay 3 seconds Delay 5000 'reboot your system
H (0)=IWINDOW (1). FindWindow (" WindowsForms10. Window. 8. App3 ", "Logon SinoTrans operation system")
H (1)=IWINDOW (1). FindWindowEx (h (0), 0, "WindowsForms10. STATIC. App3", "Login name:")
R=IWINDOW (1). GetWindowRect (h (1))
L=IWINDOW (1). GetWindowCenter (h (1))
H (2)=IWINDOW (1) WindowFromPoint (R - R (0), (2) + L (0), L (1)) 'input account start
IOTHER (1). The Delay of 1000
I=SendMessage (h (2), the WM_SETTEXT, ByVal 0 & amp; End, ByVal chenjin) 'input account
H (3)=IWINDOW (1). WindowFromPoint (R - R (0), (2) + L (0), R (3) - (1) R (1) + L) 'input password to
IOTHER (1). The Delay of 1000
I2=SendMessage (h (3), the WM_SETTEXT, ByVal 0 & amp; , ByVal laizi7021) 'end of the input password
H (4)=IWINDOW (1). FindWindowEx (h (0), 0, "WindowsForms10. BUTTON. App3", "Login")
IOTHER (1). The Delay of 1000
Called IMESSAGE -- (1). LeftButtonDown h (4) 'click the LOGIN button to enter the system
Called IMESSAGE -- (1). LeftButtonUp h (4)
-- -- -- -- -- -- -- -- -- using the API function ShellExecute opens an EXE, successfully opened the login screen, and enter the account number and password, but formal log in
Tip: call target abnormal happens, not the object led | use set to an instance of an object, then checked the because WINDOWS UIPI affected, so I want to ask how to
Add sending messages in the VBA white list, when to open the EXE correctly initialized, thank you,