🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.scripting.indesign
Article #19808

Re: Database Driven Catalog - ???

#19808
From: Brian C. Carter
Date: Fri, 15 Nov 2002 18:16
33 lines
2309 bytes
This is where I am now 
================== 
myCounter = 1 
myColumnCounter = 0 
myRowCounter = 0 

Do While myColumnCounter < 3 

myTop = ((myRowCounter * myRH) + (myGutter * myRowCounter)) + myMarginTop 
myBottom = ((((myRowCounter + 1) * myRH) + (myGutter * myRowCounter)) + myMarginTop) 
myLeft = ((myColumnCounter * myCW) + (myGutter * myColumnCounter)) + myMarginLeft 
myRight = (((myColumnCounter + 1) * myCW) + (myGutter * myColumnCounter)) + myMarginLeft 

Set myTextFrame = myDocument.Pages.Item(1).TextFrames.Add 
    myTextFrame.GeometricBounds = Array(myTop, myLeft, myTop + (myRH / 4), myRight) 
    myTextFrame.Label = "Name-" & myPage & "-" & myCounter 

Set myTextFrame2 = myDocument.Pages.Item(1).TextFrames.Add 
    myTextFrame2.GeometricBounds = Array(myTop, myRight, myBottom, myLeft) 
    myTextFrame2.Label = "Info-" & myPage & "-" & myCounter 

Set myRectangle1 = myDocument.Pages.Item(1).Rectangles.Add 
    myRectangle1.GeometricBounds = Array(myBottom - (myRH / 8), myLeft, myBottom, myRight) 
    myRectangle1.Label = "Photo-" & myPage & "-" & myCounter 

myCounter = myCounter + 1 
    myColumnCounter = myColumnCounter + 1 
    myRowCounter = myRowCounter + 1 
Loop 
========================== 
not that it's WORKING, it doesn't seem to be looping, or adding to the counter correctly. Did I miss something with the counter syntax? 

I'm also having trouble getting the text into the boxes in the other part of the script, but I'll work on that some more before I throw it at ya.
Technical Details
Message-ID: <1de69529.18@WebX.la2eafNXanI>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-05!sn-xit-01!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed-east.nntpserver.com!nntpserver.com!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX
References: <1de69529.-1@WebX.la2eafNXanI>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,4348409c0a586298
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2002-11-15 10:42:04 PST
From: "Brian C. Carter" <brian@samardist.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-05!sn-xit-01!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed-east.nntpserver.com!nntpserver.com!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: Re: Database Driven Catalog - ???
Message-ID: <1de69529.18@WebX.la2eafNXanI>
Date: Fri, 15 Nov 2002 10:16:55 -0800
References: <1de69529.-1@WebX.la2eafNXanI>
Lines: 44
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit