Code looks like this, (CA Sales Tax Form):ie: $DueDate = 'January 31, 2002;
Any suggestions?use win32::GuiTest; $MyPhone = "xxx-xxx-xxxx"; do "STData.dat"; if ( $Client eq " TEST " ) # fill in company specific data { do "TEST.dat"; } system("start \"C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe +\" Current_Sales_Tax"); sleep 10; Tab(); Send("$DueDate"); Tab(); Send("$Period"); Tab(); Send("$Year"); Tab(); Send("$PermitNum"); Tab(); Send("$Name"); Tab(); Send("$Street"); Tab(); Send("$City"); Tab(); Send("$State"); Tab(); Send("$Zip"); Tab(); Send("$GrossSales"); Tab(2); Send("$GrossSales"); Tab(); Send("$Resale"); Tab(); Send("$Food"); Tab(); Send("$Labor"); Tab(); Send("$SalesToGov"); Tab(10); Send("$TotalNonTaxable"); Tab(); Send("$SubjectToST"); Tab(2); Send("$StateTax"); Tab(); Send("$SubjectToST"); Tab(); Send("$CountyTax"); Tab(2); Send("$SubjectToST"); Tab(); Send("$LocalTax"); Tab(); Send("$DistrictTax"); Tab(); Send("$TotalST"); Tab(2); Send("$TotalST"); Tab(); Send("$PmtOne"); Tab(); Send("$PmtTwo"); Tab(); Send("$TotalPmt"); Tab(); Send("$RemaningTax"); Tab(3); Send("$RemaningTax"); Tab(2); Send("$CoPhone"); Tab(3); Send("$MyPhone"); Tab(3); Send("$SubjectToST"); Tab(2); Send("$SubjectToST"); Tab(); Send("$PermitNum"); Tab(); Send("$Period $Year"); #------------------------- Subroutines ------------------------- sub Send { Win32::GuiTest::SendKeys("$_[0]"); } sub Tab { #USAGE: Tab() or Tab(3) or any other number if ($_[0]) { Win32::GuiTest::SendKeys("{TAB $_[0]}"); } else { Win32::GuiTest::SendKeys("{TAB}"); } }
In reply to Ghost fill in adobe forms by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |