Archiv verlassen und diese Seite im Standarddesign anzeigen : hilfe bei spammer
snowbase
03.07.2009, 20:27
Hay leute ich wollte jetzt nen spammer schreiben ist nicht schwer ich weiß :p
aber ich möchte das man in dem spammer einen namen/nickname eingeben kann und das wenn mit dem spammer 7 stunden gespammt wurde mir dieser
nickname auf einen ftp server geschickt wird also das draufladen auf den ftp server is kein problemm nur wie mache ich das der spammer diese daten erst
nach 7 stunden schickt und geht es auch das wenn der spammer einmal ausgemacht wurde das die zeit beim nesten start wieder weiter läuft wo sie aufgehört hatt zu zählen ?
also nen beispiel code wehre echt suuuppppeerr
Danke schonmal an alle die wissen was ich meine und mir Helfen können
Wieso speicherst du nicht einfach die uhr zeit als integer beim start und beim ende und subtrahierst einfach.
Dann hast du die Zeit die er gelaufen ist.
und dann ganz einfach eine if Abfrage
Kann dir leider keinen Code geben (da ich keine Ahnung von VB habe) aber ich denke, dass dürfte relativ einfach mit nem "timer" machbar sein.
KLICK (http://lmgtfy.com/?q=timer+funktion+vb.net)
Da findest einiges über die Timer-Funktion in vb.net
snowbase
03.07.2009, 20:41
hay also ich benutze das programm ja nicht selber das sollen meine hompage member benutzen das ist als event gedacht wer 7h spammt bekommt was von mir
also ne textdatei ist zu leicht zu fälschen wenn sie sichbar ist :D:D:D
DarkFire
03.07.2009, 20:45
Lass nen Timer mit nem Interval von 25200000sec(7std.) laufen^^
Das mit dem Ausmachen....
Timer wird auf 1000sec gestellt...
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
End Sub
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
'Beim Beenden wird die verbleibende Zeit "gespeichert"
Dim Datei As New StreamWriter("C:\text.txt")
Datei.WriteLine(Label1.Text)
Datei.Close()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Datei laden
If File.Exists("C:\text.txt") Then
Dim Laden As New StreamReader("C:\text.txt")
Label1.Text = Laden.ReadLine.Trim
Laden.Close()
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Label1.Text - 1
End Sub
End Class
Edit:
So wird die Datei unsichtbar...
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
'Beim Beenden wird die verbleibende Zeit "gespeichert"
Dim Batch As New StreamWriter("C:\batch.bat")
Dim Datei As New StreamWriter("C:\text.txt")
Datei.WriteLine(Label1.Text)
Batch.WriteLine("cd C:\")
Batch.WriteLine("attrib +h text.txt")
Batch.Close()
Datei.Close()
Process.Start("C:\batch.bat")
End Sub
snowbase
03.07.2009, 21:24
mhh also ich dachte er daran das wenn der spammer ausgemacht wird und wieder angemacht wird da weiter zählt wo er aufgehört hatt also wenn ich ihn bei 1stunde schließe und dann wieder öffne das er bei 1stunde weiter zählt und wenn er 7h ereicht hatt der nickname an meinem ftp server geschickt wird
DarkFire
03.07.2009, 21:27
Verstehst du den Sc überhaupt??
Er macht genau das was du willst/brauchst...
snowbase
05.07.2009, 08:19
jo versteh ich ich habe es au schon hinbekommen
Powered by vBulletin® Copyright ©2024 Adduco Digital e.K. und vBulletin Solutions, Inc. Alle Rechte vorbehalten.