AutoClicker

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Bang.

    AutoClicker

    Moin,

    ich habe ein AutoClicker erstellt , aber es kommt eine Fehlermeldung beim Starten denn Programms !

    Wenn ich auf denn Start Button gehe bei Linksklick sowie bei Rechtsklick kommt diese Fehlermeldung :

    Brainfuck-Quellcode

    1. Informationen über das Aufrufen von JIT-Debuggen
    2. anstelle dieses Dialogfelds finden Sie am Ende dieser Meldung.
    4. ************** Ausnahmetext **************
    5. System.DllNotFoundException: Die DLL "user": Das angegebene Modul wurde nicht gefunden. (Ausnahme von HRESULT: 0x8007007E) kann nicht geladen werden.
    6. bei AutoClicker_1._0.Form1.Mausklick(Int64 dwflags, Int64 dx, Int64 dy, Int64 cbuttons, Int64 dwExtraInfo)
    7. bei AutoClicker_1._0.Form1.RechtsklickSimulation() in C:\Users\Saitek\AppData\Local\Temporary Projects\AutoClicker 1.0\Form1.vb:Zeile 9.
    8. bei AutoClicker_1._0.Form1.Timer1_Tick(Object sender, EventArgs e) in C:\Users\Saitek\AppData\Local\Temporary Projects\AutoClicker 1.0\Form1.vb:Zeile 19.
    9. bei System.Windows.Forms.Timer.OnTick(EventArgs e)
    10. bei System.Windows.Forms.Timer.TimerNativeWindow.WndProc(Message& m)
    11. bei System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
    14. ************** Geladene Assemblys **************
    15. mscorlib
    16. Assembly-Version: 4.0.0.0.
    17. Win32-Version: 4.0.30319.1 (RTMRel.030319-0100).
    18. CodeBase: file:///C:/Windows/Microsoft.NET/Framework/v4.0.30319/mscorlib.dll.
    19. ----------------------------------------
    20. AutoClicker 1.0
    21. Assembly-Version: 1.0.0.0.
    22. Win32-Version: 1.0.0.0.
    23. CodeBase: file:///C:/Users/Saitek/Documents/Visual Studio 2010/Projects/AutoClicker 1.0/AutoClicker 1.0/bin/Debug/AutoClicker 1.0.exe.
    24. ----------------------------------------
    25. Microsoft.VisualBasic
    26. Assembly-Version: 10.0.0.0.
    27. Win32-Version: 10.0.30319.1 built by: RTMRel.
    28. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic/v4.0_10.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll.
    29. ----------------------------------------
    30. System
    31. Assembly-Version: 4.0.0.0.
    32. Win32-Version: 4.0.30319.1 built by: RTMRel.
    33. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System/v4.0_4.0.0.0__b77a5c561934e089/System.dll.
    34. ----------------------------------------
    35. System.Core
    36. Assembly-Version: 4.0.0.0.
    37. Win32-Version: 4.0.30319.1 built by: RTMRel.
    38. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Core/v4.0_4.0.0.0__b77a5c561934e089/System.Core.dll.
    39. ----------------------------------------
    40. System.Windows.Forms
    41. Assembly-Version: 4.0.0.0.
    42. Win32-Version: 4.0.30319.1 built by: RTMRel.
    43. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms/v4.0_4.0.0.0__b77a5c561934e089/System.Windows.Forms.dll.
    44. ----------------------------------------
    45. System.Drawing
    46. Assembly-Version: 4.0.0.0.
    47. Win32-Version: 4.0.30319.1 built by: RTMRel.
    48. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Drawing/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll.
    49. ----------------------------------------
    50. System.Runtime.Remoting
    51. Assembly-Version: 4.0.0.0.
    52. Win32-Version: 4.0.30319.1 (RTMRel.030319-0100).
    53. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Remoting/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll.
    54. ----------------------------------------
    55. mscorlib.resources
    56. Assembly-Version: 4.0.0.0.
    57. Win32-Version: 4.0.30319.1 (RTMRel.030319-0100).
    58. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/mscorlib.resources/v4.0_4.0.0.0_de_b77a5c561934e089/mscorlib.resources.dll.
    59. ----------------------------------------
    60. System.Windows.Forms.resources
    61. Assembly-Version: 4.0.0.0.
    62. Win32-Version: 4.0.30319.1 built by: RTMRel.
    63. CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms.resources/v4.0_4.0.0.0_de_b77a5c561934e089/System.Windows.Forms.resources.dll.
    64. ----------------------------------------
    66. ************** JIT-Debuggen **************
    67. Um das JIT-Debuggen (Just-In-Time) zu aktivieren, muss in der
    68. Konfigurationsdatei der Anwendung oder des Computers
    69. (machine.config) der jitDebugging-Wert im Abschnitt system.windows.forms festgelegt werden.
    70. Die Anwendung muss mit aktiviertem Debuggen kompiliert werden.
    72. Zum Beispiel:
    74. <configuration>
    75. <system.windows.forms jitDebugging="true" />
    76. </configuration>
    78. Wenn das JIT-Debuggen aktiviert ist, werden alle nicht behandelten
    79. Ausnahmen an den JIT-Debugger gesendet, der auf dem
    80. Computer registriert ist, und nicht in diesem Dialogfeld behandelt.




    Hier ist einmal der Code vom Projekt:

    Quellcode

    1. Public Class Form1
    2. Public Declare Sub Mausklick Lib "user32" Alias "mouse_event" (ByVal dwflags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, ByVal dwExtraInfo As Long)
    4. Private Const rechtsklickRunter = &H8
    5. Private Const rechtsklickRauf = &H10
    6. Private Const linksklickRunter = &H2
    7. Private Const linksklickRauf = &H4
    8. Private Sub RechtsklickSimulation()
    9. Mausklick(rechtsklickRunter, 0, 0, 0, 0)
    10. Mausklick(rechtsklickRauf, 0, 0, 0, 0)
    11. End Sub
    12. Private Sub LinksklickSimulation()
    14. Mausklick(rechtsklickRunter, 0, 0, 0, 0)
    15. Mausklick(rechtsklickRauf, 0, 0, 0, 0)
    16. End Sub
    18. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    19. RechtsklickSimulation()
    20. End Sub
    22. Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
    23. LinksklickSimulation()
    24. End Sub
    26. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    27. Timer1.Enabled = True
    28. Button1.Enabled = False
    29. Button2.Enabled = True
    30. End Sub
    32. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    33. Timer1.Enabled = False
    34. Button1.Enabled = True
    35. Button2.Enabled = False
    36. End Sub
    38. Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    39. Timer2.Enabled = True
    40. Button4.Enabled = True
    41. Button3.Enabled = False
    42. End Sub
    44. Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
    45. Timer2.Enabled = False
    46. Button4.Enabled = False
    47. Button3.Enabled = True
    48. End Sub
    49. End Class


    Ist etwas am Code falsch ?

Facebook
Telefonspende