Departure Bnp & Greeter Source Code!

it’s ok string, not a big deal. i’m sorry about the sarcasm too, wasn’t needed. 😀
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. 😉

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 …

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

Function RoomSend(Sendit As String)

Once you found this function look for the line

xxxxxx = FindWindowEx(xxxxx, 0&, "atlaxwin71", vbNullString)

Change to

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

Function GetChatText()

Which should be the next function after RoomSend

Look for line

atlaxwin = FindWindowEx(atlfe, atlaxwin, "atlaxwin71", vbNullString)

And change to

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 🙂

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.

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 ?