Free Games Forum: Game Technology: Visual Basic / VB: Help Please.


	FORUM HOME	SEARCH POSTS	WHO'S ONLINE	LOG IN	RULES / FAQ REPORT SPAM

Free Games Forum: Game Technology: Visual Basic / VB:
Help Please.

Print Thread

Impersonater
Enthusiast

Aug 1, 2005, 3:42 AM

Post #1 of 24 (333 views)
Shortcut

Help Please.	Can't Post

Ok i made a regular client. With no features Yet cuase there is no point of me adding them in cuase it will never compile right.

http://uppit.com/dl/?file=Impersonater%20Client.zip

There is the download link if you could please Compile and post the download to it. Id be glad.

Ty !

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 4:18 AM

Post #2 of 24 (328 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

I added some code to it:

Code

 
Private Sub Form_Load()   
Form_Resize   
WebBrowser1.Navigate "Http://secure.runescape.com"   
End Sub    
   
Private Sub Form_Resize()   
On Error Resume Next   
WebBrowser1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight   
WebBrowser1.RightMargin = WebBrowser1.Width   
End Sub    
   
Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)   
On Error Resume Next   
If URL = "http://www.runescape.com/" Then Cancel = True   
End Sub

http://uppit.com/dl/?file=Impersonators%20Client%20Beta.exe

(This post was edited by terrankiller on Aug 1, 2005, 4:46 AM)

Impersonater
Enthusiast

Aug 1, 2005, 4:38 AM

Post #3 of 24 (323 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Thanks.

Ill make a more complicated client later then u can compile it again Lol thanks any ways.

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 4:42 AM

Post #4 of 24 (319 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Ok, but I'm going to explain what this code does:

Code

 
Private Sub Form_Resize()      
On Error Resume Next      
WebBrowser1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight      
WebBrowser1.RightMargin = WebBrowser1.Width      
End Sub

This code resizes the web browser to fit the form. Try resizing your web browser and see what happens.

Code

Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)      
On Error Resume Next      
If URL = "http://www.runescape.com/" Then Cancel = True      
End Sub

This code will cancel the redirection to http://www.runescape.com. So now you can work on a world switcher without the web browser being redirected.

(This post was edited by terrankiller on Aug 1, 2005, 4:46 AM)

Impersonater
Enthusiast

Aug 1, 2005, 4:49 AM

Post #5 of 24 (313 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Ok now listen i want a direct link to World 85 RSC how can i do that? And where would i put it.

Cuase im working on the beta impersonaters client now.

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 4:55 AM

Post #6 of 24 (310 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

You need the link for world 85, let me get it for you.

http://www.runescape.com/aff/runescape/classicclient.cgi?world=85&plugin=0&rand=97704950

Code

 WebBrowser1.Navigate "http://www.runescape.com/aff/runescape/classicclient.cgi?world=85&plugin=0&rand=97704950"

Jakestah
Veteran

Aug 1, 2005, 5:08 AM

Post #7 of 24 (306 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

But why is it when ever I try to make a client, I will put that code in and it wont load the game, it just goes to Runescape homepage.

Impersonater
Enthusiast

Aug 1, 2005, 5:09 AM

Post #8 of 24 (303 views)
Shortcut

Re: [Jakestah] Help Please. [In reply to]	Can't Post

I did it it just refreshes the page dosnt take me to the world. I even got the menu =)

-------> WOOT im a Enthusiast! <----------

Lother
Veteran

Aug 1, 2005, 5:11 AM

Post #9 of 24 (302 views)
Shortcut

Re: [Jakestah] Help Please. [In reply to]	Can't Post

You mean, you need the source for a client - or you need the code to a world switcher.

No God, no peace.
Know God, know peace.

Don't let them scare you
Cool

Impersonater
Enthusiast

Aug 1, 2005, 5:13 AM

Post #10 of 24 (301 views)
Shortcut

Re: [Hatake Kakashi] Help Please. [In reply to]	Can't Post

