Keyboard recorder

Status
Niet open voor verdere reacties.

raymondhvh

Gebruiker
Lid geworden
31 okt 2008
Berichten
131
Hallo ik ben raymond
ik had een vraage aan julie hier omdat ik bezig ben in vb2008 om een progamma
te maken die eerst opneemd wat ik typ en daarna weer terug kan type
dat is normaal heel makelijk maar niet in mij situatie want ik wil dit namelijk voor en race spel

en daar houd je de keys ingedrukt waardoor er BVB
een hele lange text komt met WWWW omdat ik vooruit rij
nou is mij probleem hoe maak ik dat zo dat die het record en ook ingedrukt houd bij het typen zodat het progamma voor mij rijd

en als dat niet kan hadi k zoon code als deze in gedachten
Code:
SendKeys.Send("w", 5000)
maar dan heb ik de error:
Too many arguments to 'Public Shared Sub Send(keys As String)'.

kan eimand mij vertellen hoe ik de pc knopjeslaat indrukken voor en bepaalde tijd en dan 1 voor 1 en niet alles in 1 keer



de code die ik nou heb maar veel errors geef zo als : kan hook niet maken en nog meer
( als ik in het spel de code van typen activeer)
Code:
Public Class Form1

    Dim result As Integer
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

    


    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        For i = 1 To 255
            result = 0
            result = GetAsyncKeyState(i)
            If result = -32767 Then
                RichTextBox1.Text = RichTextBox1.Text + Chr(i)
            End If
        Next i
    End Sub

    
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        RichTextBox1.Text = ("")
        Timer1.Start()
        Button3.Show()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer2.Enabled = True
    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        SendKeys.Send(RichTextBox1.Text)
        Timer2.Enabled = False
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Stop()
        Button3.Hide()
    End Sub
Super Topie als eimand mij daarmee kan helpen
Ik heb dit proggammatje wel voor de muis
die record de muis en de muis cliks nou moet ik ongeveer zo een en dan als toetsenbord


Download muis auto clicker& beweeger :
http://www.mediafire.com/download.php?aydzngydewn
 

Bijlagen

Laatst bewerkt door een moderator:
Ik heb op dit moment geen oplossing maar ik wil wel even zeggen dat ik jouw proggy verdraaid handig vind!

Ik zou het inderdaad ook kunnen gebruiken voor een aantal games.

Ik zou willen voorstellen om onze krachten te bundelen, misschien komen we er dan wel uit. Aan de executable te zien, heb je dit gemaakt in Visual Basic 6, ik gebruik Visual Basic .NET, dat veel nieuwer is. Daar moeten we een oplossing voor vinden.

En nog iets, als je je proggy een professionele uitstraling wilt geven, zou ik beginnen met foutloos Engels te typen. Ik wil die taak wel op me nemen, als je zou willen.

Voor betere communicatie, kan je me mailen: mdw[dot]breddels1[at]hccnet[dot]nl

Ik hoor het wel.
 
ik kan heb voor jullie wel een code die opneemt wat je typt..
als jullie die willen hebben is dat goed.
 
ik kan heb voor jullie wel een code die opneemt wat je typt..
als jullie die willen hebben is dat goed.

Mijn interesse heb je. :)

Is het niet gemakkelijker om dit met AutoIT te maken?

Geen idee wat AutoIt is, maar als het een onderdeel is van .NET en het is een beetje makkelijk te gebruiken, dan is het misschien wat.
 
autoit is mij te moelijk

en de code om wat je intypt te herkennen heb ik ook
maar niet voor hoelang je het indrukt en het afspelen:shocked:
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan