VB6 - Errore programma su altro pc.

[pierchi]

Ciao a tutti, ho realizzato il mio primo semplice programma, che utilizza le dll inout32.

Sul pc dove ho creato il progetto, non c'è nessun problema, funziona tutto regolarmente.

Ho creato il mio file EXE e ho spostato il file su un nuovo pc (che non ha VB installato)... all'avvio ricevo l'errore:
Run-Time Error 429 ActiveX Component can't create object


Tutti i file dll, sono copiati (system32 e drivers) e registrati!

Da cosa può dipendere?

[gibra]

Originariamente inviato da pierchi

Run-Time Error 429 ActiveX Component can't create object


Tutti i file dll, sono copiati (system32 e drivers) e registrati!

Da cosa può dipendere?

Il messaggio di errore non lascia dubbi :
dipende dal fatto che NON tutti i componenti sono registrati correttamente.

[pierchi]

Allora farò altre prove... anche se non saprei, ho copiato tutte le dll con attenzione.


Un'altra cosa, nei riferimenti del mio programma in VB, ho anche selezionato la riga (vado a memoria) c:\programmi\microsoft visual basic\vb98\vb6.???

che logicamente nel computer dove voglio metterlo, non c'è (perchè VB non è installato).

Può essere quella la causa?


grazie

[oregon]

Ma hai solo copiato o anche registrato?

[pierchi]

Originariamente inviato da oregon
Ma hai solo copiato o anche registrato?

ho copiato e registrato tutte le stesse dll che avevo aggiunto sul pc dove avevo fatto il programma


eccetto il percorso indicato nel post precedente

[oregon]

Nel codice hai usato una CreateObject ?

[pierchi]

questo:

Option Explicit
Private Const PAR1 = &H378
Private IO As New INOUT32
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMillisencond As Long)

    Private Sub Form_Load()
    MSComm1.Settings = "9600,N,8,1"         'Setto la porta COM
    MSComm1.CommPort = 1                    'Il numero della porta com da aprire
    IO.BitSet PAR1, 6       'setto il bit della parallela 
    MSComm1.PortOpen = True 'apro la porta com
    Dim Buffer As Variant   'faccio le dichiarazioni
    Dim ByteArray() As Byte
...
...
...

spero di non aver scritto boiate, è il mio primo programmino (che sembra andare)

[oregon]

Quindi non usi CreateObject, neanche nel resto del programma ... ?

Quali DLL/OCX hai copiato e registrato?

Penso che tu abbia utilizzato almeno queste

INOUT32.DLL
MSCOMM32.OCX

Giusto?

[pierchi]

Originariamente inviato da oregon
Quindi non usi CreateObject, neanche nel resto del programma ... ?

Quali DLL/OCX hai copiato e registrato?

Penso che tu abbia utilizzato almeno queste

INOUT32.DLL
MSCOMM32.OCX

Giusto?

esatto ho usato quelle.


Ho però risolto, sostituendo la inout con la new inout!

Ho sostituito il Private IO as New INOUT32

con

Dim IO As NINOUT32.CNINOUT32

e adesso funziona anche sull'altro pc!

Grazie per il tempo che mi avete dedicato!

[oregon]

Originariamente inviato da pierchi
Dim IO As NINOUT32.CNINOUT32

Prego ... e spero che la (mia) NINOUT32 ti sia servita ...