Use GetListviewItem to get user nick and it's index

I am trying to get the user status liek if they talking ect… and I think i did it 🙂 i made it liek this on the GetListviewItem function I change some part of the code to this

        Call getuserstatus2

Text17.Text = CStr(CLng(Text17.Text) + 1)

tmp2 = Replace(tmp2, "@", "")

Text16 = tmp2

tmp2 = ""

ya see i added another texbox and it starts at 0 then it adds one for every next lol 🙂 then i use another code to get the status call getuserstatus2 i think was gallatica that made it and call it with this

Private Function getuserstatus2()

Dim dlggroupchatwindowclass As Long, wtlsplitterwindow As Long, atldd As Long

Dim syslistview As Long

On Error Resume Next

dlggroupchatwindowclass = FindWindow("DlgGroupChat Window Class", Form1.Combo1.Text)

wtlsplitterwindow = FindWindowEx(dlggroupchatwindowclass, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

atldd = GetWindow(wtlsplitterwindow, GW_CHILD)

syslistview = FindWindowEx(atldd, 0&, "syslistview32", vbNullString)

Call GetUserStat2(syslistview, Text17)

'Call GetUserStat(syslistview, 1)

End Function

and the fucntion for that is this

Public Function GetUserStat2(ByVal lstviewhwnd As Long, ByVal item As Integer) As String

Dim result              As Long

Dim myItem              As LV_ITEMA

Dim pHandle             As Long

Dim pMyItemMemory       As Long

Dim ProcessID As Long

' Dim ItemCount, i As Long





'***********************************************************

'open a handle to the process and allocate the string buffer

'***********************************************************

Call GetWindowThreadProcessId(lstviewhwnd, ProcessID)

pHandle = OpenProcess(PROCESS_VM_OPERATION Or PROCESS_VM_READ Or PROCESS_VM_WRITE, False, ProcessID)





'************************************************************************************

'initialize the local LV_ITEM structure

'The myItem.iSubItem member is set to the index of the column that is being retrieved

'************************************************************************************

myItem.mask = LVIF_IMAGE Or LVIF_STATE

myItem.iItem = item

myItem.iSubItem = 1

myItem.stateMask = &HFFFF

'**********************************************************

'write the structure into the remote process's memory space

'**********************************************************

pMyItemMemory = VirtualAllocEx(pHandle, 0, Len(myItem), MEM_COMMIT, PAGE_READWRITE)

'ItemCount = SendMessage(lstviewhwnd, LVM_GETITEMCOUNT, 0&, 0&)





result = WriteProcessMemory(pHandle, pMyItemMemory, myItem, Len(myItem), 0)



'*************************************************************

'send the get the item message and write back the memory space

'*************************************************************

result = SendMessage(lstviewhwnd, LVM_GETITEM, item, ByVal pMyItemMemory)

result = ReadProcessMemory(pHandle, pMyItemMemory, myItem, Len(myItem), 0)



Text11 = myItem.iImage ' image index in listview of paltalk (example :5 raise hand, 7 mute speaker, 4 holding mic)





'

'**************************************************

'deallocate the memory and close the process handle

'**************************************************



result = VirtualFreeEx(pHandle, pMyItemMemory, 0, MEM_RELEASE)



result = CloseHandle(pHandle)





End Function

now i made it so the program only will add users with their hands up, just add this on a textbox

If Text11 = "5" Then

List2.AddItem Text16

End If

And it works perfect 🙂 aigh I should be finish by next week is gonna kick asz lol

ah is the GetUserStat2 is a function 🙂 I was trying to put them all togeher on the GetListviewItem function and not success lol 🙂 but if i add them will it search for 5 cause i also need to search for 8 and 4 🙂 heehhe 😆

Deps, I already got it so it check the first nick to see if they talking or hands up, the list that i am getting with this code is the waiting list, so lets say ya start the program it will automatically add the one that is talking to the a textbox as the current talker, the others one with their hands up will be added to the waiting list 🙂 now once the time is over the next in line in the waiting list which is the one in the waiting listbox with inedx one will be aloud to talk, so if lets say the third one in the waiting list jusmps the mic they wiull be told to let the one in first to talk other whise they will be mute.

Ah this the tricky part the damn jumpers that are not in the list will be mute automatically, also the program will not be updating the waiting list continually, it will only updated after the first line of people waiting to talk is empty, so the program will check if waiting list is empty then call function to full waiting list again that way it makes sure there arent people the just put their hands up to jump the mic lol

man is goign to be a mess lol