11-10-12, 03:04 PM
عاوز يبعت send بى اسم qwer.txt منغير مكتب Notepad
كود :
Interaction.AppActivate("qwer.txt")
My.Computer.Keyboard.SendKeys("Q")
My.Computer.Keyboard.SendKeys("w")
My.Computer.Keyboard.SendKeys("e")
My.Computer.Keyboard.SendKeys("r")