Welcome to Tekcomp ASP

3 Active Users Viewing This Site

	Home
	Samples
	Search
	Tools
	Publication
	ASP Links
	Adds
	Forum
	Feedback
	Tekcomp ASP chat
	Site Search:

"The Real Acrobat Adobe Page Number Script: "

Adobe Profession must be installed (NOT ADOBE READER)

Just click Highlight All Button, and copy (Press Control-c on Keyboard) the script into your Script editor such as NotePad or your favorite ASP Editor. And that's all she wrote !...... :)

//Add this in your "Document Javascript" and Name it AddPageNumFields //Then you can call it from the "Set Document Actions" on which ever event you want to happen. //Example: Inlucde this line "AddPageNumFields();" in the "Document Did Save" event. function AddPageNumFields() { //c) 2005 by ARamos(Tekcomp@hotmail.com) information internet - All rights reserved var fMMToPoint = 2.84; var iMarginHorizontal = 5 * fMMToPoint; var iMarginVertical = 5 * fMMToPoint; var iFieldWidth = 10 * fMMToPoint; var iFieldHeight = 20; var dDoc = event.target; sMode = (sMode == null) ? "TL" : sMode; try { var bOldCalculate = dDoc.calculate; dDoc.calculate = false; for (var iPage = 0; iPage < this.numPages; iPage++) { var aRect = dDoc.getPageBox({nPage:iPage}); //Crop Box if (sMode == "TL") { aRect[0] += iMarginHorizontal; aRect[2] = aRect[0] + iFieldWidth; aRect[1] -= (iMarginVertical + iFieldHeight); aRect[3] = aRect[1] + iFieldHeight; } if (sMode == "TR") { aRect[0] = aRect[2] -(iMarginHorizontal + iFieldWidth); aRect[2] = aRect[0] + iFieldWidth; aRect[1] -= (iMarginVertical + iFieldHeight); aRect[3] = aRect[1] + iFieldHeight; } if (sMode == "BL") { aRect[0] += iMarginHorizontal; aRect[2] = aRect[0] + iFieldWidth; aRect[1] = aRect[3] + iMarginVertical + iFieldHeight ; aRect[3] = aRect[1] - iFieldHeight; } if (sMode == "BR") { aRect[0] += aRect[2] -(iMarginHorizontal + iFieldWidth); aRect[2] = aRect[0] + iFieldWidth; aRect[1] = aRect[3] + iMarginVertical + iFieldHeight; aRect[3] = aRect[1] - iFieldHeight; } var sFieldName = "AutoPageNumber" + "." + Math.random(); var fNew = this.addField(sFieldName, "text", iPage, aRect); fNew.delay = true; //Use this line to automatically renumber pages //fNew.setAction("Calculate", "f = event.target; f.value = f.page+1"); fNew.value = iPage + 1; fNew.borderStyle = border.s; fNew.lineWidth = 0; fNew.display= display.visible; fNew.readonly = true; fNew.textFont = "Helvetica"; fNew.textSize = 18; //0 = Auto fNew.alignment = "right" fNew.delay = false; } //Use following two lines to automatically renumber pages (see above) //dDoc.calculate = bOldCalculate; //dDoc.calculateNow(); } catch (e) { app.alert(e); } }

Visitors Since 11/10/99	Home \| Join \| Samples \| Feedback \| Disclaimer Please report any bugs to Webmaster. Copyright © 2008 Tekcomp ASP. All Rights Reserved.