11 replies to this topic

[aommaster]

Hi guys!

Okay... so let's just say some hypothetical person is having a lot of fun with the IE functions in autoit

This hypothetical person wants to have autoit click a link in IE that partially matches the string he provides. For example, assume that below are links on a web page:
*Home
*Boards
*News
*Contacts
*Departments
*Art Gallery

So, if autoit is provided the word "art" in the _IELinkClickbyText function, it will click departments if the index it is given is 0. If it is given 1, then it will click Art Gallery.

Thanks guys!

[PsaltyDS]

Hi guys!

Okay... so let's just say some hypothetical person is having a lot of fun with the IE functions in autoit

This hypothetical person wants to have autoit click a link in IE that partially matches the string he provides. For example, assume that below are links on a web page:
*Home
*Boards
*News
*Contacts
*Departments
*Art Gallery

So, if autoit is provided the word "art" in the _IELinkClickbyText function, it will click departments if the index it is given is 0. If it is given 1, then it will click Art Gallery.

Thanks guys!

You could just hack your copy of IE.au3. Copy the _IELinkClickByText() function to a new name, i.e. _IELinkClickByString(), then change just one line inside the function:

From:

If $linktext = $s_linkText Thenƒo݊÷ Ù:ºÚ"µÍ’YˆÝš[™Ò[”ÝŠ  ˆÌ͎Û[šÝ^  ˆÌ͎Ü×Û[šÕ^
H[

[PsaltyDS]

P.S. Don't expect support from Dale for any hacked versions of IE.au3...

[aommaster]

P.S. Don't expect support from Dale for any hacked versions of IE.au3...

Hehe... that is pure genius! It works perfectly!

Strange he wouldn't give support... it's all his code with a minor tweak

[iTechTed89]

I cant seem to get this working... but i think it would help solve my problem here possibly → Here

Plain Text        expandcollapse  popup

Func _IELinkClickByString(ByRef $o_object, $s_linkText, $i_index = 0, $f_wait = 1)
If Not IsObj($o_object) Then
  __IEErrorNotify("Error", "_IELinkClickByText", "$_IEStatus_InvalidDataType")
  Return SetError($_IEStatus_InvalidDataType, 1, 0)
EndIf
;
Local $found = 0, $linktext, $links = $o_object.document.links
$i_index = Number($i_index)
For $link In $links
  $linktext = $link.outerText & "" ; Append empty string to prevent problem with no outerText (image) links
  If $linktext = $s_linkText Then?oÝ?÷ Ù:ºÚ"µÍ?Y?Ý?[?Ò[?Ý? ?ÌÍ?Û[?Ý^  ?ÌÍ?Ü×Û[?Õ^
H[
   If ($found = $i_index) Then
    $link.click()
    If $f_wait Then
     _IELoadWait($o_object)
     Return SetError(@error, 0, -1)
    EndIf
    Return SetError($_IEStatus_Success, 0, -1)
   EndIf
   $found = $found + 1
  EndIf
Next
__IEErrorNotify("Warning", "_IELinkClickByText", "$_IEStatus_NoMatch")
Return SetError($_IEStatus_NoMatch, 0, 0) ; Could be caused by parameter 2, 3 or both
EndFunc

[iTechTed89]

also wtf is

o݊÷ Ù:ºÚ"µÍ’YˆÝš[™Ò[”ÝŠ ˆÌ͎Û[šÝ^  ˆÌ͎Ü×Û[šÕ^
H[

?

[BrewManNH]

That's a corrupted code tag, that isn't supposed to be there, which is why it's not working for you.

[iTechTed89]

meaning? just use this?

If $linktext = $s_linkText Then

or is that the line i need to change

and if so to what?

Edited by iTechTed89, 09 May 2012 - 04:48 AM.

[iTechTed89]

still pretty lost on this wish dane made a function for this... i did see in anouther old topic he was thinking about it but dont know what became of it.

[BrewManNH]

You could ask PsaltyDS what he wrote there, he might recall it.

[iTechTed89]

anyone got any advice on how to get this working i did msg DS but he hasnt been online since april

[DaleHohm]

Just use

If StringInStr($linktext, $s_linkText) Then

Dale