[REBOL] PDF to HTML Converter
From: ryanc::iesco-dms::com at: 4-May-2001 10:48
Becuase of all the interist lately in reading PDF's, I just had to put a user interface
on a conversion script I made. Its pretty cheezy, but also kinda cute
in its own right, as it demonstrates remote processing. --Ryan
Title: "PDF to HTML Converter"
Author: "Ryan S. Cole"
Comments: "Just some junk code I had that I slopped a UI on."
convert: function [
"converts pdf url to html"
where-to [file! URL! block!]
document: read/custom PDF-conversion-URL reduce [
'post rejoin ["url=" pdf "&extract_order=-x&reflow_p=X&clear_p=X"]
either empty? where-to [
write %temp.html document
foreach f where-to [write f document]
view layout [
title "PDF to HTML Converter"
label "URL of PDF document"
pdf-url: field ("http://www.ftc.gov/os/1999/9910/64fr59888.pdf")
label "Save to"
button "Browse" [save-to/text: mold request-file show save-to]
button "Convert" [
convert load pdf-url/text load save-to/text