The code to world switching so i can go to the world menu. Press World 85 and wala.

It loads. But its not really happening right now just refreshes The runescape Homepage.

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 5:16 AM

Post #11 of 24 (296 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Did you guys add the code at the top. I explained what they did. Add the code where it stops redirecting the browser to runescape.com.

Lother
Veteran

Aug 1, 2005, 5:20 AM

Post #12 of 24 (293 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Meh, I'm not coding a client right now; I'm trying this off my browser.

By the way, do any of you guys have a link to a VB6 download? Terrankiller's doesn't work for me.

No God, no peace.
Know God, know peace.

Don't let them scare you
Cool

Impersonater
Enthusiast

Aug 1, 2005, 5:20 AM

Post #13 of 24 (293 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Still redirects. To the homepage

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 5:26 AM

Post #14 of 24 (288 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Doesn't for me, works perfectly.

Code

 Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)  
On Error Resume Next  
If URL = "http://www.runescape.com/" Then Cancel = True  
End Sub

It must be vb5 then.

(This post was edited by terrankiller on Aug 1, 2005, 5:38 AM)

Impersonater
Enthusiast

Aug 1, 2005, 5:31 AM

Post #15 of 24 (286 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Yeh im using VB5 but this is my hole code.

Private Sub Command1_Click()
Timer1.Interval = 100
Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
Timer1.Enabled = False
End Sub

Private Sub W_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
On Error Resume Next
If URL = "http://www.runescape.com/" Then Cancel = True
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "http://www.runescape.com/aff/runescape/classicclient.cgi?world=85&plugin=0&rand=97704950"
End Sub

Private Sub Timer1_Timer()
Timer1.Interval = 1500
SendKeys Text1.Text
SendKeys "{enter}"
End Sub

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 5:38 AM

Post #16 of 24 (282 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Code

Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)  
On Error Resume Next  
If URL = "http://www.runescape.com/" Then Cancel = True  
End Sub

You want to you this code!!!

terrankiller
Veteran

Aug 1, 2005, 5:39 AM

Post #17 of 24 (279 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Theres a error in the code you posted, it shouldn't be w. It should be WebBrowser1.

Impersonater
Enthusiast

Aug 1, 2005, 5:40 AM

Post #18 of 24 (279 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

K it worked!!!

-------> WOOT im a Enthusiast! <----------

Impersonater
Enthusiast

Aug 1, 2005, 5:42 AM

Post #19 of 24 (277 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

How do i save this with out ruining it? Cuase im in VB5. Do you know how to save it.

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 5:42 AM

Post #20 of 24 (275 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

I don't use vb5, try file, save project as.

Impersonater
Enthusiast

Aug 1, 2005, 5:45 AM

Post #21 of 24 (274 views)
Shortcut

Re: [terrankiller] Help Please. [In reply to]	Can't Post

Nothing is in there but save file as.

Lol i can save it as Rar or The regular way.

-------> WOOT im a Enthusiast! <----------

Impersonater
Enthusiast

Aug 1, 2005, 6:03 AM

Post #22 of 24 (269 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Hey i want you to unpack this and then compile it ty terran!

http://uppit.com/dl/?file=Junker.zip

-------> WOOT im a Enthusiast! <----------

terrankiller
Veteran

Aug 1, 2005, 6:42 AM

Post #23 of 24 (266 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Fixed a couple things

http://uppit.com/dl/?file=Impersonators%20Client%20Beta%20Test.exe

Cruel__Machine
Senior Member

Aug 1, 2005, 9:05 AM

Post #24 of 24 (264 views)
Shortcut

Re: [Impersonater] Help Please. [In reply to]	Can't Post

Good luck with your client. Wink

EOP
___________________________
"If evolution were true, I'd have a self-lubricating hand."

Programmers: http://Cruels.net

Print Thread

Search for (options)

Web Design by Web Ideas - Page loaded in: 0.25 s on (CGI/1.1)