Skip to content

internet explorer_server class

Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #186445
    Jerrri2012
    Member

    Hi everybody

    Can anyone help how to get text from an internet explorer_server class ?

    Dim troomwindow As Long, tspanel As Long, shellembedding As Long
    Dim shelldocobjectview As Long, internetexplorerserver As Long
    troomwindow = FindWindow("troomwindow", vbNullString)
    tspanel = FindWindowEx(troomwindow, 0&, "tspanel", vbNullString)
    tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
    tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
    tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
    tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
    tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
    shellembedding = FindWindowEx(tspanel, 0&, "shell embedding", vbNullString)
    shelldocobjectview = FindWindowEx(shellembedding, 0&, "shell docobject view", vbNullString)
    internetexplorerserver = FindWindowEx(shelldocobjectview, 0&, "internet explorer_server", vbNullString)
    Dim TheText As String, TL As Long
    TL = SendMessageLong(internetexplorerserver, WM_GETTEXTLENGTH, 0&, 0&)
    TheText = String(TL + 1, " ")
    Call SendMessageByString(internetexplorerserver, WM_GETTEXT, TL + 1, TheText)
    TheText = Left(TheText, TL)

    of course this code tooken from PAT or JK’s API spy 5.1 don’t give any result

    TL is given 0

    thanks

     

    #186447
    Departure
    Member

    Is this for beyluxe? I think both Autopilot and myself have posted examples of getting text from beyluxe, look for autopilots posts concerning this component.

     

    //Edit

    Cant get Text from Room – Crown IM ?

    #186446
    Jerrri2012
    Member

    Thank you so much departure

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