Adobe 27510753 Scripting Guide - Page 176

If Err.Number <> 0 Then, If .Trapping = idTrapping.idAdobeInRIP Then

Page 176 highlights

168 Working with Documents in VBScript Adobe InDesign CS2 Scripting Guide Rem idTrapping.idAdobeInRIP. If .Trapping = idTrapping.idAdobeInRIP Then .PrintBlack = True .PrintCyan = True .PrintMagenta = True .PrintYellow = True End If Rem Only change the ink angle and frequency when you want to override the Rem screening set by the screening specified by the screening property. Rem .BlackAngle = 45 Rem .BlackFrequency = 175 Rem .CyanAngle = 15 Rem .CyanFrequency = 175 Rem .MagentaAngle = 75 Rem .MagentaFreqency = 175 Rem .YellowAngle = 0 Rem .YellowFrequency = 175 Rem The following properties are not needed (because colorOutput is set to separations). Rem .CompositeAngle = 45 Rem .CompositeFrequency = 175 Rem .SimulateOverprint = false Rem Rem Properties corresponding to the controls in the Graphics panel of the Print dialog. Rem SendImageData = idImageDataTypes.idAllImageData .FontDownloading = idFontDownloading.idComplete Err.Clear On Error Resume Next .DownloadPPDFonts = True .DataFormat = idDataFormat.idBinary .PostScriptLevel = idPostScriptLevels.idLevel3 If Err.Number 0 Then Err.Clear End If On Error GoTo 0 Rem Rem Properties corresponding to the controls in the Color Management panel of the Print dialog. Rem Rem If the UseColorManagement property of myInDesign.ColorSettings is false, Rem attempting to set the following properties will return an error. Err.Clear On Error Resume Next .SourceSpace = SourceSpaces.useDocument .Intent = RenderingIntent.useColorSettings .CRD = ColorRenderingDictionary.useDocument .Profile = Profile.postscriptCMS If Err.Number 0 Then Err.Clear End If On Error GoTo 0 Rem Rem Properties corresponding to the controls in the Advanced panel of the Print dialog. Rem OPIImageReplacement = False .OmitBitmaps = False .OmitEPS = False .OmitPDF = False Rem The following line assumes that you have a flattener preset named "high quality flattener". Err.Clear On Error Resume Next .FlattenerPresetName = "high quality flattener" If Err.Number 0 Then Err.Clear End If On Error GoTo 0 .IgnoreSpreadOverrides = False End With

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31
  • 32
  • 33
  • 34
  • 35
  • 36
  • 37
  • 38
  • 39
  • 40
  • 41
  • 42
  • 43
  • 44
  • 45
  • 46
  • 47
  • 48
  • 49
  • 50
  • 51
  • 52
  • 53
  • 54
  • 55
  • 56
  • 57
  • 58
  • 59
  • 60
  • 61
  • 62
  • 63
  • 64
  • 65
  • 66
  • 67
  • 68
  • 69
  • 70
  • 71
  • 72
  • 73
  • 74
  • 75
  • 76
  • 77
  • 78
  • 79
  • 80
  • 81
  • 82
  • 83
  • 84
  • 85
  • 86
  • 87
  • 88
  • 89
  • 90
  • 91
  • 92
  • 93
  • 94
  • 95
  • 96
  • 97
  • 98
  • 99
  • 100
  • 101
  • 102
  • 103
  • 104
  • 105
  • 106
  • 107
  • 108
  • 109
  • 110
  • 111
  • 112
  • 113
  • 114
  • 115
  • 116
  • 117
  • 118
  • 119
  • 120
  • 121
  • 122
  • 123
  • 124
  • 125
  • 126
  • 127
  • 128
  • 129
  • 130
  • 131
  • 132
  • 133
  • 134
  • 135
  • 136
  • 137
  • 138
  • 139
  • 140
  • 141
  • 142
  • 143
  • 144
  • 145
  • 146
  • 147
  • 148
  • 149
  • 150
  • 151
  • 152
  • 153
  • 154
  • 155
  • 156
  • 157
  • 158
  • 159
  • 160
  • 161
  • 162
  • 163
  • 164
  • 165
  • 166
  • 167
  • 168
  • 169
  • 170
  • 171
  • 172
  • 173
  • 174
  • 175
  • 176
  • 177
  • 178
  • 179
  • 180
  • 181
  • 182
  • 183
  • 184

168
Working with Documents in VBScript
Adobe InDesign CS2 Scripting Guide
Rem idTrapping.idAdobeInRIP.
If .Trapping = idTrapping.idAdobeInRIP Then
.PrintBlack = True
.PrintCyan = True
.PrintMagenta = True
.PrintYellow = True
End If
Rem Only change the ink angle and frequency when you want to override the
Rem screening set by the screening specified by the screening property.
Rem .BlackAngle = 45
Rem .BlackFrequency = 175
Rem .CyanAngle = 15
Rem .CyanFrequency = 175
Rem .MagentaAngle = 75
Rem .MagentaFreqency = 175
Rem .YellowAngle = 0
Rem .YellowFrequency = 175
Rem The following properties are not needed (because colorOutput is set to separations).
Rem .CompositeAngle = 45
Rem .CompositeFrequency = 175
Rem .SimulateOverprint = false
Rem --------------------------------------------------------------------------------
Rem Properties corresponding to the controls in the Graphics panel of the Print dialog.
Rem --------------------------------------------------------------------------------
.SendImageData = idImageDataTypes.idAllImageData
.FontDownloading = idFontDownloading.idComplete
Err.Clear
On Error Resume Next
.DownloadPPDFonts = True
.DataFormat = idDataFormat.idBinary
.PostScriptLevel = idPostScriptLevels.idLevel3
If Err.Number <> 0 Then
Err.Clear
End If
On Error GoTo 0
Rem --------------------------------------------------------------------------------
Rem Properties corresponding to the controls in the Color Management panel of the Print dialog.
Rem --------------------------------------------------------------------------------
Rem If the UseColorManagement property of myInDesign.ColorSettings is false,
Rem attempting to set the following properties will return an error.
Err.Clear
On Error Resume Next
.SourceSpace = SourceSpaces.useDocument
.Intent = RenderingIntent.useColorSettings
.CRD = ColorRenderingDictionary.useDocument
.Profile = Profile.postscriptCMS
If Err.Number <> 0 Then
Err.Clear
End If
On Error GoTo 0
Rem --------------------------------------------------------------------------------
Rem Properties corresponding to the controls in the Advanced panel of the Print dialog.
Rem --------------------------------------------------------------------------------
.OPIImageReplacement = False
.OmitBitmaps = False
.OmitEPS = False
.OmitPDF = False
Rem The following line assumes that you have a flattener preset named "high quality flattener".
Err.Clear
On Error Resume Next
.FlattenerPresetName = "high quality flattener"
If Err.Number <> 0 Then
Err.Clear
End If
On Error GoTo 0
.IgnoreSpreadOverrides = False
End With