Problema risolto Creare Flooder a Pulsanti VB 10

[DeathGun]

Salve a tutti,
sapete dirmi o linkarmi una guida su come creare un flooder a pulsanti con Visual Basic 2010?

Grazie in anticipo.

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Per "a pulsanti" credo che tu intenda che il programma deve inviare la frase premento non un bottone ma un tasto, tipo F1. Per fare questo utilizza il metodo GetAsyncKeyState della libreria user32.dll, per floodare devi usare SendKeys.Send() o SendKeys.SendWait().

GetAsyncKeyState >

Perfavore, Entra oppure Registrati per vedere i Link!

SendKeys.Send() o SendKeys.SendWait() >

Perfavore, Entra oppure Registrati per vedere i Link!

Ciao.

NB: La discussione va in Assistenza Tecnica, segnalo.

 

[Mirko]

Riferimento: Creare Flooder a Pulsanti VB 10

Sposto.

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Il problema è che mi trova l'errore nella parola GetAsyncKeyState, ed ho impostato tutto correttamente..l'interval è a 100.


Errore 'GetAsyncKeyState' non dichiarato. Non è accessibile a causa del livello di protezione.

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Incolla il codice che hai scritto.

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

No niente, avevo sbagliato a inserire..solo ora quando clicco su ON mi dice questo:

Una chiamata alla funzione PInvoke 'NomeProgramma !nome_del_programma::GetAsyncKeyState' ha sbilanciato lo stack. Questo problema può verificarsi quando la firma PInvoke gestita non corrisponde alla firma di destinazione non gestita. Verificare che la convenzione di chiamata e i parametri della firma PInvoke corrispondano alla firma di destinazione non gestita.

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Posti cortesemente il codice che hai scritto ? :l

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Ok, Calmo...
Ho seguito due guide..ecco il codice

Perfavore, Entra oppure Registrati per vedere i codici!

Se è tutto sbagliato non ti arrabbiare :paura: @System32

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Il GetAsyncKeyState devi dichiararlo come "pubblico", così : Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Codice sostituito. @System32.
Ora però continua a darmi l'errore che ti ho riportato sopra.

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Importa questo > Imports System.Runtime.InteropServices

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Dove lo dovrei inserire?

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Prima di Public Class Form2 : gli Imports vanno sempre messi prima di TUTTO il codice.

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Fatto..Stesso Errore, il programma (il Debug) si blocca e mi porta alla stringa:

If GetAsyncKeyState(Keys.F2) Then SendKeys.Send(TextBox1.Text)

e trova l'errore su Then

 

[System32]

Riferimento: Creare Flooder a Pulsanti VB 10

Manca End If.

 

[DeathGun]

Riferimento: Creare Flooder a Pulsanti VB 10

Grazie @System32! Segnalo Per problema risolto..ti alzo rep.
--------------- AGGIUNTA AL POST ---------------
Grazie @System32! Segnalo Per problema risolto..ti alzo rep.

 

[Lore.]

Riferimento: Creare Flooder a Pulsanti VB 10

Segnalo per problema risolto.

Grazie @System32! Segnalo Per problema risolto..ti alzo rep.
--------------- AGGIUNTA AL POST ---------------
Grazie @System32! Segnalo Per problema risolto..ti alzo rep.

 

[Elio]

Riferimento: Creare Flooder a Pulsanti VB 10

Bene, chiudo e rinomino.