Zum Inhalt wechseln

Als Gast hast du nur eingeschränkten Zugriff!


Anmelden 

Benutzerkonto erstellen

Du bist nicht angemeldet und hast somit nur einen sehr eingeschränkten Zugriff auf die Features unserer Community.
Um vollen Zugriff zu erlangen musst du dir einen Account erstellen. Der Vorgang sollte nicht länger als 1 Minute dauern.

  • Antworte auf Themen oder erstelle deine eigenen.
  • Schalte dir alle Downloads mit Highspeed & ohne Wartezeit frei.
  • Erhalte Zugriff auf alle Bereiche und entdecke interessante Inhalte.
  • Tausche dich mich anderen Usern in der Shoutbox oder via PN aus.
 

   

Foto

Java TextBox

- - - - -

  • Bitte melde dich an um zu Antworten
Keine Antworten in diesem Thema

#1
<Kevin>

<Kevin>

    Pentester

  • Premium Member
  • Likes
    11
  • 104 Beiträge
  • 6 Bedankt
  • Android
  • Windows
Hallo.

Und zwar geht es um eine Java TextBox, in die ich gerne
einen Text senden möchte und absenden möchte (mit Enter).

Es handelt sich um eine RichEdit20W Box, die Klasse ist SunAwtFrame.

Der Text landet zwar in der Box, aber das Absenden mit Enter funktioniert irgendwie nicht.
Bis vor ein paar Monaten hat es noch funktioniert, aber anscheinend hat sich da etwas geändert.


Folgenden Code habe ich derzeit:

Class JavaTextBox
        <DllImport("User32.Dll")> Private Shared Function FindWindow(lpClassName As String, lpWindowName As String) As IntPtr
        End Function
        <DllImport("User32.Dll")> Private Shared Function FindWindowEx(parentHandle As IntPtr, childAfter As IntPtr, className As String, windowTitle As IntPtr) As IntPtr
        End Function
        <DllImport("User32.Dll")> Private Shared Function SendMessage(hWnd As IntPtr, Msg As UInt32, wParam As IntPtr, lParam As String) As IntPtr
        End Function
        <DllImport("User32.Dll")> Private Shared Function SendMessage(hWnd As IntPtr, Msg As Integer, wParam As Integer, lParam As StringBuilder) As Integer
        End Function
        <DllImport("User32.Dll")> Private Shared Function PostMessage(hWnd As Integer, msg As UInteger, wParam As UInteger, lParam As Integer) As IntPtr
        End Function
        <DllImport("User32.Dll")> Private Shared Function PostMessage(hWnd As Integer, msg As UInteger, wParam As UInteger, lParam As UInteger) As IntPtr
        End Function
        Public Shared Sub Send(Text As String)
            Dim Name As String = String.Empty
            Name = Process.GetProcesses.Single(Function(c) c.MainWindowTitle.ToLower.Contains("ch")).MainWindowTitle
            Dim Hwndd As IntPtr = FindWindow("SunAwtFrame", Name)
            Hwndd = FindWindowEx(Hwndd, IntPtr.Zero, "RichEdit20W", IntPtr.Zero)
            SendMessage(Hwndd, CInt(&HC), IntPtr.Zero, Text) 'SETTEXT
            SendMessage(Hwndd, CUInt(&H7), CType(1048576, IntPtr), String.Empty) 'SETFOCUS
            Thread.Sleep(10)
            PostMessage(CInt(Hwndd), CUInt(&H100), &HD, &H1C0001) 'WM_KEYDOWN
            PostMessage(CInt(Hwndd), CUInt(&H102), &HD, &H1C0001) 'WM_CHAR
            Thread.Sleep(10)
            PostMessage(CInt(Hwndd), CUInt(&H101), CUInt(&HD), CUInt(&HC01C0001UI)) 'KEYUP
            SendMessage(Hwndd, CUInt(&H8), CType(1048576, IntPtr), String.Empty) 'KILLFOCUS
        End Sub
    End Class
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        JavaTextBox.Send("Hallo")
    End Sub

Hier Infos zur Box, vielleicht kann mir ja jemand was dazu sagen.

Eingefügtes Bild



  Thema Forum Themenstarter Statistik Letzter Beitrag

Besucher die dieses Thema lesen:

Mitglieder: , Gäste: , unsichtbare Mitglieder:


This topic has been visited by 22 user(s)


    <Kevin>, Alexxy, Ar@m!s, BlackZetsu, confick.ini, Cube, Emalik Xantier, Framerater, jabba, kiwitone, Laggy, lion., lolorollo, mauzzz, nischke, paulaner, peppi200, Pokschubin, R3s1stanc3, RazoR', Slixer, zepsus
Die besten Hacking Tools zum downloaden : Released, Leaked, Cracked. Größte deutschsprachige Hacker Sammlung.