This Server application converts Office files to PDF by using ghostscript with Postscript printer.
By : yuppie
<?
//For more Information or a PYthon Server Pages based application see http://www.goermezer.de
//Developed by Mustafa Görmezer
//Please leave the above 3 comments in this script !
$printername="PDF-Datei mit erweiterten Einstellungen"
$psfile="C:\\temp\\".$_FILES['userfile']['name'].".ps";
$pdffile="c:\\Apache2\\htdocs\\uploads\\".$_FILES['userfile']['name'].".pdf";
$result_link="<b>Result: <a href='http://lap-ibm-331/downloads/".$_FILES['userfile']['name'].".pdf'>Open PDF Result</a>\n";
$uploaddir = 'c:\\Apache2\\htdocs\\uploads\\';
$uploaded_doc=$uploaddir.$_FILES['userfile']['name'];
$gsinst="c:\\gs\\gs8.13\\bin\\gswin32c.exe"
?>
<html><head><title>PDF Document Converter</title></head>
<body bgcolor="#FFFFFF" text="#000000" link="#0000FF">
<table width="100%" border="0">
<tr>
<td width="94%"><b>Office2PDF Conversion Service</b></td>
</tr>
<tr>
<td>Supported Formats: doc, rtf, xls, ppt, txt, html, ps, eps</td>
</tr>
</table>
<form enctype="multipart/form-data" action="<? $PHP_SELF ?>" method="post">
<table width="100%" border="0" bgcolor="#CCCCCC">
<tr>
<td width="17%">Office File: </td>
<td width="83%"><input name="userfile" type="file"></td>
</tr>
<tr>
<td width="17%">Document-Password (if given): </td>
<td width="83%"><input name="password" type="password"></td>
</tr>
<tr>
<td>Quality: </td>
<td><table width="200">
<tr>
<td><label>
<input type="radio" name="quality" value="300dpi">
300 DPI</label>
</td>
</tr>
<tr>
<td><label>
<input type="radio" name="quality" value="600dpi">
600 DPI</label>
</td>
</tr>
<tr>
<td><label>
<input type="radio" name="quality" value="1200dpi">
1200 DPI</label>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>Start conversion</td>
<td><input type="submit" name="send" value="send file">
</td>
</tr>
</table>
</form>
<?
if ($_POST['password']){
$password=$_POST['password'];
}
else { $password="False"; }
list ($name, $suffix) = split ('[.]', $_FILES['userfile']['name']);
function excel($document, $ps_file, $pdf_file){
$excel = new COM("excel.application") or die("Unable to instantiate Excel");
$excel->AskToUpdateLinks = 0;
$excel->Workbooks->Open($document);
$excel->Workbooks[1]->Saved=1;
$excel->Workbooks[1]->PrintOut(1, 5000, 1, False, $printername, True, False, $ps_file);
$excel->Workbooks[1]->Close(false);
$excel->Quit();
$excel->Release();
$excel = null;
unset($excel);
while (exec("$gsinst -sDEVICE=pdfwrite -r300 -dNOPAUSE -dBATCH -dSAFER -sPAPERSIZE=a4 -sOutputFile=\"".escapeshellcmd($pdf_file)."\" \"".escapeshellcmd($ps_file)."\"") > 0){
sleep(1);
}
}
function powerpoint($document, $ps_file, $pdf_file){
$powerpoint = new COM("powerpoint.application") or die("Unable to instantiate Powerpoint");
$powerpoint->Visible = 1;
$powerpoint->Presentations->Open($document, False, False, False, False);
$powerpoint->Presentations[1]->Saved=1;
$powerpoint->ActivePrinter = $printername;
$powerpoint->Presentations[1]->PrintOut(1, 5000, $ps_file, 0, False);
$powerpoint->Presentations[1]->Close();
$powerpoint->Quit();
$powerpoint->Release();
$powerpoint = null;
unset($powerpoint);
while (exec("$gsinst -sDEVICE=pdfwrite -r300 -dNOPAUSE -dBATCH -dSAFER -sPAPERSIZE=a4 -sOutputFile=\"".escapeshellcmd($pdf_file)."\" \"".escapeshellcmd($ps_file)."\"") > 0) {
sleep(1);
}
}
function word($document, $ps_file, $pdf_file, $passwd){
$word = new COM("word.application") or die("Unable to instantiate Word");
//$word->Visible = 0;
$word->Documents->Open($document, False, True, False, $passwd);
$word->Documents[1]->Saved = 1;
$word->ActivePrinter = "PDF-Datei mit erweiterten Einstellungen";
$word->Documents[1]->PrintOut(True, False, 0, $ps_file);
while($word->BackgroundPrintingStatus > 0){
sleep(1);
}
$word->Documents[1]->Close(false);
$word->Quit();
$word->Release();
$word = null;
unset($word);
while (exec("$gsinst -sDEVICE=pdfwrite -r300 -dNOPAUSE -dBATCH -dSAFER -sPAPERSIZE=a4 -sOutputFile=\"".escapeshellcmd($pdf_file)."\" \"".escapeshellcmd($ps_file)."\"") > 0){
sleep(1);
}
}
if ($_POST['send']){
print "<pre>";
if (move_uploaded_file($_FILES['userfile']['tmp_name'], $uploaddir.$_FILES['userfile']['name'])) {
if ($suffix=="doc" || $suffix=="dot" || $suffix=="htm" || $suffix=="html" || $suffix=="txt" || $suffix=="rtf"){
word($uploaded_doc, $psfile, $pdffile, $password);
}
elseif ($suffix=="xls" || $suffix=="xlt" || $suffix=="csv"){
excel($uploaded_doc, $psfile, $pdffile);
}
elseif ($suffix=="ps" || $suffix=="prn" || $suffix=="eps"){
while (exec("$gsinst -dBATCH -sDEVICE=pdfwrite -sOutputFile=\"c:\\apache2\\htdocs\\uploads\\".escapeshellcmd($pdffile)."\" -dNOPAUSE \"$uploaded_doc\"") > 0){
sleep(1);
}
}
elseif ($suffix=="ppt" || $suffix=="pps" || $suffix=="pot" || $suffix=="PPT"){
powerpoint($uploaded_doc, $psfile, $pdffile);
} else {
echo'<strong><font color="#FF0000">Dateiformat wird nicht unterstützt !!!</strong></font><br>';
//exec("del \"$uploaded_doc\"");//Hochgeladene Datei löschen
echo'<strong><font color="#FF0000">Hochgeladene Datei wieder gelöscht.</strong></font>';
exit();
}
} else {
echo '<strong><font color="#FF0000">Datei konnte nicht hochgeladen werden !</strong></font>';
exit();
}
while (!(is_writable($pdffile))){
sleep(1);
}
if (!headers_sent()) {
$header="http://localhost/uploads/".$_FILES['userfile']['name'].".pdf";
header ("Location: $header");
exit();
} else { echo 'Das Resultat befindet sich für 24 Stunden unter: <a href="http://rechnername/uploads/'.$_FILES['userfile']['name'].'.pdf">'.$_FILES['userfile']['name'].'.pdf</a>'; }
exit();
}
?>
</BODY>
</HTML>
| DISCLAIMER: The content provided in this article is not warranted or guaranteed by Developer Shed, Inc. The content provided is intended for entertainment and/or educational purposes in order to introduce to the reader key ideas, concepts, and/or product reviews. As such it is incumbent upon the reader to employ real-world tactics for security and implementation of best practices. We are not liable for any negative consequences that may result from implementing any information covered in our articles or tutorials. If this is a hardware review, it is not recommended to open and/or modify your hardware. |
More Miscellaneous Code Articles
More By Codewalkers
 developerWorks - FREE Tools!
|
You'll get answers to many questions and more from David Barnes, Lead Evangelist for IBM Emerging Internet Technologies. David will discuss aspects of Web 2.0 that bring value to corporations, academia, and government. He'll also discuss IBM's vision around Web 2.0, including the importance of remixability and consumability. The discussion will culminate with examples of various IBM Software Group solutions you can use to get ahead of the Web 2.0 adoption curve.
FREE! Go There Now!
|
|
|
|
As businesses grow increasingly dependent upon Web applications to provide services to customers, employees and partners, these complex applications become more difficult to secure. Although traditional security solutions protect Internet infrastructure layers, they do not guard against HTTP and HTML attacks. Many organizations that conduct security testing still deploy applications that allow attackers to manipulate their logic and wreak havoc on their business. To mitigate this risk, development and delivery teams must address Web application security throughout the lifecycle, addressing the many layers detailed in this paper.
FREE! Go There Now!
|
|
|
|
You probably have thousands of lines of COBOL code loaded with business intelligence and being used to run your business, along with an army of developers maintaining these applications. Learn how to prepare your applications and developers so you can keep that competitive edge and move to a service-oriented architecture with the IBM Rational Enterprise Modernization solutions. Replay is available for 9 months.
FREE! Go There Now!
|
|
|
|
Learn to enable users to both rate existing animations and to combine existing animations into new snippets. This is the third in a series of three tutorials that chronicle the building of a site that enables collaborative discussion and animation building using Domino and OpenLaszlo.
FREE! Go There Now!
|
|
|
|
Secure your Web applications with IBM Rational AppScan Standard Edition V7.7, previously known as Watchfire AppScan. This Web application security testing tool automates vulnerability assessments and scans and tests for common Web application vulnerabilities. Visit IBM developerWorks to download a free trial of IBM Rational AppScan Standard Edition V7.7.
FREE! Go There Now!
|
|
|
|
Learn how to implement a build management system that uses and extends your existing automation technologies. This tutorial shows, step-by-step, how to install and configure IBM Rational Build Forge to manage builds for Jakarta Tomcat from source code.
FREE! Go There Now!
|
|
|
|
Get a free trial download of the latest version of IBM Rational Tester for SOA Quality V7.0.1, a functional and regression testing tool that enables the creation, comprehension, modification and execution of testing GUI-less Web services.
FREE! Go There Now!
|
|
|
|
As businesses grow increasingly dependent upon Web applications, these complex entities grow more difficult to secure. Most companies equip their Web sites with firewalls, Secure Sockets Layer (SSL), and network and host security, but the majority of attacks are on applications themselves – and these technologies cannot prevent them. This paper explains what you can do to help protect your organization, and it discusses an approach for improving your organization’s Web application security.
FREE! Go There Now!
|
|
|
|
The Eclipse community is constantly working to extend Eclipse's functionality. In this webcast, learn about some of the most important and feature-rich projects under development. From multi-language support to plug-in development, tune in to see what Eclipse is capable of now.
FREE! Go There Now!
|
|
|
|
With IBM Rational Systems Development Solution, you can deliver products faster with higher quality. Within this kit, Read the “Model Driven Systems Development” white paper to see how to improve product quality and communication. Then check out the rest of the e-Kit to learn more about important topics that can affect the success of any software project through customer examples, tutorials, informative Webcasts, and best practices for designing, building and managing systems. From start to finish, at every stage in your projects, Rational Systems Development Solution can help your company reach its full potential.
FREE! Go There Now!
|
|
|
|
All FREE IBM® developerWorks Tools!
|
