AuthorPostsRate it First!
Posted May 9, 2012 at 9:26 pm #15157
I gonna put the paltalk 10.2 codes here updates, I having an issue that programs wont work in color rooms at the first try, like you need to close and open the rooms again for them to work.
Check the codes and any suggestions can be posted here 🙂
Attachments:Posted May 10, 2012 at 1:25 pm #37970MemberPosts: 46
ty for share Loco.
is not working turkish paltalk 10.2 build 438 🙁 sourcecode and greeter
why ?Posted May 11, 2012 at 9:41 am #37961
Good work loco , thank you
i need NickGet and GetListviewItem update code pleasePosted May 11, 2012 at 1:37 pm #37949
nalet, did u try closing and opening the room again, cause im having an issue with that ❓
Light the code to getnick is this now
Function NickGet() Dim dlggroupchatwindowclass As Long, splitterwindowex As Long, classcpanecontainerex As Long Dim atlffdd As Long, syslistview As Long dlggroupchatwindowclass = FindWindow("dlggroupchat window class", Form1.Combo1.Text) 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) If classcpanecontainerex = 0 Then cwndmembertree = FindWindowEx(splitterwindowex, 0&, "cwndmembertree", vbNullString) syslistview = FindWindowEx(cwndmembertree, 0&, "syslistview32", vbNullString) Else classcpanecontainerex = FindWindowEx(splitterwindowex, classcpanecontainerex, "classcpanecontainerex", vbNullString) atlffdd = GetWindow(classcpanecontainerex, GW_CHILD) syslistview = FindWindowEx(atlffdd, 0&, "syslistview32", vbNullString) End If Call GetListviewItem(syslistview) End Function
But we still having issues lol as u can see :dave:Posted May 11, 2012 at 5:25 pm #37979MemberPosts: 46
ty Loco , i am testing …
image = http://f1205.hizliresim.com/x/c/5psjx.jpg
i am incompetent :altay:
Posted May 11, 2012 at 5:42 pm #37981
Thank you for your interest loco. 🙂
What’s wrong with this code?
Public Function MessageCrossProcess(ByVal hwnd As Long) Dim lProcID As Long Dim hProc As Long Dim lxprocLVITEM As Long Dim LVITEM As LV_ITEM Dim lItemPos As Long GetWindowThreadProcessId hwnd, lProcID ' Get the process ID in which the ListView is running If lProcID 0 Then hProc = OpenProcess(PROCESS_VM_OPERATION Or PROCESS_VM_READ Or PROCESS_VM_WRITE, False, lProcID) ' make sure we have read write permissions in the process space If hProc 0 Then lxprocLVITEM = VirtualAllocEx(hProc, 0, LenB(LVITEM), MEM_RESERVE Or MEM_COMMIT, PAGE_READWRITE) ' Grab enough memory in the other procedure's space to hold our LV_ITEM ' Set up our local LV_ITEM to change the selected item LVITEM.mask = LVIF_STATE LVITEM.state = True LVITEM.stateMask = LVIS_SELECTED Or LVIS_FOCUSED ' Just enforcing the selection better than in original version by moving the focus as well ' Copy the local LV_ITEM into the space we reserved in the foreign process WriteProcessMemory hProc, ByVal lxprocLVITEM, ByVal VarPtr(LVITEM), LenB(LVITEM), 0 ' Now send the message, but pass the address of the copy of our LV_ITEM that now exists in the foreign process instead of our local version ' Aigh Peeps this wha you need to change in order to higlight the item you want :) lItemPos = Form1.Text8.text ' first item SendMessage hwnd, LVM_SETITEMSTATE, lItemPos, ByVal lxprocLVITEM ' Clean up VirtualFreeEx hProc, ByVal lxprocLVITEM, LenB(LVITEM), MEM_RELEASE CloseHandle hProc End If End If End Function
Doesnt workPosted May 11, 2012 at 8:14 pm #37969
:altay: i see nowPosted May 12, 2012 at 3:40 am #37956
light so ya got it working ❓
nalet I gonna chek it more next week, cause Im still having the issue, it still works with the black room is the color ones thats having the issue 🙄Posted May 12, 2012 at 6:23 pm #37965
The program doesnt work the first time
I need to close and open the rooms again to workPosted May 12, 2012 at 9:25 pm #37966MemberPosts: 9
Thanks Loco it working but as you mentioned you have to close the room and reopen to work in colored room! tyPosted May 13, 2012 at 6:15 pm #37955
😀 😀Posted May 15, 2012 at 5:42 pm #37968MemberPosts: 11
can you post the updated source for the admin bot?
cheers!Posted May 15, 2012 at 6:39 pm #37959
express here the code, but I updated the way to connect to the room, I use the combo box like the others program, so test it out I havent done much testing 😀Posted May 15, 2012 at 7:04 pm #37971
Thank you very much loco you are Genius 😀Posted May 15, 2012 at 7:11 pm #37972
Lol why thank lol, and hey download it again cause I working on the room combo box connection and it had a bug, so get it again 🙂
You must be logged in to reply to this topic.