Get user List from Chat Room

[Lakes 224]

I am trying to read a list of users in a chat room at www.meetcam.com

The control I am trying to read is :

Control ID: 204

ClassNameNN: SysTreeView321

Heres the test code I have tried:

-------------------------------------------------------------------

#include <GUIConstants.au3>

GUICreate("AForm1", 180, 75, 192, 139)

$Ok = GUICtrlCreateButton("OK", 16, 24, 57, 25)

$Cancel = GUICtrlCreateButton("Cancel", 104, 24, 57, 25)

GUISetState(@SW_SHOW)

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

GUIDelete()

Exit

Case $msg = $Ok

ControlfOCUS ("Chat :: MeetCam.com - Microsoft Internet Explorer","",204)

$Text = ControlGetText ("Chat :: MeetCam.com - Microsoft Internet Explorer","",204)

MsgBox(64, "Test Read",$Text)

Case $msg = $Cancel

ExitLoop

EndSelect

WEnd

-------------------------------------------------------------------

As you can see its not returning any text.

Thanks for any help supplied.

[Laine 0]

I am trying to read a list of users in a chat room at www.meetcam.com

The control I am trying to read is :

Control ID: 204

ClassNameNN: SysTreeView321

Heres the test code I have tried:

-------------------------------------------------------------------

{SNIP}

As you can see its not returning any text.

Thanks for any help supplied.

I think you might want to do some research here.

http://www.autoitscript.com/forum/index.php?showtopic=13398

[neogia 0]

I think you might want to do some research here.

http://www.autoitscript.com/forum/index.php?showtopic=13398

I don't know if this works for IE, but I got a similar control to work, SysListView321. Here's a snippet of my code:

;Options
Opt("WinTitleMatchMode", 4) ;1=start, 2=subStr, 3=exact, 4=advanced

Local $title = "Services"
Local $control = "SysListView321"
Local $sub = "McAfee"

Run(@COMSPEC& " /c Start c:\windows\system32\services.msc")
WinWaitActive("Services","Services (Local)")

;Find currently running McAfee Services
$count = 0
Dim $services[10]
$numItems = ControlListView($title,"",$control,"GetItemCount")
For $i = 0 To $numItems - 1
    If StringInStr(ControlListView($title,"",$control,"GetText",$i), $sub) <> 0 Then
        If ControlListView($title,"",$control,"GetText",$i,2) = "Started" Then
            $services[$count] = $i
            $count = $count + 1
        EndIf
    EndIf
Next

[Valuater 97]

I think you might want to do some research here.

http://www.autoitscript.com/forum/index.php?showtopic=13398

I don't know if this works for IE...

try this

http://www.autoitscript.com/forum/index.ph...st=0&p=133767

8)

[jaenster 0]

USE CODE WINDOWS PLEASE !!!!

[Lakes 224]

USE CODE WINDOWS PLEASE !!!!

Sorry, How do I do this?

[Valuater 97]

Sorry, How do I do this?

like this

[ code] ; no spaces

; post code

[ /code] ; no spaces

8)

[Lakes 224]

try this

http://www.autoitscript.com/forum/index.ph...st=0&p=133767

8)

It opens Full Screen with no way for me to shink it and it freezes\crashes on me when I try to the get web page I want to look at.

I`ll have to learn how to use the IE libary...

Thanks for your help anyway.