Oppure

Loading
05/03/08 17:28
gvigliani
Aiuto!!!! Ho quasi terminato il mio programmone che, funziona benissimo sulla mia macchina ma , quando lo installo su un altro Pc mi da' errore.

L'errore in oggetto è il error '429' ActiveX component can't create object. Ovviamente se installo il visual basic su questa macchina tutti si risolve ma non riesco a trovare l'errore. Conoscete un buon programma di Error Trapping (Handling) che mi permetta di monitorare il programma in esecuzione per verificare in quale function si verifica l'errore??. Un grazie anticipato a quanti mi daranno una mano.
aaa
05/03/08 17:30
gantonio
Beh ... ma il codice che usi qual e'?

Usi un activex?

Esegui una CreateObject ?
aaa
05/03/08 17:51
gvigliani
Il problema è che non riesco a trovarlo l'errore!! Sulla mia macchina, sulla quale ho creato il prg l'errore non me lo da'! Questo si presenta dopo aver installato l'applicazione su un altro Pc.
aaa
05/03/08 18:01
gvigliani
Questo è probabilmente uno dei due errori che mi vengono addebitati:

On Error GoTo ERR_FORM_LOAD
Dim vers As Long
lbl_Version.Caption = App.Major & "." & App.Minor & "." & App.Revision
lblDescription.Caption = App.Comments
            Dim Inet As Object
            Dim b() As Byte
     
                 Const icByteArray = 1

                 Set Inet = CreateObject("InetCtls.Inet")
     
                  b() = Inet.OpenURL("http://www.punto13.altervista.org/aggiopunto/version.txt", icByteArray)

                 Labelnew.Caption = StrConv(b, vbUnicode)

                 Set Inet = Nothing
                 If Mid$(lbl_Version.Caption, 5, 3) < Mid$(Labelnew.Caption, 5, 3) Then
                    lblDisclaimer.Caption = "Nuovi aggiornamenti on line. Premi OK per aggiornare"
                    'cmdOK_Click
                 Else
                 
                    lblDisclaimer.Caption = "Programma aggiornato a " & date
                    cmdOK.Enabled = False
                 End If
Exit Sub

ERR_FORM_LOAD:
    'Error handler
    MsgBox "Errore in Form_Load()" & vbCrLf & "Number " & Err.Number & " " & Err.Description & " at line:" & Erl


Dove potrebbe essere l'errore se sul mio pc non rileva?? Ne' in formato nativo che compilato.
Grazie

[edit] Usare il tag code... [/edit]
Ultima modifica effettuata da Shutdown 06/03/08 16:19
aaa
06/03/08 7:02
gantonio
L'errore viene generato da questa linea

Set Inet = CreateObject("InetCtls.Inet")


perche' nel PC deve esserci il file

MSINET.OCX

e forse in quello dove porti l'applicazione, quel file non c'e'.

Prendilo dalla cartella C:\Windows\System32 e copialo ... infine registralo con

Regsvr32 C:\Windows\System32\msinet.ocx

[edit] TAG CODE... [/edit]
Ultima modifica effettuata da Shutdown 06/03/08 16:20
aaa
06/03/08 14:21
gvigliani
Il file in oggetto è presente nella installazione del Cyberinstaller. Avevo gia' controllato ma ti ringrazio. Ovviamente è anche presente nella system32 di windows, ma nisba!! Mi da' questo errore del menga.
aaa
06/03/08 14:43
gantonio
A volte quel problema e' determinato da un problema di licenza ...

Scarica il file VB6cli.exe da Microsoft e installalo ...
aaa