So ... da ich mein Paint iwie gelöscht habe (Durch den Fucking .Polip virus, war infected -.-) , habe ich mir ein Eigenes Screenshot Programm gecodet.Es ist noch in der Beta Phase, es kann Das aktive Fenster Screenen , und zwar mit S , es kann den kompletten Bildschirm screenen , mit dem Button , oder B , es kann den Screen löschen (ist nach Screenen empfohlen, denn es wird buggy , und er verdoppelt dic ...
Verfasst am: 19.08.2007, 17:47 Aufrufe: 1014
Wo ist der Fehler? Ich sehe nur deinen Code.
Verwende mal den Code hier anstatt deinen
Dim i As Integer
Dim dateiname As String
For i = 1 To 10000 Step 1
dateiname = "noob" & i & ".txt"
Dim streamw As New StreamWriter(dateiname)
streamw.WriteLine("OMG Fucking N00B!...")
streamw.WriteLine("you must...&q ...
Verfasst am: 19.08.2007, 08:09 Aufrufe: 1014
txt"
Dim Anzahl As Integer
If My.Computer.Filesystem.FileExists(FILE_NAME) Then
FILE_NAME = "N000B" & Anzahl & ".txt"
End If
Using sw As StreamWriter = File.CreateText(FILE_NAME)
sw.WriteLine("OMG Fucking N00B! Do You Know, that its illegal to Download Files from 3.dl.am that is your abuse !")
sw.WriteLine("You Must Lea ...
[ Time: 6.6556s ][ Queries: 59 (6.5870s) ][ GZIP on - Debug on ]