Adobe Illustrator export as JPEG

--this script exports a JPEG for each open Adobe Illustrator document
--Destination is the same folder as the AI document
--it then closes all open AI documents without saving

tell application "Adobe Illustrator"
    set theDocuments to every document

    repeat with i from 1 to the count of theDocuments

        set thePath to (file path of document i) as text
        set thePath to text 1 thru -4 of thePath

        set theAlias to (thePath & ".jpg") as text
        set theJPGExportOptions to {class:JPEG export options, antialiasing:false, quality:100, optimization:true}

        set current document to document i
        export front document as JPEG to theAlias with options theJPGExportOptions
    end repeat
    close every document saving no
end tell