speech og activex component

Hej
Jeg er ved at lave et program man skal kunne snakke til.
Jeg har en stationær computer, med windows XP pro.
og jeg har en bærbar med xp home.
Begge har sapi 5.1 og sapi 4.0 installeret.

Jeg udvikler programmet i visual basic(microsoft visual studio 6) på den stationære.
Det virker fint og kører som det skal.

Når jeg skal flytte hele projektet over på den bærbar går det desværre i ged.

Det kommer en:
runtime error '-2147219949 (80040613)':
method 'initialized' of object 'IVcommand' failed

når jeg kompilere det.

Den brokker sig tilsyneladende over
vcommand1.initialized = 1

når denne linie er undladt kører programmet, dog uden funktionalitet. dvs formen er der der sker bare ikke noget det har med speech at gøre.

Når jeg så prøver at pakke det med en windows installer som en msi fil, her husker jeg msm filerne.
Her får jeg stadig en fejl når programmet er blevet pakket ud på den bærbare.

Næste punkt:
Hvordan skal jeg lave mit msi fil, sådan at den kan installeres uden problemer.

mvh s
kode:

Dim gMymenu As Long
Dim current_state As String
Dim notepadID As Integer

Private Sub UpdateList()
Dim i As Long
Dim command As String
Dim description As String
Dim category As String
Dim flags As Long
Dim action As String

List1.Clear
tcount = Vcommand1.CountCommands(gMymenu)
For i = 1 To tcount
Vcommand1.GetCommand gMymenu, i, command, description, category, flags, action
List1.AddItem command
Next i
End Sub

Private Sub Form_Load()
Vcommand1.Initialized = 1
gMymenu = Vcommand1.MenuCreate(App.EXEName, "state1", 4)
Vcommand1.Enabled = 1
Vcommand1.AddCommand gMymenu, 8, "channel", "when you say" + "channel", "listen list", 0, ""
Dim ModeName As String
engine = TextToSpeech1.Find("Mfg=Microsoft;Gender=1")
TextToSpeech1.Select engine

For i = 1 To TextToSpeech1.CountEngines
ModeName = TextToSpeech1.ModeName(i)
Combo1.AddItem ModeName
Next i

Combo1.ListIndex = 7 - 1
TextToSpeech1.CurrentMode = 7
Vcommand1.Activate gMymenu
end sub