Thanks in advance for your wisdom.#!/usr/bin/perl use CGI qw/:standard/; use Acrobat::FDF; use DBI; $data = new CGI; my $tablenamesent = $data->param('tablename'); my $brokerclientsent = $data->param('brokerclient'); my $dbh = DBI->connect("DBI:mysql:mywebplace:localhost","myuser","mypa +ssword"); $sth = $dbh->prepare("SELECT * FROM $tablenamesent WHERE BrokerClient += ?"); $sth->execute($brokerclientsent); my($AmmountOfMortgage, $AmmountOfPurchase, $AttachCopyOf1003, $AttachCopyOfContract, $AttachCopyOfMortgageCommitment, $AttachCopyOfPresentOwnerOrTitlePolicy, $BinderNeededDate, $BrokerClient, $ClosingDate, $CopiesLenderLendersAttorney, $CopiesPurchaserBorrower, $CopiesPurchasersBorrowersAttorney, $CopiesSellerSellersAttorney, $FBByEMail, $FBByFax, $FBByMail, $FBLenderLendersAttorney, $FBPurchaserBorrower, $FBPurchasersBorrowersAttorney, $FBSellerSellersAttorney, $GlobalSalesRep, $LenderAdderss, $LenderCity, $LenderFaxNumber, $LenderName, $LenderPhoneNumber, $LenderState, $LenderZip); $sth->bind_columns(undef, \$AmmountOfMortgage, \$AmmountOfPurchase, \$AttachCopyOf1003, \$AttachCopyOfContract, \$AttachCopyOfMortgageCommitment, \$AttachCopyOfPresentOwnerOrTitlePolicy, \$BinderNeededDate, \$BrokerClient, \$ClosingDate, \$CopiesLenderLendersAttorney, \$CopiesPurchaserBorrower, \$CopiesPurchasersBorrowersAttorney, \$CopiesSellerSellersAttorney, \$FBByEMail, \$FBByFax, \$FBByMail, \$FBLenderLendersAttorney, \$FBPurchaserBorrower, \$FBPurchasersBorrowersAttorney, \$FBSellerSellersAttorney, \$GlobalSalesRep, \$LenderAdderss, \$LenderCity, \$LenderFaxNumber, \$LenderName, \$LenderPhoneNumber, \$LenderState, \$LenderZip); $outFdf = new Acrobat::FDF; $outFdf->SetFile('http://www.mywebplace.com/fdf_pdfs/App.pdf'); $outFdf->SetValue("LenderZip", $LenderZip, 0); $outFdf->SetValue("BrokerClient", $BrokerClient, 0); $outFdf->SetValue("GlobalSalesRep", $GlobalSalesRep, 0); $outFdf->SetValue("LenderState", $LenderState, 0); $| = 1; print "Content-type: application/vnd.fdf\n\n"; $outFdf->SaveToFile('-');
20040330 Edit by castaway: Changed title from 'A Noob with heart...'
In reply to Premature end of script headers by CandymanCID
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |