Col Wizard di Visal Basic ho creato un pacchetto di installazione per una
mia applicazione.Tale applicazione ha sempre funzionato, dal momento che ho
introdotto
questa funzione:
Public Function CalcolaCodiceInterno(drvpath As String) As Long
Dim fs, d
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
CalcolaCodiceInterno = d.SerialNumber
End Function
mi compare l'errore in oggetto.
Se può essere utile, ho riscontrato che se è installato Visual Basic 6,
l'errore
non compare.
Grazie
Donato Rossi
"Donato Rossi" <donat...@tin.it> wrote in message
news:m8i66.13791$jT6.6...@twister2.tin.it...
SYMPTOMS
When you use the Package and Deployment Wizard, error 429 may occur in the
following two situations:
When you open the Package and Deployment Wizard, this error message appears:
Run-time error '429':
ActiveX component can't create object
-or-
After you choose the Package or Deploy button in the Package and
Deployment Wizard, the following error message appears:
Unexpected error number 429 has occurred: ActiveX component can't create
object.
CAUSE
A file is not properly registered on the development computer.
RESOLUTION
To resolve the problem, use these steps:
1) If the error occurs when you try to open the Package and Deployment
Wizard, you need to unload the Package and Deployment Wizard, manually
register the file named Pdwizard.ocx, and then reload the wizard.
- From the Add-Ins menu, choose Add-In Manger.
- Select Package and Deployment Wizard from the list of available
add-ins.
- Clear the Loaded/Unload check box in the Load Behavior section of
the Add-In Manager dialog box and then close the dialog box.
- Register the Pdwizard.ocx file by using the RegSvr32 utility. On
the Windows Start menu, select Run and execute the following command:
- Regsvr32 "C:\Program Files\Microsoft Visual
Studio\VB98\WIZARDS\PDWIZARD\pdwizard.ocx"
From the Add-Ins menu, choose Add-In Manager.
- Select Package and Deployment Wizard from the list of available
add-ins.
- Check the Loaded/Unload check box in the Load Behavior section of
the Add-In Manager dialog box and then close the dialog box.
If the error occurs just after you choose the Package or Deploy button, the
file named Hostwiz.dll needs to be manually registered.
- Register the Hostwiz.dll file by using the RegSvr32 utility. On the
Windows Start menu, select Run, and then execute the following command:
- Regsvr32 "C:\Program Files\Microsoft Visual
Studio\COMMON\Wizards98\hostwiz.dll"
Ciao
Enrico
Donato Rossi wrote in message ...
>Salve a tutti
>Ho un problema di sistema che vorrei sottoporvi, sperando che possiate
>aiutarmi.
>
>Col Wizard di Visal Basic ho creato un pacchetto di installazione per una
>mia applicazione.Tale applicazione ha sempre funzionato, dal momento che ho
>introdotto
>questa funzione:
>
>Public Function CalcolaCodiceInterno(drvpath As String) As Long
>Dim fs, d
>
> Set fs = CreateObject("Scripting.FileSystemObject")
> Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
> CalcolaCodiceInterno = d.SerialNumber
>
>End Function
>
>mi compare l'errore in oggetto.
>Se puņ essere utile, ho riscontrato che se č installato Visual Basic 6,
Con questa istruzione stai creando un riferimento ad un oggetto che non e'
fornito dalle librerie standard di VB ma da una libreria esterna; in particolare
la trovi nella finestra dei riferimenti come "Microsoft Scripting Runtime"
corrispondente al file SCRRUN.DLL nella cartella SYSTEM.
Il fatto e' che, probabilmente, non e' stata selezionata tra i riferimenti (il
che non e' obbligatorio, dato che usi il late binding con "CreateObject" ) e
quindi l'Autocomposizione non l'ha inclusa automaticamente nei file da
distribuire; se rigeneri il setup vedrai che ad un certo punto ti viene data la
possibilita' di aggiungere manualmente ulteriori file: e' sufficiente includere
la la dll suddetta.
Ciao
--
Luca Dormio
luca....@tin.it
Modifica il progetto cosi':
1) Includi la libreria scrrun.dll (microsoft script runtime) fra le
references del progetto;
2) modifica la riga di codice:
Set fs = CreateObject("Scripting.FileSystemObject")
con
Set fs = New Scripting.FileSystemObject
3) Rifai il setup del tuo programma: adesso la dll verra' inclusa
automaticamente nell' installazione.
Ciao
Aldo
Sperando di esserti stato di aiuto ti saluto.
Ciao
Paolo
"Granata Crescenzo" <cgra...@agarde.it> ha scritto nel messaggio
news:sjj66.1552$g_2....@news.infostrada.it...