Named Views

[Anonymous]

I have problems to find out how to set a named view in VB without using the
dialog box, has anyone succeded yet.

Per Savås

[Anonymous]

'First, get the page viewer
Dim
pageViewer As AdPageView.CAdPageViewerClass
pageViewer =
AxCAdViewer.Viewer

'Next, get the collection of named
views
Dim namedViews As AdPageView.CAdCollectionClass
namedViews =
pageViewer.NamedViews

'Now give the user a little tour of the
named views.
Dim view As AdPageView.CAdPageViewClass
For Each view In
namedViews
    pageViewer.View = view
   
MessageBox.Show(view.name)
Next

"Per Savås" <
href="mailto:per.savas@telia.com">
size=2>per.savas@telia.com> wrote in
message
href="news:2F3CB1779DCB1F66679F41028E044DC8@in.WebX.maYIadrTaRb">
face=Arial
size=2>news:2F3CB1779...
face=Arial size=2>...

> I have problems
to find out how to set a named view in VB without using the
> dialog box,
has anyone succeded yet.
>
> Per Savås
>
>
>

>
>
>