Paltalk 11.7 Build 639 VB 6.0 Programs Issues

Viewing 7 posts - 1 through 7 (of 7 total)
  • Author
    Posts
  • #67502
    Locohacker
    Administrator

    So this damn paltalk 11.7 build 639 is being a pain with the VB 6.0 programs it has the same index and the API looks the same as 638 and the programs work on 638 but not on 639.
    Build 638 API

    Dim dlggroupchatwindowclass As Long, splitterwindowex As Long, classcpanecontainerex As Long
    Dim atlae As Long, atlaed As Long, atlaebf As Long
    Dim richeditw As Long
    dlggroupchatwindowclass = FindWindow("dlggroupchat window class", vbNullString)
    splitterwindowex = FindWindowEx(dlggroupchatwindowclass, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    classcpanecontainerex = FindWindowEx(splitterwindowex, 0&, "classcpanecontainerex", vbNullString)
    atlae = FindWindowEx(classcpanecontainerex, 0&, "atl:00ae4898", vbNullString)
    atlaed = FindWindowEx(atlae, 0&, "atl:00ae3d28", vbNullString)
    atlaebf = FindWindowEx(atlaed, 0&, "atl:00ae4bf8", vbNullString)
    richeditw = FindWindowEx(atlaebf, 0&, "richedit20w", vbNullString)

    Build 639 API

    Dim dlggroupchatwindowclass As Long, splitterwindowex As Long, classcpanecontainerex As Long
    Dim atlae As Long, atlaed As Long, atlaebf As Long
    Dim richeditw As Long
    dlggroupchatwindowclass = FindWindow("dlggroupchat window class", vbNullString)
    splitterwindowex = FindWindowEx(dlggroupchatwindowclass, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
    classcpanecontainerex = FindWindowEx(splitterwindowex, 0&, "classcpanecontainerex", vbNullString)
    atlae = FindWindowEx(classcpanecontainerex, 0&, "atl:00ae4898", vbNullString)
    atlaed = FindWindowEx(atlae, 0&, "atl:00ae3d28", vbNullString)
    atlaebf = FindWindowEx(atlaed, 0&, "atl:00ae4bf8", vbNullString)
    richeditw = FindWindowEx(atlaebf, 0&, "richedit20w", vbNullString)

    As you can see it the same shit and the programs dont work. @chike where are you 🙂

    #67508
    Chike
    Administrator

    What’s an “index”?
    I don’t have VB6.0 and im scared to install on my Windows 7
    Don’t know if I have installer anyway.

    #67512
    Locohacker
    Administrator

    This indexes 🙂

    Const SendTxtIndex10Beta450 As Integer = 1
    Const ChaTxtIndex10Beta450 As Integer = 4

    But man I wouldn’t install VB 6 on any PC hehehe I kindna had to reinstall everything when I try it on a Windows 10 PC heheheh

    #67657
    Departure
    Administrator

    Use break points to work out which line returns a null handle, then you can investigate further, each FindWindowEx should return a valid handle of your code is correct. I assume the original post with code was from Pat API spy? why not try another program and see of you get the same results? E.g I uploaded a HwndSpy program a few years ago here which will give the high Hierarchy of each component, use that to compare with what you have, it will even give you the “Index” number

    HwndSpy

    #67666
    Locohacker
    Administrator

    Yeps I used Pat API, aigh I gonna use the HwndSpy to dig deeper on what’s going on. Thanks 🙂

    #68472
    MrAlone
    Moderator

    Good Evening..

    I’m using Paltalk 118 b652 and everything is working fine ..

    https://www.imfiles.com/topic/paltalk-11-7-programs-vb-6-0-source/

    Work like a charm ..

     

    Luv U

    #68473
    Locohacker
    Administrator

    Yeps, it they weren’t working for build 648, but they good for the new 11.8 heheh so no updates 🙂

Viewing 7 posts - 1 through 7 (of 7 total)
  • You must be logged in to reply to this topic.