How to fix this?

Welcome to CPAElites - the original incentive CPA affiliate marketing forum online, solely based on "Cost Per Action".

Be a part of something great, join today! Learn CPA marketing with CPAElites, we will teach you everything such as the best CPA networks, CPA offers with highest payouts and best conversion rates, unsaturated CPA niches, most effective traffic sources and more.

LinX

Banned
Well-known member
VIP Legends CPAElites Classic (1.0)
VIP Elites CPAElites Classic (1.0)
Joined
May 12, 2013
Messages
1,411
Reaction score
0
Location
Sweden
Website
www.youtube.com
So i'm trying to make a keygen since i've never tried the keygen niche out.

What i've done:

Custom button .dll format.

So whenever i add it to my Form it works perfectly and it acts as a button aswell.

But when i add this code:
Code:
Textbox1.Enabled = True
Dim Key As Integer
Key = (rnd() *5 )
Select Case Key 
Case 1
Textbox1.text = "Serial Key Here!"
Case 2
Textbox1.text = "Serial Key Here!"
Case 3
Textbox1.text = "Serial Key Here!"
Case 4
Textbox1.text = "Serial Key Here!"
Case 5
Textbox1.text = "Serial Key Here!"
End Select
This happens:
QUeuk4n.png


Any help?

-LinX
 

The_Mentor

Well-known member
VIP Legends CPAElites Classic (1.0)
VIP Elites CPAElites Classic (1.0)
Joined
May 9, 2013
Messages
542
Reaction score
0
Age
41
Location
USA
LinX said:
So i'm trying to make a keygen since i've never tried the keygen niche out.

What i've done:

Custom button .dll format.

So whenever i add it to my Form it works perfectly and it acts as a button aswell.

But when i add this code:
Code:
Textbox1.Enabled = True
Dim Key As Integer
Key = (rnd() *5 )
Select Case Key 
Case 1
Textbox1.text = "Serial Key Here!"
Case 2
Textbox1.text = "Serial Key Here!"
Case 3
Textbox1.text = "Serial Key Here!"
Case 4
Textbox1.text = "Serial Key Here!"
Case 5
Textbox1.text = "Serial Key Here!"
End Select
This happens:
QUeuk4n.png


Any help?

-LinX

I am not sure about vb.net as I do not code in it but shouldn't it be

Textbox1.text = key() + "-" + key() + "-" + key() + "-" + key() + "-" + key()

That would be for a 25 digit code like a microsoft code but you would need to include some random letters in your results.

And shouldn't it be...

Dim key as Integer = 5

I could be wrong, I haven't touched vb.net for fun in like 4 years.
 

LinX

Banned
Well-known member
VIP Legends CPAElites Classic (1.0)
VIP Elites CPAElites Classic (1.0)
Joined
May 12, 2013
Messages
1,411
Reaction score
0
Location
Sweden
Website
www.youtube.com
The Mentor said:
LinX said:
So i'm trying to make a keygen since i've never tried the keygen niche out.

What i've done:

Custom button .dll format.

So whenever i add it to my Form it works perfectly and it acts as a button aswell.

But when i add this code:
Code:
Textbox1.Enabled = True
Dim Key As Integer
Key = (rnd() *5 )
Select Case Key 
Case 1
Textbox1.text = "Serial Key Here!"
Case 2
Textbox1.text = "Serial Key Here!"
Case 3
Textbox1.text = "Serial Key Here!"
Case 4
Textbox1.text = "Serial Key Here!"
Case 5
Textbox1.text = "Serial Key Here!"
End Select
This happens:
QUeuk4n.png


Any help?

-LinX

I am not sure about vb.net as I do not code in it but shouldn't it be

Textbox1.text = key() + "-" + key() + "-" + key() + "-" + key() + "-" + key()

That would be for a 25 digit code like a microsoft code but you would need to include some random letters in your results.

And shouldn't it be...

Dim key as Integer = 5

I could be wrong, I haven't touched vb.net for fun in like 4 years.

The code i used it a code every one uses.

-LinX
 

LinX

Banned
Well-known member
VIP Legends CPAElites Classic (1.0)
VIP Elites CPAElites Classic (1.0)
Joined
May 12, 2013
Messages
1,411
Reaction score
0
Location
Sweden
Website
www.youtube.com
Mutantbull said:
Maybe I can help you .Add me on skype : mutant.bull

I got it working no worries :)
I was being stupid :)
Thanks anyway :)

-LinX
 
Top Bottom