
Run-time error '429': ActiveX component can't create object
Hi All,
sorry, I very bad speak english.
in my programme is fragment:
Dim FS, DC, D
Set FS = CreateObject("Scripting.FileSystemObject")
Set DC = FS.Drives
For Each D In DC
If D.DriveType = 2 Then s = s + D.VolumeName + vbCrLf
Next
MsgBox s
if i run programme in another computer (without VB6), computer show error
message: "Run-time error '429': ActiveX component can't create object".
If i delete this fragment from programme, then programme working correct.
HELP ME.
Thanks.
Algis