fatal error resolved but still having issue

[Anonymous]

I found the line that was causing the fatal error that I was getting, but I am now having another issue.

I have code that looks as follows:

For Each psent As DBDictionaryEntry In psd
                            id = psd.GetAt(psent.Key)
                            Dim ps As PlotSettings = id.GetObject(OpenMode.ForRead)
                            Dim curps As PlotSettings = New PlotSettings(False)
                            curps.CopyFrom(ps)
                            curps.AddToPlotSettingsDictionary(db)
                            curps.DowngradeOpen()
                            trns.Commit()
                            curps.Dispose()
                            Exit For
                        Next

 This will only copy one pagesetup, how ever I have multiple pagesetups that I need to have copied. I can accomplish that by removing the curps.dispose().

however if I remove that then I start getting the fatal error back.

is there a way that I can close the curps plotsettings without using dispose or close?

[Anonymous · Accepted solution]

finally figured it out.

I used:

using curps....

(did work)

end using

this eliminated the fatal error and also copied all the page setups