Would you like to purchase offers that may only have the new registered?
now even if you are lv 20 you can buy
Just type your DOSID and YOUR SERVER and you will be redirected to the purchase page (BUG)
The booster (exp-quest) bugpoint Fixed do not buy it
Itīs nothing new and I tryed it with the quest booster. I lost the money but didnīt recieved it and support said it is because Iīm higher than level x. I tryed it with a level 12 ship. So itīs not useful...
you can get there easier and safter without such a progranmm, too, and the offers donīt work. Youīll lose your money. I tryed with Quest Booster and someone tryed it with american goli design
you can get there easier and safter without such a progranmm, too, and the offers donīt work. Youīll lose your money. I tryed with Quest Booster and someone tryed it with american goli design
I believe that the offers do not work for level 4 but the rest should work
Option Explicit On
Public Class Form1
Private diff As Point
Public Sub New()
InitializeComponent()
End Sub
Private Sub picturebox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
'evento: pressione del tasto sinistro del mouse
diff = New Point(-e.X, -e.Y) 'assegna a diff, la posizione del mouse (X; Y)
End Sub
Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
'evento: movimento del mouse
If e.Button = MouseButtons.Left Then 'se il tasto č il sinistro...
Dim mouse_loc As Point = Control.MousePosition
mouse_loc.Offset(diff.X, diff.Y)
Me.Location = mouse_loc 'assegna le coordinate alla posizione del form
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=1&dosid=" + TextBox2.Text)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=2&dosid=" + TextBox2.Text)
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=3&dosid=" + TextBox2.Text)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=4&dosid=" + TextBox2.Text)
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=5&dosid=" + TextBox2.Text)
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=6&dosid=" + TextBox2.Text)
End Sub
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=7&dosid=" + TextBox2.Text)
End Sub
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
Process.Start("http://" + TextBox1.Text + ".darkorbit.bigpoint.com/indexInternal.es?action=internalPayment&subaction=showDynamicItem&type=SPECIALOFFER&itemID=8&dosid=" + TextBox2.Text)
End Sub
Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
Process.Start("http://www.elitepvpers.com/forum/members/2564797-cane3.html")
End Sub
Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
Me.Close()
End Sub
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
End Sub
End Class