Alternate text for "Text content"

Hi friends,
I have one doube in postscript language to implement alternate text for "Text content"
Can anybody please help me on this
We have using the below tags for alternate text for images.
[/Subtype /Figure /Alt (Image of Figure 2-1) /StPNE pdfmark
[/_objdef {layoutObj} /type /dict /OBJ pdfmark
[{layoutObj} <</O /Layout /Height 70 /Width 140 /BBox [90 290 250 360]
[/Obj {layoutObj} /StAttr pdfmark
[/StBMC pdfmark
Please share me your comments
Regards,
Jayakrishnan

I wouldn't swear to this, but I think what's happening is the effect is essentially treated as a separate image during export, but as far as I know you have no way to select it to add the alt text or anything else. I don't really do this kind of work, so I could be way off base here.
A newer version of ID might behave better, so you may want to consider downloading the trial for CS4

Similar Messages

Using Oracle Text for Text Mining

Hi all !
I have 30000 text documents stored in a table and I want to construct a "dictionnary" that contains all the terms include in those documents. I will use this dictionnary to classify my documents with the text mining solutions of Oracle.
I created an index with a multi datastore, specific lexer, stoplist and wordlist and it creates well my dictionnary. The problem is that I would like to add some other tokens containing more than a word. I wonder how to use the index created : I tried to work on the table $I created for the index but it's not really successful. So I thought about 2 solutions :
- work on the index with insert, delete and synchronise operations
- find a way to insert the additionnal tokens (which corresponds to pattern) during the indexing operation
Can you help me ?
Laetitia

Hi,
Check out a thesaurus (enter your phrases here) and see if it will do what you need:
http://download-west.oracle.com/docs/cd/B19306_01/text.102/b14217/cthes.htm#i1006324
Don't modify the $I table as a general rule (or any system-generated table).
Thanks,
Ron

SD-Default text for Text Ids after text determiantion

Dear Friends,
I have set up text id and assigned to Text procdeure for my Sales quoation header as header text.
Can we populate a default text when create quotaion through VA21
Quick response would be of great help
Regards
Siva

done on own

Alternate library for ATV content...

The movies and TV shows I have purchased through my ATV are filling up my computer's HD, therefore I need to move them to an alernate library in order to free up space in my computer. I do not want to move my whole library to the time capsule because I want to be able to play my music in my computer when I am not at home. Can this be done?
Also, form here on, when I purchase a movie through my ATV, will it sync to my computer or will it sync directly to the new alternate library in Time Capsule?
Thanks...!

There is no need to create 2 separate libraries. My set up consists of 2 ATVs, one syncing music and one syncing selected TV Shows. It is also syncing selected audio to a nano and selected audio and video to a touch. My video library is now over 1TB so it will definitely not fit on my MacBook Pro's 200GB drive. Since all the video I want for my weekly 4 day trips will fit on my touch there is no need to carry my external drive with me.
My iTunes Media folder remains on my MacBook Pro's hard drive containing audio files (Podcasts, Music and Audiobooks). All my Movies and TV Show video files live on an external drive. Remove the check beside iTunes Preferences Advance menu's "Copy files to iTunes Media folder when adding to library". You can now move all the videos over to the external drive. iTunes will probably lose it's association to them displaying the exclamation mark beside them in iTunes requiring you to delete their entries from here as well. Once they are all transferred over to the external drive and removed from the computer's iTunes Media folder you can add them back into iTunes.
iTunes will recognize the videos when connected to your external drive however display the exclamation mark beside them when the external drive is not connected. Any iPods syncing to iTunes will retain any videos according to you sync settings even though iTunes will display the exclamation mark. Video syncing will return to normal once iTunes is connected to the drive with the movies. Windows users should assign the external drive a drive letter so it doesn't change, Mac users need not worry here.
Now the only real down fall with this set up is new video purchases will need to be transfer over to the external drive and re-added to iTunes.

Adding replacement text for acronyms using the SDK

All
I have an existing C++ plugin for Acrobat Pro that walks through documents page by page doing different things (e.g. changing annotations) on each page.
As part of an effort to make out PDF files "accessible" I have an issue.
One of things that I have been asked to do is to look at creating PDF "replacement text" for a list of acronyms as they occur in a document. I believe the optimal outcome would be to somehow make the acronyms as "marked-content" and created "replacement text" for the marked-content (The marked-content being an acronym).
I have been looking at the core API, PDFEdit, and PDSEdit. It looks like PDFEdit would be the set of tools that might be able to do this, but I don't think it will. It doesn't seem like there is a way to "mark content" using PDFEdit. If I was able to cerate the correct marked content, it looks like the there isn't a way to add "replacement text" for that marked content.
We are creating structured PDF files, so I looked at PDSEdit. It appears that it pretty easy to created alternate text for an element. However, the elements are usually entire paragraphs so I would have to create "alternate text" for the entire paragraph just to have replacement for an acronym in the paragraph.
Playing with the "content streams" is something new to me, so I am wondering if it looks like I have considered all of the options?
Thanks

Leonard
Looking at PDSEdit, it appears that I have to create replacement text for entire element. Our elements are entire paragraphs for the most part. I was thinking that I couldn't just provide replacement text for a single word in the paragraph and I would have to provide replacement text for the entire paragraph since there is only 1 replacement text per element.
Maybe I didn't think about this enough (I shouldn't be allowed to talk out loud on Fridays). If I could split an existing element into 3 elements (before acronym, acronym, after acronym), I could avoid building replacement text for the entire paragraph. Or maybe I can created marked content with PDSEdit as a separate structure element? Not sure I can do that.
Do you think I can do what I want to do with PDSEdit?
I guess I am struggling a little to understand how the content streams relate to the items in the basic PDF structure (e.g. replacement text for marked content) and the document structure.
Sorry about rambling..
Thanks

When I open FF there is no text displaying(menus, content, etc.), and most of the window is blacked out. For example... I can is the the firefox button on the t

When I open FF there is no text displaying(menus, content, etc.), and most of the window is blacked out. For example... I can see the the firefox button on the top left corner, when I go to it the drop down list drops and there is no text, if I move down the drop down I hit where there is a slide out in that drop down and no text is there. So, to start in safe mode you need to go to the firefox button, and click on start in safe mode. I can't See safe mode or click on anything were safe mode should be.

hello, close all firefox windows & hold the shift-key while opening firefox in order to launch it in safemode. in the first dialog just choose "continue in safemode" and go to firefox > options > advanced > general. in there disable hardware acceleration, restart firefox normally again and see if this has changed anything.
also see [[Upgrade your graphics drivers to use hardware acceleration and WebGL]]

Node text not found in Settings for BI Content

Hi gurus,
We have installed BI_CONT 704 SPS07 in a NW 7.01 system. In SPRO tx, all nodes for "Settings for BI Content" appears with the text "Node text not found".
Could you help me, please?
Best Regards

Hello,
First of all I would look in SLG1 at the log. If that isn't enough then see if you can reproduce it on a test system by running SWN_SELSEN manually.
regards
Rick Bakker
hanabi technology
PS And there you see another reason not to use obsolete programs like RSWUWLML2.

Acrobat X Pro: Accessibility Report says No Alt Text for image but there is

I have added the alternate text for images on my pdf but the accessibility report is still giving me errors stating that there is no alternate text. Does anyone have any idea why? I have checked and the alt text is there. I don't understand this.
Thank you.

I assume when you click on the error it is taking you to the location where the error is. Not seeing the document it is hard to tell... do you have a multi-page document and when you click on the error does it take you to the location where that problem is?
There are several things that could cause this problem. The Figure or other tag that contains the alt text must have content. It cannot be an empty tag.
It also cannot have another Tag inside of it containing the content. There must be some actual content directly within the Tag with the alt text, not nested inside another Tag, if that makes any sense.
Or, there may be another Figure Tag that has no content. That, too, will generate an error.
If neither of those suggestions work, if you post the file I can probably find the problem.

How to: Print table on first page, use second page (back) for text only

Hi, I am looking for a clear document on how to use pagination and the Odd and Even pages.
We need to print a table over several pages, but only on Odd pages.
On the back of each page we need to print "Terms and Conditions". Is that possible? Can it be done without scripting
We are on ADOBE version 8.1
In the file properties, double sided is switched on, and version set to 8.1 and higher.
I created two Master pages, a FrontPage with ContentArea1and a BackPage with ContentArea2.
FrontPage is used for uneven pages, BackPage is used for the even pages. The masterpages are printed correctly (alternating properly).
Two pages were created for the content area's:
ITEMS: contains item data (table with header and footer). Place is "On Odd Page". After "Goto page BackPage". And if the table needs to be paginated it goes to BackPage with overflow leader "Conditions".
CONDITIONS: contains a textfield (Terms and Conditions). Place is "On Even Page". After "Goto page FrontPage". No overflow.
What should happen is that on the front pages the item table is printed. If there are too many lines it should overflow to page number 3 then 5 etc. All the even pages should display the text.
What actually happens is that the item table also gets printed in the content area for the Condition text...
Also the "Conditions" are not printed on the last back page. But only once before it...
Cheers,
Edwin.

Fixed it... After a lot of creating, deleting, playing around with pagination and the inevitable cursing...
I have created 5 pages:
1. FirstPage
     - Odd/Even: Odd (Front) Pages
     - Placement: First page (In page set)
2. FrontPage (For Odd pages)
     - Odd/Even: Odd/Front Pages
     - Placement: Rest of Pages
3. BackPage (For Even pages)
     - Odd/Even: Even (Back) Pages
     - Placement: Rest of Pages
4. LastPage
     - Odd/Even: No Odd/Even Restrictions
     - Placement: Last page (In page set)
5. DummyPage
     - Odd/Even: Blank pages
The 'Terms and conditions' are located on the BackPage and LastPage (as a text).
The table that is printed is (of course) located on a normal page (flowed subform).
Pagination tab: Placement = Following previous, and After = "Continue filling parent". No overflow... Basically, it's all default.
The table lines will now start on the first page and if there are more lines than can be printed on this page, it will continue in the next content area. That will be on the FrontPage.
The trick is that each master page must have a content area (mandatory). Except for Blank pages, but these cannot be used... Blank pages would only be used once, after the first page.
What I discovered is that you can drag a content area away from the Master page and attach it to a different master page.
Logically, if there is no content area on a page, then data cannot be printed there. So, I created a Dummypage. On this page I dumped the content areas from the LastPage and the BackPage. As a result, content cannot be printed anymore on the back of pages. Only the standard text (a text field) is printed there. When the data from the table is overflowing, it will automatically overflow from the FirstPage to the next content area. Which is located on the FrontPages only.
The DummyPage is NOT used anywhere.
The result is that the records can only be printed on the content areas that exist on the First and Front pages. The back pages are now skipped.
Duplex printing is now working correctly, and the text is printed on the back of all the pages.
Cheers,
Edwin.

How to customize the content set in text as part of tag cq:text property="text"/

We use the tag <cq:text property="text"/> to get the content, which is set in the jcr property "text". Text was set in Richtext component and it has hyper link.
Now, we have to customize the text.
Example:-
Actual Text in 'text' property:-
Click <a data-action="Hyperlink" data-upc-tooltip-type="none" href="/content/www-abc-healthcare-ch/en/offer.html">here</a> for the link 
After customization in 'text' property:-
Click <a data-action="Hyperlink" data-upc-tooltip-type="none" href="/content/www-abc-healthcare-ch/en/offer">here</a> for the link 
i.e .html has been removed.
I tried customizing and set back to text attribute using <c:set var="text" value="<CustomizedText>" /> but even after that tag <cq:text property="text"/> retrieves the old content i.e with .html
Please suggest how to override text content, so that the tag <cq:text property="text"/> will print customized text.

Which version of cq? Is Strict Extension Check enabled at http://<host>:<port>/system/console/configMgr/com.day.cq.rewriter.linkchecker.impl.LinkCheckerTra nsformerFactory
Thanks,
Sham

How user can get a Sales Text for the any Line Item in the Billing?

Salute Masters ! !
How user can get a Sales Text for the any Line Item in the Billing?
It's coming for other Order (Line Item for Bought out Item at Project Site - Some Item they procure at project site & complete the task).
Where I can configure in system for all.
Rgds
Srivastav
09973504950

Hi,
Sales text can be copied from customer to order , order to delivery and delivery to billing .
Check the T-code : VOTXN , do the customization as per your requirement.
check the below link :
http://help.sap.com/saphelp_erp60_sp/helpdata/en/dd/55f993545a11d1a7020000e829fd11/content.htm

CREATE SUBSTITUTION RULE FOR u0093COPYING LINE ITEM TEXT FOR LINE ITEMSu0094

Hi every body
When user post transactions in FB60 we have give the line item text, Suppose no.of lineitems are there in tht instnace my client asked to create the substitution rule to COPYING LINE ITEM TEXT FOR LINE ITEMS
pls tell me the processes how to create the substitution rule
Plz can anyboby help me out...
laxmi velaga

sorry,
link doesn't work:
here's the content:
you must add your rules at event 3 (complete document)
in an exit of ZGGBS000:
data htext type bseg-sgtxt.
*find
LOOP AT BOOL_DATA-BSEG INTO BSEG
WHERE bseg-sgtxt <> space.
move bseg-sgtxt to htext.
ENDLOOP.
*copy
LOOP AT BOOL_DATA-BSEG INTO BSEG
WHERE bseg-sgtxt = space.
move htext to bseg-sgtxt
*modify
MODIFY BOOL_DATA-BSEG FROM BSEG.^
ENDLOOP.
http://help.sap.com/saphelp_47x200/helpdata/en/5b/d231a843c611d182b30000e829fbfe/frameset.htm
please reward useful answers
thanks and regards
Andreas

Unable to add body text for Purchase Order

Hi,
If this question has been posted before request send me the link .
We are sending PO as a PDF attachment to email.
To add body text to this I copied the print program SAPFM06P and modified the fm06pe04 program.
DATA : l_mail_text TYPE bcsy_text,
 l_mail_text_row TYPE soli.
 CONCATENATE 'Please check the' ' Attached file' INTO l_mail_text_row.
 APPEND l_mail_text_row TO l_mail_text.
 document = cl_document_bcs=>create_document(
 i_type = 'PDF' " cf. RAW, DOC
 i_hex = pdf_content
 i_text = l_mail_text "added by me
 i_length = lp_pdf_size
 i_subject = lv_subject ). "#EC NOTEXT
But it does not show in the body text.
But if I use the add_attachment method the text comes as an attachment.
I am not sure what is the error here.
Regards,
Narayani

DATA: send_request TYPE REF TO cl_bcs.
DATA: text TYPE bcsy_text.
DATA: binary_content TYPE solix_tab.
DATA: document TYPE REF TO cl_document_bcs.
DATA: sender TYPE REF TO cl_sapuser_bcs.
DATA: recipient TYPE REF TO if_recipient_bcs.
DATA: bcs_exception TYPE REF TO cx_bcs.
DATA: sent_to_all TYPE os_boolean.
 Convert the OTF file format ino the PDF format.
 CALL FUNCTION 'CONVERT_OTF_2_PDF'
 IMPORTING
 bin_filesize = lwa_bin_filesize
 TABLES
 otf = lt_otf
 doctab_archive = lt_doctab_archive
 lines = lt_pdf_lines
 EXCEPTIONS
 err_conv_not_possible = 1
 err_otf_mc_noendmarker = 2
 OTHERS = 3.
 REFRESH lt_objbin.
 get the pdf data into the attachment table .
 CALL FUNCTION 'SX_TABLE_LINE_WIDTH_CHANGE'
 EXPORTING
 line_width_dst = 255
 TABLES
 content_in = lt_pdf_lines
 content_out = lt_objbin
 EXCEPTIONS
 err_line_width_src_too_long = 1
 err_line_width_dst_too_long = 2
 err_conv_failed = 3
 OTHERS = 4.
 Refresh the local tables and workareas.
 REFRESH: lt_reclist,
 lt_objtxt,
 lt_objpack.
 TRY.
 CLEAR send_request.
 -------- create persistent send request ------------------------
 send_request = cl_bcs=>create_persistent( ).
 -------- create and set document with attachment ---------------
 create document from internal table with text
 REFRESH text.
 APPEND 'Body1.' TO text.
 APPEND 'Body2.'TO text.
 APPEND 'Body3.'TO text.
 CLEAR document.
 document = cl_document_bcs=>create_document(
 i_type = 'RAW'
 i_text = text
 i_length = '12'
 i_subject = 'Electronic Payment Notification' ).
 FIELD-SYMBOLS <fs_x> TYPE x.
 DATA lv_content TYPE xstring.
 CLEAR lv_content.
 LOOP AT lt_objbin INTO lwa_objbin.
 ASSIGN lwa_objbin TO <fs_x> CASTING.
 CONCATENATE lv_content <fs_x> INTO lv_content IN BYTE MODE.
 ENDLOOP.
 CLEAR pdf_content.
 pdf_content = cl_document_bcs=>xstring_to_solix(
 ip_xstring = lv_content ).
 add attachment to document
 BCS expects document content here e.g. from document upload
 binary_content = ...
 CONCATENATE 'Remittance_' sy-datum sy-uzeit '.pdf' INTO lv_filename_cl.
 CALL METHOD document->add_attachment
 EXPORTING
 i_attachment_type = 'PDF'
 i_attachment_subject = lv_filename_cl
 i_att_content_hex = pdf_content.
 add document to send request
 CALL METHOD send_request->set_document( document ).
 --------- set sender -------------------------------------------
 note: this is necessary only if you want to set the sender
 different from actual user (SY-UNAME). Otherwise sender is
 set automatically with actual user.
 CLEAR sender.
 sender = cl_sapuser_bcs=>create( sy-uname ).
 CALL METHOD send_request->set_sender
 EXPORTING
 i_sender = sender.
 CALL METHOD send_request->set_status_attributes(
 EXPORTING
 i_requested_status = 'N'
 i_status_mail = 'N' ).
 Fill the receiver for the email with PDF attachemnt.
 CLEAR : lwa_reclist,
 lwa_lfa1,
 lwa_adr6.
 CLEAR lwa_lfa1.
 READ TABLE lt_lfa1
 INTO lwa_lfa1
 WITH KEY lifnr = lwa_reguh-lifnr.
 IF sy-subrc EQ 0.
 CLEAR lwa_adr6.
 READ TABLE lt_adr6
 INTO lwa_adr6
 WITH KEY addrnumber = lwa_lfa1-adrnr.
 IF ( sy-subrc EQ 0 )
 AND ( lwa_adr6-smtp_addr IS NOT INITIAL ).
 --------- add recipient (e-mail address) -----------------------
 create recipient - please replace e-mail address !!!
 CLEAR recipient.
 recipient = cl_cam_address_bcs=>create_internet_address(
 lwa_adr6-smtp_addr ).
 ELSE.
 CLEAR lv_fax.
 lv_fax = lwa_lfa1-telfx.
 recipient = cl_cam_address_bcs=>create_fax_address(
 i_country = lwa_lfa1-land1
 i_number = lv_fax ).
 ENDIF.
 ENDIF.
 add recipient with its respective attributes to send request
 CALL METHOD send_request->add_recipient
 EXPORTING
 i_recipient = recipient
 i_express = 'X'.
 ---------- send document ---------------------------------------
 CALL METHOD send_request->send(
 EXPORTING
 i_with_error_screen = 'X'
 RECEIVING
 result = sent_to_all ).
 IF sent_to_all = 'X'.
 WRITE text-003.
 ENDIF.
 COMMIT WORK.
 CATCH cx_bcs INTO bcs_exception.
 WRITE: 'Error Occured'.
 WRITE: 'Error', bcs_exception->error_type.
 EXIT.
 ENDTRY.

What is the best font size for text when making a book in iBooks Author? My present font is Baskerville at 20 pt.

What is the best font size for text when making a book in iBooks Author? My present font is Baskerville at 20 pt.

For what audience? What reading level? Which Flesch-Kincaid index? What type of content? How much white space? What language(s)?

Search for text and font

I have an 800 page pdf document to index and so far I have a script that will search for a list of keywords. But the text has large sections of code in a different font, and I think we would like to generate an index of just code examples. Is there a way to search for text of a given font in applescript? Something like
set theSel to find text theText
if the font of theSel is "Times"
write to file, etc.

Please do send a page, I might be able to spot where the font problem is coming from - but no guarantee Address is in my profile.
You asked about the script formatter. red_menace of this forum wrote the script I use. To use it, you copy the script that you want to format to the clipboard and run the formatter. This then places the marked-up text in the clipboard so that you can paste it into the forum page.
<pre style="
font-family: Monaco, 'Courier New', Courier, monospace;
font-size: 10px;
margin: 0px;
padding: 5px;
border: 1px solid #000000;
width: 720px; height: 340px;
color: #000000;
background-color: #FFDDFF;
overflow: auto;">
script formatter - formats the clipboard text for forum posting
last reviewed January 19, 2009 red_menace[at]mac[dot]com
Input: text read from the clipboard
Output: formatted text copied to the clipboard
set AppleScript's text item delimiters to " "
-- some constants and switches
property TextColor : "#000000" -- black (see http://www.w3schools.com/tags/ref_colornames.asp)
property BackgroundColor : "#FFDDFF" -- a light plum/purple
property BorderColor : "#000000" -- black
property TheWidth : "width: 720px; " -- a width attribute (deprecated in HTML 4.01)
property UseWidth : true -- use the width attribute?
property LineCount : 25 -- the number of lines before including the height attribute
property TheHeight : "height: " & ((LineCount * 13.6) as integer) & "px; " -- a maximum height for the <pre> box
property Emphasize : false -- emphasise (bold) the script text?
property UseURL : false -- include a Script Editor message link?
property AltURL : false -- use an alternate URL encoding?
property ToolTips : {¬
"this text can be pasted into the Script Editor", ¬
"this text can be pasted into an Automator 'Run AppleScript' action", ¬
"this text can be pasted into an Automator 'Run Shell Script' action", ¬
"this text can be pasted into a HTML editor", ¬
"this text can be pasted into a text editor", ¬
"- none -"}
property TooltipDefault : {item 1 of ToolTips} -- keep track of the last tooltip used
property TempFile : "Script_Formatter_TempFile" -- a temporary work file
try
-- write the clipboard to the temporary file
set TheClipboard to (the clipboard) as text
if TheClipboard is in {"", space, tab, return} then return -- clipboard is (basically) empty
set MyOpenFile to open for access ("/tmp/" & TempFile & ".txt" as POSIX file) with write permission
set eof of MyOpenFile to 0 -- empty any previous temp file
write TheClipboard to MyOpenFile
close access MyOpenFile
if UseURL then
-- encode URL (see http://developer.apple.com/documentation/Darwin/Reference/Manpages/man1/pydoc.1. html)
do shell script "/usr/bin/python -c 'import sys, urllib; print urllib.quote(sys.argv[1])' " & quoted form of TheClipboard
-- add a link wrapper
set URLtext to "applescript://com.apple.scripteditor?action=new&script=" & the result
if AltURL then -- use an alternate URL encoding
set URLtext to "Click here to [url=" & URLtext & "]open this script in the Script Editor[/url]: "
else -- use HTML anchor tag
set URLtext to "Click here to <a href=\"" & URLtext & "\">open this script in the Script Editor</a>: "
end if
set PromptText to ((count URLtext) as text) & " URL and "
else
set {URLtext, PromptText} to {"", ""}
end if -- UseURL
-- convert to HTML (see http://developer.apple.com/documentation/Darwin/Reference/ManPages/man1/textutil .1.html)
do shell script "cd /tmp/; /usr/bin/textutil -convert html -excludedelements '(html, head, title, body, p, span, font)' -encoding US-ASCII " & TempFile & ".txt"
-- fix up some formatting and add a pre wrapper (see http://www.w3schools.com/tags/default.asp)
set HTMLtext to rest of paragraphs of (read ("/tmp/" & TempFile & ".html" as POSIX file))
if (count HTMLtext) is less than LineCount then -- skip the height attribute
set Height to ""
else
set Height to TheHeight
end if
set HTMLtext to FixCharacters from (HTMLtext as text) -- additional character encodings
if UseWidth then
set Width to TheWidth
else
set Width to ""
end if
if Emphasize then set HTMLtext to "" & HTMLtext & ""
set HTMLtext to "<pre style=\"
font-family: Monaco, 'Courier New', Courier, monospace;
font-size: 10px;
margin: 0px;
padding: 5px;
border: 1px solid " & BorderColor & ";
" & Width & Height & "
color: " & TextColor & ";
background-color: " & BackgroundColor & ";
overflow: auto;\"
title=\"\">
" & HTMLtext & "</pre>
-- assemble everything on the clipboard
set TheResult to choose from list ToolTips ¬
with title "Script Formatted" with prompt PromptText & ((count HTMLtext) as text) & " HTML characters will be placed on the clipboard (plus the following ToolTip):" default items TooltipDefault OK button name "OK" cancel button name "Cancel" with empty selection allowed without multiple selections allowed
if TheResult is false then -- cancel button
error number -128
else -- add the selected title attribute (tooltip), if any
set TooltipDefault to TheResult as text
set Here to (offset of " title=" in HTMLtext) - 1
set There to (offset of ">" in HTMLtext) - 1
if TheResult is in {{}, "- none -"} then -- no tooltip
set the clipboard to URLtext & (text 1 thru (Here - 1) of HTMLtext) & (text (There + 1) thru -1 of HTMLtext)
else
set the clipboard to URLtext & (text 1 thru (Here + 9) of HTMLtext) & TheResult & (text There thru -1 of HTMLtext)
end if
end if -- TheResult is false
on error ErrorMessage number ErrorNumber
log space & (ErrorNumber as text) & ":" & tab & ErrorMessage
try
close access MyOpenFile
end try
if (ErrorNumber is -128) or (ErrorNumber is -1711) then -- nothing (user cancelled)
else
activate me
display alert "Error " & (ErrorNumber as text) message ErrorMessage as warning buttons {"OK"} default button "OK"
end if
end try
to FixCharacters from TheText
fixes (converts) formatting characters used in some message forums (see http://www.asciitable.com/)
parameters - TheText [text]: the text to fix
returns [text]: the fixed text
-- this list of lists contains the characters to encode - item 1 is the character, item 2 is the HTML encoding
set TheCharacters to {¬
{"!", "!"}, ¬
{"*", "*"}, ¬
{"+", "+"}, ¬
{"-", "-"}, ¬
{"[", "["}, ¬
{"\\", "\"}, ¬
{"]", "]"}, ¬
{"^", "^"}, ¬
{"_", "_"}, ¬
{"~", "~"}}
set TempTID to AppleScript's text item delimiters
repeat with SomeCharacter in TheCharacters
if item 1 of SomeCharacter is in TheText then -- replace
set AppleScript's text item delimiters to item 1 of SomeCharacter
set the ItemList to text items of TheText
set AppleScript's text item delimiters to item 2 of SomeCharacter
set TheText to the ItemList as text
end if
end repeat
set AppleScript's text item delimiters to TempTID
return TheText
end FixCharacters
</pre>

Alternate text for "Text content"

Similar Messages

Maybe you are looking for