Applescript Error:
MacSQL3 got an error: ct_send failed
Am I very new to applescript so could anybody give me the reason why I'm getting this error.
Here's my code
set QueryText to "SELECT catPage FROM Products_T ORDER BY catPage DESC;" tell front document of application "MacSQL3" set rsPages to do query QueryText results as none set theRow to row 1 of rsPages set TotalPages to values of theRow end tell
repeat with PageNo from 1 to TotalPages set QueryText to "SELECT * FROM Products_T WHERE catPage = " & PageNo tell front document of application "MacSQL3" set rsProducts to do query QueryText results as none (Error on this line) set rowNum to 1 try repeat set theRow to row rowNum of rsProducts set RowValues to values of theRow set RowItems to every text item of RowValues
set ProductID to get item 1 of RowItems set ProductCode to get item 3 of RowItems set PageNo to get item 4 of RowItems set ProductTitle to get item 7 of RowItems set ProductPrice to get item 14 of RowItems
tell application "QuarkXPress" activate tell document 1 tell page PageNo make new text cell at beginning of page PageNo tell text cell 1 set text 1 to ProductTitle end tell end tell end tell end tell
set rowNum to rowNum + 1 end repeat end try delete rsProducts end tell end repeat
David Bradley Senior Web Programmer Globe Media Eastwood Works Fitzwilliam Road Rotherham S65 1JU
Tel: 01709 364721 Fax: 01709 515225 www.globe-media.com
|