<source> Aciidforums Authorization <source>

Reply to topic Page 1 of 3 [ 52 posts ]
Author Message

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:09 pm   Post subject: <source> Aciidforums Authorization <source>   

Hi

Well Just Like to say i started coding in Visual basic 2006 yesterday and To be honest i am really enjoying it, loads better than Autoit. 045

So for my first bot i thought about making a simple one to get me started off.
And I kinda know the forum might be moving from bebo so didnt make a bebo bot.

So eventually i came up with a aciid authorization bot, which on its own just logs into aciid, so useless.
But im sure youve all seen on intoxics bots you have to login into a certain website, (aciid, bebo, etc) before you use the bot?

1. This is not a Phisher, It is OPEN SOURCE, so if it were a phiser a coder would take one look at the code, tell admin or mod and id get banned, if you think it is a phisher dont download.
2. The code was made in visual basic 6, so if you make bots in vb6 and want to add a aciid forums login, use this.
3. It is my first bot so dont have a go at me if its been made before, its just my first dft009
4. You can edit it if you want, Im not To botherd about having my name on the login part on your bot if you use it, a bit of credit would be nice but it is purley up to you, just remember where the source originlly came from :bigsmile:
5. it even has a register and forgot password button 045

Credits to SilentJay for the wrapper source to VBdreamers, which i modifiyed to Aciidfourms.

Here is a screenshot:
Attachment:
Untitled.jpg


Here is the .exe version:
Attachment:
AciidforumsAuth.exe


Here is the Visual Basic 2006 Source:
Attachment:
Aciidforums Authorization.zip


Comments much appreciated and any suggestions for future bots i will create :bigsmile:
Enjoy dft011


You do not have the required permissions to view the files attached to this post.

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image


Last edited by Ben on Mon Sep 01, 2008 3:12 pm, edited 1 time in total.
Top Profile E-mail 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:31 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Oh and btw can a coder or someone who works with Visual basic just confirm that it isnt a phisher please :bigsmile:

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Davely

XXZXCUZX Me


User avatar


Joined: Wed Aug 08, 2007 10:33 pm

Posts: 2829

Location: Scotland

PostPosted: Thu Aug 14, 2008 5:32 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Phisher

_________________
Top Profile E-mail 

Offline Liam

1337 n00b!!!111!!one!


User avatar


Joined: Mon Feb 04, 2008 3:57 am

Posts: 2492

Location: Wales

PostPosted: Thu Aug 14, 2008 5:33 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Easdale wrote:
Phisher


:agree:
Top Profile 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:36 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

What part of this is a phiser then???:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
   (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Private Const SWP_NOMOVE = &H2

Private Const SWP_NOSIZE = &H1

Private Const HWND_TOPMOST = -1

Private Sub form_resize()
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
End Sub

Private Sub cmdOK_Click()

If txtUserName.Text = "" Then
MsgBox "You Need To Enter Your Aciidforums Username"
ElseIf txtPassword.Text = "" Then
MsgBox "You Need To Enter Your Aciidforums Password."
Else

' call module to check if member exists
Call Authorize

End If
End Sub

Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
formdrag Me
End Sub

Private Sub Image2_Click()
ShellExecute Me.hwnd, "open", "http://www.aciidforums.com/ucp.php?mode=register", vbNullString, vbNullString, vbNormalFocus
End
End Sub

Private Sub Image3_Click()
ShellExecute Me.hwnd, "open", "http://www.aciidforums.com/ucp.php?mode=sendpassword", vbNullString, vbNullString, vbNormalFocus
End
End Sub

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Davely

XXZXCUZX Me


User avatar


Joined: Wed Aug 08, 2007 10:33 pm

Posts: 2829

Location: Scotland

PostPosted: Thu Aug 14, 2008 5:38 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Private Sub Image3_Click()
ShellExecute Me.hwnd, "open", "PHISH"vbNormalFocus
End
End Sub

_________________
Top Profile E-mail 

Offline Jamie

Aciid VIP


User avatar


Joined: Thu Apr 24, 2008 9:43 pm

Posts: 1709

Location: Lincolnshire

PostPosted: Thu Aug 14, 2008 5:40 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Its Not A Phiser. I Have Tried It. It Works.

_________________
- TeaM DiRtY CoDiNg HaBiTz -

- DCH Head Mod -

Look Out For DCH's Return In The Very Near Future
Top Profile E-mail 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:40 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Image 3 is a picture of the text: forgot your password

where after clicking it leads you to aciidforums.com forgot password.

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Davely

XXZXCUZX Me


User avatar


Joined: Wed Aug 08, 2007 10:33 pm

Posts: 2829

Location: Scotland

PostPosted: Thu Aug 14, 2008 5:41 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Nub im pulling your pisser.

_________________
Top Profile E-mail 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:42 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

I Knew That dft011

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Liam

1337 n00b!!!111!!one!


User avatar


Joined: Mon Feb 04, 2008 3:57 am

Posts: 2492

Location: Wales

PostPosted: Thu Aug 14, 2008 5:44 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Whats the point in all that code when u could have something alot simpler

Edit Actually
Private Sub Command1_Click()
Dim strHTML As String
strHTML = Wrapper.GetWrapper("http://www.aciidforums.com/ucp.php?mode=login")
If InStr(strHTML, "<input type=""hidden"" name=""sid""") Then
Text1.Text = GB(strHTML, "name=""sid"" value=""", """ />")
strHTML = Wrapper.PostWrapper("http://www.aciidforums.com/ucp.php?mode=login", "username=" & Text2.text & "&password=" & Text3.text & "&redirect=index.php&sid=" & Text1.Text & "&login=Login", "http://www.aciidforums.com/ucp.php?mode=login")
If InStr(strHTML, "You have been successfully logged in.") Then
MsgBox "Logged In Successfully", vbInformation, "Logged In!"
Else
MsgBox "Failed to Log In", vbCritical, "Failed!"
End If
End If
End Sub
Top Profile 

Offline Ollie

GraphicsDeVil<3


User avatar


Joined: Tue Jan 01, 2008 5:56 pm

Posts: 407

PostPosted: Thu Aug 14, 2008 5:45 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Haha, I really like the classic 'Forgot your Password?' link,
thats a nice touch to it.

Well done mate, +REP
Top Profile E-mail 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:47 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Suppose So, Only started yesterday though.

And it only takes a few seconds to log in.

Focused More on the design tbh.

Edit: Cheerz Ollie 045
Hopefully more to come :bigsmile:

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Liam

1337 n00b!!!111!!one!


User avatar


Joined: Mon Feb 04, 2008 3:57 am

Posts: 2492

Location: Wales

PostPosted: Thu Aug 14, 2008 5:50 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Add the Componet PrjChameolon or w/e its called for cool buttons dft003
Top Profile 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 5:53 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Liam wrote:
Add the Componet PrjChameolon or w/e its called for cool buttons dft003


Cheerz Liam looks way better with different style Buttons :bigsmile:

+Rep

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline Louis 2k8

Silver Member


Joined: Sun Jun 22, 2008 7:41 pm

Posts: 84

PostPosted: Thu Aug 14, 2008 5:58 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

my accounts been pished dft006

all i did was log into your bot...
Top Profile E-mail 

Offline TheMachine

Aciid VIP


User avatar


Joined: Mon Apr 28, 2008 3:34 am

Posts: 998

PostPosted: Thu Aug 14, 2008 5:59 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Well done mate nice to see people still trying to make bots and all so nice to see someone making them that are not bebo related. Your coding in vb will get better the more you do it.

+ Rep

Keep up the good work :wink:

_________________
Current Projects
DXin All4One Fruit Machine
DXin Vamp It Up Fruit Machine 1024 Res



Image
Top Profile E-mail 

Offline Ben

Aciid VIP


User avatar


Joined: Tue Apr 29, 2008 9:19 pm

Posts: 1281

Location: Cheltenham, Gloucestershire, United Kingdom

PostPosted: Thu Aug 14, 2008 6:00 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

How are you Leaving this comment then?.

And Thankyou themachine, Really Appreciate it 045

_________________
Used to Be Benyboyy Now Ben


My Bebo


Image
Top Profile E-mail 

Offline TheMachine

Aciid VIP


User avatar


Joined: Mon Apr 28, 2008 3:34 am

Posts: 998

PostPosted: Thu Aug 14, 2008 6:01 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Louis 2k8 wrote:
my accounts been pished dft006

all i did was log into your bot...




How you know your account was phished did aciid say when you logged in that sorry your account as been phished please make a new one i don't think it did so chances are you have not been phished your talking threw your behind and you still have your account.

This bot dose not have a phisher.

_________________
Current Projects
DXin All4One Fruit Machine
DXin Vamp It Up Fruit Machine 1024 Res



Image


Last edited by TheMachine on Thu Aug 14, 2008 6:08 pm, edited 1 time in total.
Top Profile E-mail 

Offline Louis 2k8

Silver Member


Joined: Sun Jun 22, 2008 7:41 pm

Posts: 84

PostPosted: Thu Aug 14, 2008 6:02 pm   Post subject: Re: <source> Aciidforums Authorization <source>   

Benyboyy wrote:
How are you Leaving this comment then?.

And Thankyou themachine, Really Appreciate it 045


:haha:

Gd bot m8 045
Top Profile E-mail 
Display posts from previous:  Sort by  
Reply to topic Page 1 of 3 [ 52 posts ]

 
 •  

Who is online
Users browsing this forum: No registered users and 1 guest

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

  

cron