Clutch Cargo

  • Content count

  • Joined

  • Last visited

Community Reputation

0 Neutral

About Clutch Cargo

  • Rank
  1. thx for the input. Yea, the script at the bottom is not clearly defined. I should repost when I have a little something more concrete to show the error message which is usually something like "vbscript (or Illustrator), does not support this method"
  2. Hey there... my first post. Over the months I think I have become a fairly good beginner with vbscript and have even interfaced with Photoshop and Illustrator but this one has stumped me for weeks. If you are familiar with Illustrator I am trying to take a Tiff image and trace it with a custom trace I have created. So if you are interested in vbscript and Illustrator I could really use a second pair of eyes. Apparently, it can be done. I have API documentation, Java and VBA examples but this is over my head. Any takers? Here is what I have so far (one of many renditions): Set App = CreateObject("Illustrator.Application") Set FSO = CreateObject("Scripting.FileSystemObject") Set SourceFolder = FSO.GetFolder("S:\SOCAL\Section_31\Land Cover") Dim FileRef For Each FileRef In SourceFolder.Files Set AutoCADOpenOptions = App.Preferences.AutoCADFileOptions AutoCADOpenOptions.MergeLayers = false CurrentInteractionLevel = App.UserInteractionLevel App.UserInteractionLevel = -1 ' aiDontDisplayAlerts Set myDoc = App.Open(FileRef.Path,2) App.UserInteractionLevel = CurrentInteractionLevel ubound(App.TracingPresetsList) ' The line below loads tiff file into Illustrator ready for a custom trace App.DoScript "LandCover-1", "Land Cover Auto" ' From thi point on I am having no success. Need help building this out. Dim idoc : idoc = App.ActiveLayer Dim iplaced : iplaced = App.PlacedItem Dim itraced : itraced = App.ActiveLayer Dim iFile : iFile = FileRef.PlacedItems.Trace iFile.tracing.tracingOptions.loadFromPreset(tracingPresets[3])