To comment on the following update, log in, then open the issue: http://www.openoffice.org/issues/show_bug.cgi?id=64899 Issue #:|64899 Summary:|HyperLinkTarget/HyperLinkName are not returned when |processing HyperLinkURL-s Component:|Word processor Version:|OOo 2.0.2 Platform:|PC URL:| OS/Version:|Windows XP Status:|UNCONFIRMED Status whiteboard:| Keywords:| Resolution:| Issue type:|DEFECT Priority:|P3 Subcomponent:|programming Assigned to:|mru Reported by:|ooouser1
------- Additional comments from [EMAIL PROTECTED] Fri Apr 28 17:50:06 -0700 2006 ------- When running following script (more details can be found at http://www.oooforum.org/forum/viewtopic.phtml?p=142643#142643): Sub GetHyperlinks() Dim i as integer Dim oCrsr as Object Dim oAllHyperLinks as Object, oFound as Object Dim SrchAttributes(0) as new com.sun.star.beans.PropertyValue Dim oSearchDesc as Object ' create a Search-Descriptor oSearchDesc = oDocument.CreateSearchDescriptor oSearchDesc.Valuesearch = False ' define the Search-attributes srchattributes(0).Name = "HyperLinkURL" srchattributes(0).Value = "" oSearchDesc.SetSearchAttributes(SrchAttributes()) oAllHyperLinks = oDocument.findAll(oSearchDesc()) For i = 0 to oAllHyperLinks.Count - 1 oFound = oAllHyperLinks(i) oCrsr = oFound.Text.createTextCursorByRange(oFound) WriteStringToLogFile(oCrsr.HyperLinkURL) 'Url WriteStringToLogFile(oCrsr.HyperLinkTarget) 'Frame WriteStringToLogFile(oCrsr.HyperLinkName) 'Name Next i End Sub The oCrsr objects do not have HyperLinkTarget/HyperLinkName set on them, although oCrsr.String does return the link name/text. --------------------------------------------------------------------- Please do not reply to this automatically generated notification from Issue Tracker. Please log onto the website and enter your comments. http://qa.openoffice.org/issue_handling/project_issues.html#notification --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
