Departure Bnp & Greeter Source Code!

You can talk about VB programming here

Re: Departure Bnp & Greeter Source Code!

Postby DavidR » Wed Jul 23, 2008 8:08 am


it's ok string, not a big deal. i'm sorry about the sarcasm too, wasn't needed. :D
and thanks for the link. i did follow it but again didn't find program itself either. i guess it's one of those that's been taken off. not sure yet.
hope i can find the code. when i use the greeter for 9.2 on pal 9.4, sometimes i don't see my greeting text in the room.
anyways ... sorry again for the sarcasm ... and i'll remember "Uranus" .. lollol. :wink:
DavidR
imFiles Newbie
imFiles Newbie
 
Posts: 12
Joined: Fri Jun 20, 2008 2:13 pm

Re: Departure Bnp & Greeter Source Code!

Postby Departure » Mon Jul 28, 2008 12:34 am

DavidR, I suggest moving to vb.net you will find more sample code for that language than vb6 these days, even tho' most of us here programmed in vb6 we have moved onto other programming languages, I my self have moved to delphi while most of the others are coding in vb.net and a few C++ and 1 C#, But if you instist on a working greeter for 9.4 This I can help you with by giving details how to update it so you can do it your self in the future. First thing to do is get use to using an API spy so you can gather infomation about child windows in paltalk rooms ect.. I will be home in a couple of days and can write a step by step instruction how to update..
User avatar
Departure
Global Moderator
Global Moderator
 
Posts: 996
Joined: Thu Mar 17, 2005 11:26 am
Location: Australia

Re: Departure Bnp & Greeter Source Code!

Postby DavidR » Thu Jul 31, 2008 2:42 am

Hi Departure ...

Thanks for your suggestion, I'll take it. As much as I love VB6 (I think because it's very simple to write compaire to others that I've seen), I agree with you on moving to a more enhaced version.
Also, thanks a lot for making that effort to write an step by step istruction for updating the greeter. That would be great and I'm sure I can learn a lot more than what I'm looking for in your details of update.
About the API Spy, I've seen a few but I'm not sure which one is more reliable and accurate. Unless since they all serves the idea, it really makes not much difference.
I'll look for a version of VB.net to install, but there's a question. Can a VB.net and VB6 both be on the same system without conflicting with each others?

Thanks again ...
DavidR
imFiles Newbie
imFiles Newbie
 
Posts: 12
Joined: Fri Jun 20, 2008 2:13 pm

Re: Departure Bnp & Greeter Source Code!

Postby autopilot » Thu Jul 31, 2008 7:37 am

DavidR wrote:About the API Spy, I've seen a few but I'm not sure which one is more reliable and accurate. Unless since they all serves the idea, it really makes not much difference.

they do do basicly the same thing, and just present the information in a slightly different way. alot of times i end up using 2 or 3 different spy apps to get and confirm the info i am after.
DavidR wrote:Can a VB.net and VB6 both be on the same system without conflicting with each others?

there is no problem having multiple versions on a pc... on my development pc, i have vs6 vs2005 and vs2008 (vs = Visual Studio which vb is a part of).
User avatar
autopilot
Forum Moderator
Forum Moderator
 
Posts: 356
Joined: Sat Sep 23, 2006 7:19 pm

Re: Departure Bnp & Greeter Source Code!

Postby Departure » Sun Aug 03, 2008 2:29 am

I decided not to write a step by step tutorial because modifying this is very simple, It requires just 2 small changes to the code to work for version 9+


Fist open the project and open module1, Once inside module1 find the function
Code: Select all
Function RoomSend(Sendit As String)


Once you found this function look for the line
Code: Select all
xxxxxx = FindWindowEx(xxxxx, 0&, "atlaxwin71", vbNullString)


Change to
Code: Select all
xxxxxx = FindWindowEx(xxxxx, 0&, "atlaxwin90", vbNullString)


