p2p.wrox.com Forums

p2p.wrox.com Forums (http://p2p.wrox.com/)
-   Pro VB 6 (http://p2p.wrox.com/pro-vb-6-73/)
-   -   runtime automation error library not registered (http://p2p.wrox.com/pro-vb-6/60655-runtime-automation-error-library-not-registered.html)

deco July 30th, 2007 05:44 PM

runtime automation error library not registered
 
I try to list the contents of folder by using the FileSystemObject Library the
run-time error '-2147319779(8002801d)'; automation error library not registered
is appears buti use the same application in another computer and its run
i check the reference microsoft scripting runtime
the code
Code:

Dim FSO As New FileSystemObject
Dim FileInFolder As Files
Dim FileName As File
Dim I As Integer
Dim FolderInPath As String
Private Sub Command1_Click()

    Set FileInFolder = FSO.GetFolder("C:\Program Files\NowSMS\SMS-IN").Files

    For Each FileName In FileInFolder
        List1.AddItem FileName
        DoEvents
    Next
 
    For I = 0 To List1.ListCount - 1
          FolderInPath = Replace(List1.List(I), "C:\Program Files\NowSMS\SMS-IN\", App.Path & "\CopyOf(SMS-IN)\" & "(" & I & ")")
          FSO.CopyFile List1.List(I), FolderInPath, False
    Next I

End Sub

deco

Shasur July 31st, 2007 12:27 AM

In the other machine, the machine that shows automation error, run the setup of your program (If you have it)

or

use the following in the run window (Start-->Run) to register the dll

regsvr32 scrrun.dll

Cheers
Shasur


http://www.dotnetdud.blogspot.com

deco July 31st, 2007 09:09 AM

use the following in the run window (Start-->Run) to register the dll

regsvr32 scrrun.dll

it's ok thanks
:)


deco


All times are GMT -4. The time now is 11:22 PM.

Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
2013 John Wiley & Sons, Inc.