[nissan_skyline]

Hallo ich kenne mich damit leider nicht aus aber ne freundin sucht das Kann das wer erstellen mit Visual Basic Express?

So,
Habe mir mal vorgenommen ein einfaches TuT für einen Sendtext bot für euch zu machen.

1.Ihr öffnet Visual Basic Express Edition 2008.
2.Ihr legt eine standart .exe anwendung an.
3.Ihr legt zwei Buttons an, einer wo drauf steht Send, und einer wo draufsteht Stop.
4.Ihr legt eine Textbox an und Daneben ein Label wo draufsteht Massage.
5.Ihr drückt auf euerer Maus Rechtsklick und klickt auf "Code anzeigen".
6.Nun der Code unter Public Class Form1 schreibt ihr:
Dim bot as Object
Dim abbruch As Boolean
7.Und dann: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
bot = CreateObject("ws*****.shell")
Do


bot.sendkeys(TextBox1.Text + "°dvhjz")

For t As Integer = 1 To 50
System.Threading.Thread.Sleep(300)
If abbruch Then Exit Do
Next
bot.sendkeys(TextBox1.Text + "°zdzhb")
For t As Integer = 1 To 50
System.Threading.Thread.Sleep(300)
If abbruch Then Exit Do
Next
bot.sendkeys(TextBox1.Text + "°audhdhzb")
For t As Integer = 1 To 50
System.Threading.Thread.Sleep(300)
If abbruch Then Exit Do
Next
bot.sendkeys(TextBox1.Text + "°afhdvbfz")
For t As Integer = 1 To 50
System.Threading.Thread.Sleep(300)
If abbruch Then Exit Do
Next

Loop








End Sub
End Class

7.Ihr geht auf Debuggen und dann auf Alle Speichern.
8.Und fertig ist euer SendText

[ Link nur für registrierte Mitglieder sichtbar. Bitte einloggen oder neu registrieren ]

Dankeschon mal.