All you are doing is changing 71 to 90 in word atlaxwin, Once you have done that look for function
Code: Select all
Function GetChatText()
Which should be the next function after RoomSend

Look for line
Code: Select all
atlaxwin = FindWindowEx(atlfe, atlaxwin, "atlaxwin71", vbNullString)


And change to
Code: Select all
atlaxwin = FindWindowEx(atlfe, atlaxwin, "atlaxwin90", vbNullString)


Once again it was just a matter of changing 71 to 90 in atlaxwin, Now save the project and you should be good to go :)
User avatar
Departure
Global Moderator
Global Moderator
 
Posts: 996
Joined: Thu Mar 17, 2005 11:26 am
Location: Australia

Re: Departure Bnp & Greeter Source Code!

Postby DavidR » Wed Aug 06, 2008 4:14 am

Thanks so much Departure
I can't believe it was that simple, and here I am thinking that it'll take at least a few hours to figure out how to fix this. I owe you one :) . This was driving me nuts. lol
Since I'm here, let me ask you something else that I was wondering about.
In FastBannerV2, Form1, under Timer1 I've noticed the line
button = FindWindowEx(x, button, "button", vbNullString)
is repeated 17 times. I was wondering why is that? and also the interval on the timer ... is it the minimum amount of time that's required for the action or it can be changed?

Thanks again for the help :)
DavidR
imFiles Newbie
imFiles Newbie
 
Posts: 12
Joined: Fri Jun 20, 2008 2:13 pm

Re: Departure Bnp & Greeter Source Code!

Postby Departure » Wed Aug 06, 2008 4:30 am

In FastBannerV2, Form1, under Timer1 I've noticed the line
button = FindWindowEx(x, button, "button", vbNullString)
is repeated 17 times. I was wondering why is that?


If you use an API spy you will see the order of controls, another way to do it is add the Captions of the button
button = FindWindowEx(x, button, "button", "Send")

So what happends here is will find the control "button" that contain the captions "Send" this way it would not need to find each and every button control on that form, Also proberly the best way to find the control is to use emunchildproc and make some code to get the 17th control named button on that form. Its hard to explain but im sure if you look at an API spy and check the paltalk room window in a treeview list you will see the order of the controls.
User avatar
Departure
Global Moderator
Global Moderator
 
Posts: 996
Joined: Thu Mar 17, 2005 11:26 am
Location: Australia

Re: Departure Bnp & Greeter Source Code!

Postby DavidR » Thu Aug 07, 2008 10:51 am

Thanks departure, I understood the reason perfectly from your explanation. I was studying the fast banner code and thinking ... since it can add the name to ban list, maybe I can change it somehow to make it remove the name from bounce list or ban list too. I hate those 2 lists, they're so small I can't see half of the most names, lollol.
DavidR
imFiles Newbie
imFiles Newbie
 
Posts: 12
Joined: Fri Jun 20, 2008 2:13 pm

Re: Departure Bnp & Greeter Source Code!

Postby method » Thu Apr 02, 2009 6:02 pm

Departure i tried to run the project attached here with paltalk 9.6 build 313 but it doesn't work. I tried to modify the could with changes you suggested but i realy can't find those parts!! could you or any one else make this working for latest paltalk ?
method
imFiles Master
imFiles Master
 
Posts: 686
Joined: Tue Oct 18, 2005 11:12 am

Re: Departure Bnp & Greeter Source Code!

Postby Departure » Fri Apr 03, 2009 5:13 am

I have'nt programmed in vb6 for nearly 2 years, but yeah ill have a look at paltaks new class name for that control.

BTW is this the same method on h2kclan?
User avatar
Departure
Global Moderator
Global Moderator
 
Posts: 996
Joined: Thu Mar 17, 2005 11:26 am
Location: Australia

Previous

Return to Visual Basic Programming

 


  • Related topics
    Replies
    Views
    Last post

Who is online

Users browsing this forum: No registered users and 0 guests