Referenced Memory Error

[JRD]

Thanks to anytone in advance that can help me...

Sorry for the long Post...

I am getting a double error from word when I route a
document (Win 2000 Pro, Office 2000 Pro).

The route function is being called inside VBA on a click
event from a command button.

THE ERROR:
WINWORD.EXE - Application Error
The instruction at "0x304f015e" referenced memory
at "0x00000008". The memory could not be "read".

Click OK to terminate the application
Click CANCEL to debug to program.

SAMPLE CODE:
'This is the routing function to set the routing features.
Sub RouteDoc()

ThisDocument.HasRoutingSlip = True
With ThisDocument.RoutingSlip
.Subject = "File Restore Request... (CED)"
Select Case Me.MANAGER_FIELD
Case "Gordy"
.AddRecipient Recipient:="Gordon Goodall"
Case "Roxie"
.AddRecipient Recipient:="Roxie Winiecke"
Case "Art"
.AddRecipient Recipient:="Art Talbot"
Case "Tyler"
.AddRecipient Recipient:="Tyler Perkins"
Case "Bob"
.AddRecipient Recipient:="Robert Graul"
Case "Travis"
.AddRecipient Recipient:="Travis Johnson"
Case "Mike"
.AddRecipient Recipient:="Mike Holub"
Case "Jeannine"
.AddRecipient Recipient:="Jeannine
Thompson"
End Select
.AddRecipient Recipient:="ISSC"
.AddRecipient Recipient:="Albert Lui"
If RouteButton.Caption = "Route to a Technician"
Then
.AddRecipient Recipient:=InputBox("Please
enter the User Name " & _
"of the Technician to
whom you will be " & _
"assigning this
Request.", _
"Enter USER ID of
Tech")
End If
.Delivery = wdOneAfterAnother
.ReturnWhenDone = True
End With

End Sub

' Button Click Function Parameters
Private Sub RouteButton_Click()

With RouteButton
Select Case .Caption
Case "Route to " & Me.MANAGER_FIELD
.Caption = "Route to the ISSC"
Call RouteDoc
Case "Route to the ISSC"
.Caption = "Route to Albert Lui"
Call RouteDoc
Case "Route to the Albert Lui"
.Caption = "Route to a Technician"
Call RouteDoc
Case "Route to a Technician"
.Caption = "Complete the Routing"
.Enabled = False
Call RouteDoc
End Select
End With
Me.Route

End Sub


Thanks

Jeremy Darrington
Smead Manufacturing Company.

 

[Jeremy]

I found out that my template had an embedded Routing Slip.
I removed the existing and saved the template again, This
seemed to fix the problem for sending, but now no one can
open it when the template is forwarded on.

I can't figure it out. I hope that all are up to date on
the most current Office Updates. Thanks to anyone who
studied this one out.

Jeremy