tell rectangle bildboxname 
	place bildboxpfad 
end tell 

tell rectangle bildboxname	 
place (bildboxpfad) as alias 
end tell 

set myRectangle to make rectangle with properties {geometric bounds:{-3, -3, 300, 210}} 
set myPlacedPDF1 to place bildboxpfad as alias on myRectangle 

place file (theFile as string) 

set myPlacedPDF1 to place file (bildboxpfad as string) on myRectangle 

tell rectangle bildboxname 
place file (bildboxpfad as string) 

set myPlacedPDF1 to place file (bildboxpfad as string) on bildboxname 

set fileToPlace to alias "Macintosh HD:Users:tma:Desktop:test.jpg" 
 
tell application id "com.adobe.InDesign" 
	tell front document 
		place file (fileToPlace as string) on rectangle 1 
	end tell 
end tell 

select rectangle \"B01\" of page id 10713 of spread id 10706 of document id 1 

select (every page item of spread 1 whose label = "deinString") 

on run 
	tell application "Finder" 
		set todoFile to a reference to file "todo.txt" of folder "todo" of desktop 
		set dirk to exists todoFile 
		if not dirk then 
			set todoFile to choose file with prompt "Wählen Sie eine Steuerdatei aus:" 
		end if 
		 
		set todoAccess to open for access (todoFile as alias) 
		set todoText to read todoAccess as «class utf8» 
		close access todoAccess 
		 
		set AppleScript's text item delimiters to "Musterseite:" 
		set todoItems to rest of text items of todoText 
		 
		tell application id "com.adobe.indesign" 
			if not (exists active document) then 
				display dialog "Bitte öffnen Sie eine enstprechende Musterseite" buttons {"Ende"} 
				return 
			end if 
			tell active document 
				repeat with todoItem in todoItems 
					set AppleScript's text item delimiters to ASCII character 10 
					set zeilen to text items of todoItem 
					set zeile1 to item 1 of zeilen 
					set zeilen to rest of zeilen 
					 
					set AppleScript's text item delimiters to "@" 
					set Musterseite to first text item of zeile1 
					set Seitenzahl to second text item of zeile1 
					 
					set masterSpread to master spread Musterseite 
					set newPage to make page at end with properties {applied master:masterSpread} 
					tell newPage 
						set n to index of newPage 
						set pageItems to override page items of page n of masterSpread destination page newPage 
						repeat with pageItem in pageItems 
							if name of pageItem is "" then set name of pageItem to label of pageItem 
						end repeat 
						 
						if exists text frame "Seitenzahl" then 
							set contents of text frame "Seitenzahl" to Seitenzahl 
						end if 
						 
						set n to 1 
						repeat while (count zeilen) > 2 
							set pfad to item 1 of zeilen 
							set zeile2 to item 2 of zeilen 
							set zeilen to rest of rest of zeilen 
							 
							set AppleScript's text item delimiters to "@" 
							set farbe to first text item of zeile2 
							set inhalt to second text item of zeile2 
							 
							set nn to n 
							if n < 10 then set nn to "0" & n 
							set Bnn to "B" & nn 
							set Tnn to "T" & nn 
							 
							try 
								tell rectangle Bnn to place (pfad as alias) 
							end try 
							try 
								tell text frame Tnn 
									set contents to inhalt 
									set fill color to farbe 
								end tell 
							end try 
							set n to n + 1 
						end repeat 
					end tell -- page 
				end repeat -- pages 
				if not dirk then 
					delete page 1 
					display dialog ("Satzvorgang abgeschlossen!") buttons {"OK"} 
				end if 
			end tell -- document 
		end tell -- InDesign 
	end tell 
	set AppleScript's text item delimiters to {} 
end run