Tizio98
2005-12-02 09:41:46 UTC
Salve a tutti, ho un grosso problema con questa cavolo di libreria. Ho la
necessità di interfacciare un registratore di cassa ad un gestionale in
Access. Come da consigli da qualcuno di voi e che ancora ringrazio
infinitamente, ho usato la libreria in oggetto e dal momento che ho provato
una routine di prova sul PC che uso in ufficio, e sulla quale non ho
chiaramente la possibilità di provare la cassa, va tutto ok, o meglio il
codice non da errore. Il codice è descritto nel seguente testo:
Dim MSComm1 As Object
Set MSComm1 = CreateObject("MSCommLib.MSComm")
MSComm1.Settings = "2400,e,7,1"
MSComm1.CommPort = 1
MSComm1.PortOpen = True
ecc....
Il problema esce fuori quando ho provato a far digerire questo codice ad
altri PC, ben 3 diversi. Tutti sulla set si bloccano dando il messaggio che
il controllo ActiveX non può creare l'oggetto. Premetto che tutti i PC,
compreso quello dove va tutto bene, non hanno VB istallato ma hanno la
libreria registrata e referenziata regolarmente. L'unica differenza ma solo
su due dei 3 computer su cui non gira è Access 2003 invece di XP, che
comunque è istallato sul terzo e su cui non gira lo stesso. Io non so più
che pesci prendere e dove andare a parare ed il codice mi serve funzionante
entro oggi. Cercando su internet ho trovato qualche variante, per esempio:
Dim MSComm1 As MSCommLib.MSComm
Set MSComm1 = New MSCommLib.MSComm
ma il risultato è il medesimo, stesso blocco sulla set e stesso messaggio.
Vi prego aiutatemi a far luce su questo problema.
Grazie mille a tutti.
Ciao, Ciao.
necessità di interfacciare un registratore di cassa ad un gestionale in
Access. Come da consigli da qualcuno di voi e che ancora ringrazio
infinitamente, ho usato la libreria in oggetto e dal momento che ho provato
una routine di prova sul PC che uso in ufficio, e sulla quale non ho
chiaramente la possibilità di provare la cassa, va tutto ok, o meglio il
codice non da errore. Il codice è descritto nel seguente testo:
Dim MSComm1 As Object
Set MSComm1 = CreateObject("MSCommLib.MSComm")
MSComm1.Settings = "2400,e,7,1"
MSComm1.CommPort = 1
MSComm1.PortOpen = True
ecc....
Il problema esce fuori quando ho provato a far digerire questo codice ad
altri PC, ben 3 diversi. Tutti sulla set si bloccano dando il messaggio che
il controllo ActiveX non può creare l'oggetto. Premetto che tutti i PC,
compreso quello dove va tutto bene, non hanno VB istallato ma hanno la
libreria registrata e referenziata regolarmente. L'unica differenza ma solo
su due dei 3 computer su cui non gira è Access 2003 invece di XP, che
comunque è istallato sul terzo e su cui non gira lo stesso. Io non so più
che pesci prendere e dove andare a parare ed il codice mi serve funzionante
entro oggi. Cercando su internet ho trovato qualche variante, per esempio:
Dim MSComm1 As MSCommLib.MSComm
Set MSComm1 = New MSCommLib.MSComm
ma il risultato è il medesimo, stesso blocco sulla set e stesso messaggio.
Vi prego aiutatemi a far luce su questo problema.
Grazie mille a tutti.
Ciao, Ciao.