17-10-12, 06:54 PM
كاتب الموضوع : DreamsDotNet
نحمده ونصلي على رسوله الكريم
قد نحتاج في بعض الأحيان التعامل مع تطبيق أو برنامج خارجي، لعمل ذلك:
قد نحتاج في بعض الأحيان التعامل مع تطبيق أو برنامج خارجي، لعمل ذلك:
Shell:
Process:
كود :
Dim procID As Integer = Shell("CALC.EXE", AppWinStyle.NormalFocus)
AppActivate(ProcID)
My.Computer.Keyboard.SendKeys("22", True)
My.Computer.Keyboard.SendKeys("*", True)
My.Computer.Keyboard.SendKeys("44", True)
My.Computer.Keyboard.SendKeys("=", True)
كود :
Dim procId As System.Diagnostics.Process = System.Diagnostics.Process.Start _
("notepad.exe")
procId.WaitForInputIdle(1000)
AppActivate(procId.Id) 'Or AppActivate("Untitled - Notepad")
My.Computer.Keyboard.SendKeys("http://", True)
My.Computer.Keyboard.SendKeys("www.", True)
My.Computer.Keyboard.SendKeys("vb4arab.", True)
My.Computer.Keyboard.SendKeys("com/", True)
My.Computer.Keyboard.SendKeys("vc", True)
My.Computer.Keyboard.SendKeys("{bs}", True)
My.Computer.Keyboard.SendKeys("b", True)
My.Computer.Keyboard.SendKeys("~", True)
الأوامر التي يمكن إرسالها كالآتي:
كود :
[color=red]Key[/color] [color=blue]Code[/color]
[color=red]BACKSPACE[/color] [color=blue]{BACKSPACE} or {BS}[/color]
[color=red]BREAK[/color] [color=blue]{BREAK}[/color]
[color=red]CAPS LOCK[/color] [color=blue]{CAPSLOCK}[/color]
[color=red]CLEAR[/color] [color=blue]{CLEAR}[/color]
[color=red]DELETE[/color] [color=blue]{DELETE} or {DEL}[/color]
[color=red]DOWN ARROW[/color] [color=blue]{DOWN}[/color]
[color=red]END[/color] [color=blue]{END}[/color]
[color=red]ENTER (numeric keypad) [/color][color=blue]{ENTER}[/color]
[color=red]ENTER[/color] ~
[color=red]ESC[/color] [color=blue]{ESCAPE} or {ESC}[/color]
[color=red]HELP[/color] [color=blue]{HELP}[/color]
[color=red]HOME[/color] [color=blue]{HOME}[/color]
[color=red]INS[/color] [color=blue]{INSERT}[/color]
[color=red]LEFT ARROW [/color][color=blue]{LEFT}[/color]
[color=red]NUM LOCK[/color] [color=blue]{NUMLOCK}[/color]
[color=red]PAGE DOWN [/color][color=blue]{PGDN}[/color]
[color=red]PAGE UP[/color] [color=blue]{PGUP}[/color]
[color=red]RETURN[/color] [color=blue]{RETURN}[/color]
[color=red]RIGHT ARROW[/color] [color=blue]{RIGHT}[/color]
[color=red]SCROLL LOCK[/color] [color=blue]{SCROLLLOCK}[/color]
[color=red]TAB[/color] [color=blue]{TAB}[/color]
[color=red]UP ARROW[/color] [color=blue]{UP}[/color]
[color=red]F1 through F15[/color] [color=blue]{F1} through {F15}[/color]
قبل أي سؤال، قم بعمل مشروع لتطبيق الكودات أعلاه، حتى تتضح الفكرة.
بالتوفيق....
بالتوفيق....