VisSaveAsWeb user-defined type not defined

[Robert H]

I copyed the code to create an HTML page form a similar visio file to
a newer one. now when I ren the code I recieve the error: "user-
defined type not defined" with "Dim saveAsWeb As VisSaveAsWeb"
highlighted.

I searched through the older (working) file and cannot see where I did
anything else to define "VisSaveAsWeb"

Im sure Im missing something simple. If someoen would set in the
right direction I would be greatful.
Robert

Code:

Public Sub saveAsWeb()

Dim vsoSaveAsWeb As VisSaveAsWeb
Dim vsoWebSettings As VisWebPageSettings

'Sychronize with database prior to posting web page
RefreshAllShapes



' Get a VisSaveAsWeb object that represents a new Web page project.
Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject

' Get a VisWebPageSettings object.
Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings

' Configure preferences.
With vsoWebSettings
.DispScreenRes = res1024x768
.PageTitle = True
.StartPage = 1
.EndPage = 2
.QuietMode = True
.TargetPath = "C:\Documents and Settings\rhatcher.UNI\My
Documents\Visio\SSPTA\Working\SSTA Project Using VLTF4h.htm"
End With

' Create the pages.
vsoSaveAsWeb.CreatePages
End Sub

 

[AlEdlund]

did you include the proper references?
al

 

[Robert H]

Probably not how do I make sure I am using the right references?

 

[AlEdlund]

open vba, go to tools, references, and make sure it matchs the working
version,
al

 

[John... Visio MVP]

Or you could do a Bing (or Google) on VisSaveAsWeb. With Bing, if you search
for images, only one hit is found and it displays the reference dialog
showing what is needed.

John... Visio MVP

Probably not how do I make sure I am using the right references?

 

[Robert H]

Thanks Al and john, I have the proper reference selected and am back
in business.
Robert