indesign-script - Bilder neu verknüpfen mit Daten in Unterverzeichnissen.

Das folgende Skript verknüpft die Bilder neu mit Bilddateien in einem ausgewählten Verzeichnis und dessen Unterverzeichnissen - sofern der Verknüpfungsstatus "fehlend" ist.

// RelinkLinksOfDocs2NewPath_inSubfolders.jsx   
   
var topFolder = Folder.selectDialog ("Topverzeichnis wählen...");  
 
// Einfangen der Unterverzeichnisse 
var myFolders = scanSubFolders(topFolder);   
var myUpdates = 0; 
 
// Schleife durch die Dokumnete 
for (var d = app.documents.length-1; d >= 0; d--) 
	procDoc(app.documents[d]); 
	 
alert(myUpdates + " Verknüpfungen aktualisiert");   
 
// --------------------------------------------------- 
//                Funktionen 
// --------------------------------------------------- 
 
function procDoc(aDoc) 
{    
	// Schleife durch die Verknüpfungen 
	for (var l = aDoc.links.length-1; l >= 0; l--)  
		procLink(aDoc.links[l]); 
} 
 
function procLink(aLink) 
{   
	// Verknüpfungsstatus "fehlend" 
	if (aLink.status == LinkStatus.linkMissing) 
	{ 
		var myName = String(File.encode(aLink.name));  	  
		// Schleife durch die Unterverzeichnisse 
		for (var f = 0; f < myFolders.length; f++) 
		{   
			// neuer Verknüpfungspfad 
			var myNewLink = File(myFolders[f]+ "/" + myName);  
			try 
			{   
				// Verknüpfungsvorgang 
				aLink.relink(myNewLink); 
				   
				// bei Erfolg: Aktualisierung der Verknüpfung + mitzählen 
				aLink.update();  
				myUpdates++;  
				break; 
			}   
			catch(e){}   
		} 
	} 
}    
 
function scanSubFolders(tFolder)   
{   
	var sFolders = new Array();   
	sFolders[0] = tFolder;   
	for (var j = 0; j < sFolders.length; j++) // loop through folders   
	{              
		var procFiles = sFolders[j].getFiles();   
		for (var k = 0; k < procFiles.length; k++) // loop through this folder contents   
		{ 
			if (procFiles[k] instanceof Folder)  
				sFolders.push(procFiles[k]);   
		}   
	}   
	return sFolders;   
}