Use Applescript to go to the end of a text document

applescript

I have a very, very basic question: I have a little Applescript file that cleans up the html tags in a Textwrangler document. At the last stop, I'd like it to go to the end of document and add a line of text within an em html tag. I don't know applscript. To get this far I simply used the record-macro button in the script editor, but now I need to do something like "Goto EOF, write XYZ.

Any help?

Thanks!

Best Answer

This will work-- it operates on the current TextWrangler document. Change "XYZ" to whatever you want.

tell application "TextWrangler"
    set the_text to text of document 1
    set text of document 1 to the_text & return & "<em>XYZ</em>"
end tell

Related Solutions

Applescript: Help to extract PDF “Author” metadata and set it in iTunes Author field

This uses the built in unix commands to get the Author.

Try it and let me know if it needs a tweak.

tell application "iTunes"

    set sel to the selection

    if sel is {} then display dialog "Please select something" buttons {"Cancel"}

    repeat with i from 1 to count of sel

        set the_track to item i of sel

        set the_posix_path to POSIX path of (location of the_track as alias)

        set authorfield to paragraph 2 of (do shell script "mdls -name kMDItemAuthors " & quoted form of the_posix_path & "|  awk -F\\\" '{print $2'}")

        set artist of the_track to (authorfield & "-") as string
    end repeat


end tell

MacOS – How to prepend to text file in AppleScript

Updated Answer:

The code below it what I'd use to replace the original code offered as there appears to be a bug in AppleScript when using the do shell script command in the manner originally presented that isn't present went the code, in a representative manner, is run in a bash script in Terminal.

Note that anytimeopen for access is used, it needs to be coded to trap any errors and try and close the file, which this attempts to do. That said it is not necessarily then only error handling I'd employ and all coding answer I present are done so as proof of concept and the onus to write code employing reasonable error handing is yours to fulfill.

As coded, this will create the target file if it doesn't exist while adding the text to add to it and if it does exist, places the text to add as the top line of the target file.

set targetFilePathname to (POSIX path of (path to desktop as string) & "My Fruit Log.txt")

--    # set theTextToWrite to "This text will be written at the top of the file." & "\n"    
set theTextToWrite to "This text will be written at the top of the file." & "\n"
set theOriginalText to ""
try
    set theOriginalText to (read targetFilePathname) as string
end try
--    # set theTextToWrite to theTextToWrite & "\n" & theOriginalText
set theTextToWrite to theTextToWrite & "\n" & theOriginalText
try
    set referenceNumber to open for access targetFilePathname with write permission
    write theTextToWrite to referenceNumber starting at 0
    close access referenceNumber
on error eStr number eNum
    display dialog eStr & " number " & eNum buttons {"OK"} default button 1 with title "File I/O Error..." with icon caution
    try
        close access referenceNumber
    end try
    return
end try

Best Answer

Related Solutions

Applescript: Help to extract PDF “Author” metadata and set it in iTunes Author field

MacOS – How to prepend to text file in AppleScript

Related Question