diverse - Findes der et program... - Udvikleren.dk - Programmering, webdesign og grafik

Tags: diverse

<< < 1 2 3 > >>

Bruger #11155 @ 17.01.07 12:22

Findes der et program, som kan lave en lille .exe fil. Altså hvis vi nu siger at jeg har et program som kan lave andre slags "små" programmer altså:

Det her er bare et eksempel, til et program fx. "Fake hits"

Fake hits:

1) Venter 5 Sekunder
2) Åbner automatisk 40 IE Expolre Vinduer
3) Venter 15 - 20 Sekunder til at alle vinduer er loaded
4) Lukker alle vinduer
5) Gør det samme igen og igen.

+ inden man starter programmet sætter man sin hjemmeside til Start-side, så kan man tjene mange hits

Forstår i hvad jeg mener?..
- Det håber jeg

30 svar postet i denne tråd vises herunder
2 indlæg har modtaget i alt 6 karma

Sorter efter stemmer Sorter efter dato

Bruger #10377 @ 21.01.07 13:33

Fik du det til at virke?

Eller skal jeg forklare på en anden måde?

Bruger #11155 @ 21.01.07 13:36

Når jeg trykker på "F5" Siger den:

Error while trying to run project: Unable to start debugging
Ugyldig bindingshandle.

Jeg kan jo evt. lige skrive min kode til dig:

Kode

Public Class Form1

    Dim x As Integer = 0
    Dim i As Integer = 0
    Dim WithEvents Timer As New System.Windows.Forms.Timer
    Dim WithEvents MainTimer As New System.Windows.Forms.Timer

    Sub aabn_hjemmeside()
        Dim url_til_hjemmeside As String = Me.TextBox1.Text
        Dim antal_ie_der_skal_aabnes As Integer = Me.NumericUpDown1.Value
        Dim i As Integer
        For i = 1 To antal_ie_der_skal_aabnes
            System.Diagnostics.Process.Start("iexplore.exe", url_til_hjemmeside)
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If CheckBox1.Checked = True Then
            Me.Timer.Start()
            Me.MainTimer.Start()
            Call aabn_hjemmeside()
        ElseIf CheckBox1.Checked = False Then
            Call aabn_hjemmeside()
            Me.Timer.Start()
        End If
    End Sub

    Private Sub Timer_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer.Tick
        x = x + 1
        Dim antal_sekunder_der_skal_gaa_foer_vinduerne_lukkes As Integer = Me.NumericUpDown2.Value
        If x = antal_sekunder_der_skal_gaa_foer_vinduerne_lukkes Then
            Dim arrProcess As Array = System.Diagnostics.Process.GetProcesses()
            Dim y As Integer
            For y = LBound(arrProcess) To UBound(arrProcess)
                If arrProcess(y).MainWindowTitle.Contains("Internet Explorer") Then
                    arrProcess(y).Kill()
                End If
            Next
            Me.Timer.Stop()
            x = 0
        End If
    End Sub

    Private Sub MainTimer_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles MainTimer.Tick
        i = i + 1
        If i = Me.NumericUpDown5.Value Then
            Call aabn_hjemmeside()
            Me.Timer.Start()
            i = 0
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Timer.Interval = 1000
        Me.MainTimer.Interval = 1000
    End Sub
End Class

Bruger #11155 @ 21.01.07 13:39

Nu er din kode væk fra formuet

Bruger #11155 @ 21.01.07 13:41

Den siger det her:

Error 1 'NumericUpDown5' is not a member of 'WindowsApplication1.Form1'. C:\\Documents and Settings\\Mattias Game\\My Documents\\Visual Studio 2005\\Projects\\WindowsApplication1\\WindowsApplication1\\Form1.vb 46 16 WindowsApplication1

Bruger #11155 @ 21.01.07 13:42

Ohhh.. Kan du ikke lige sende mig koden igen?.

Tror godt jeg ved hvad der er galt!

Bruger #11155 @ 21.01.07 13:44

Nå, nu har jeg fundet koden igen...

Men den siger stadig den der fejl:

Error while trying to run project: Unable to start debugging
Ugyldig bindingshandle.

Bruger #10377 @ 21.01.07 13:45

Hm, det lyder mærkeligt. Prøv at genstarte programmet og lave et HELT nyt projekt. Tilføj så de nødvendige controls. Slet ALT i kodefeltet og indsæt så koden.
Hvis ikke dette virker, så hit med din msn, så sender jeg hele projektet til dig.

Mvh.
Claus Thomsen

Bruger #11155 @ 21.01.07 13:49

Jeg har prøvet at re starte programmet... Men det virker ikke.. Men tusind tak fordi du vil hjælpe mig direkte

__________________________
MSN= Mattias@fjellvang.dk
^^^^^^^^^^^^^^^^^^^^^^^^^^

Bruger #10377 @ 21.01.07 13:50

Jeg kan se du også har ændre i koden. Det skal du IKKE!

Bruger #11304 @ 04.02.07 20:30

fint nok men jeg har et program som hedder
bittorrent du kan dawnload det på
www.theo-online.dk/dawnload.htm

Kode

det her er et godt program

<< < 1 2 3 > >>

Findes der et program...

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler