Setting the the plot configuration

I am using [ObjAcadDoc.Plot.PlotToDevice (PlotConfig)] (PlotConfig) is set to be the ".pc3" file, to create a ".dwf" file of the current drawing, but How can I assure that I use the correct ".ctb" file? In this case "Black_White.ctb" and that I am plotting to extents, scale to fit, and so forth?? I am attempting this in VB 6.0 but it's so similar to VBA that I am confident one of you can point me in the right direction.

THANKS!

Dave. K

 

Dave,

Here is a snippet from one of my applications that may help you.

Joe
--
With oLayout
.StyleSheet = "acad.ctb"
.PlotRotation = ac0degrees

Select Case UCase(Size)
Case "C"
.ConfigName = "C:\Program Files\Autodesk\MDT6\Plotters\C Size Adobe
PDF.pc3"
..
..
..
End With

to be the ".pc3" file, to create a ".dwf" file of the current drawing, but
How can I assure that I use the correct ".ctb" file? In this case
"Black_White.ctb" and that I am plotting to extents, scale to fit, and so
forth?? I am attempting this in VB 6.0 but it's so similar to VBA that I am
confident one of you can point me in the right direction.

 

What Joe's code shows, but isn't explicitly stated, is that the pc3 only
loads the physical plotter settings - all the rest is up to you to set.

___________________________
Mike Tuersley
CADalyst's AutoCAD Clinic
Rand IMAGINiT Technologies

 

Okay, Can you tell me why this doesn't work??
Set ACADLayout = ObjAcadDoc.ActiveLayout
ACADLayout.PlotType = acExtents
ACADLayout.PlotRotation = ac90degrees
ACADLayout.CenterPlot = True
ACADLayout.StandardScale = acScaleToFit
ACADLayout.StyleSheet = StrStylSheet
ACADLayout.RefreshPlotDeviceInfo
it all works except for
ACADLayout.StyleSheet = StrStylSheet
this line kicks me out of the procedure an then continues running the next procedure. StrStylSheet is set to equal "Black_White Plot.ctb"
What I am trying to do is to assure that the plot will be black and white and NOT color.Everything I can find leads me to believe that this should work, bUT??

Thank You.

Dave. K

 

Okay Dave, is it safe to assume that Black_White exists and is found?
Have you tried using the full path name? Try renaming the file with NO
space in it - AutoCAD has never liked spaces in any file names. Also you
need to add the line I added below for the plotstyles to take effect.

ACADLayout.PlotWithPlotStyles = True

 

Yes, I have tried all that, removed the space, included the path, added your line (good idea), completely changed the name, I still get kicked out unless I rem out that line and then I get a color plot. Could it have something to do with the active layout? I am actually plotting model space but when I try to use [Set ACADLayout = ObjAcadDoc.ModelSpace]
I get errors and can't use the PlotType etc.. Also I am plotting to a file (.dwf) if that matters.
I have to be missing something simple, but what??
Thanks for the help.
Dave. K

 

Can you send me a copy of the full code? You may have posted and I
missed it.
___________________________
Mike Tuersley
CADalyst's AutoCAD Clinic
Rand IMAGINiT Technologies

 

I have posted the "Sub" in the new thread. The entire code is large and in Vb 6.0, but if you like I will attempt to attatch it.

Thanks

Dave. K