I have used the Package Deployment to create the cab file & installed it on client pcs, but when the exe is run on NON-Development pcs then
I keep getting this Error 430:
Class does not support Automation or does not Support expected interface
I have a class & all I do is create an object of that class in my submain()
But after troubleshooting here is where the problem lies i think:
---------------------------------------------------------
Code Below for SubMain()
---------------------------------------------------------
Set objPath = New Scripting.FileSystemObject
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
' The following code will search for the DB if it has been
' moved or if the DB is not found in the current dir the
' very first time the app is run on a users pc
TryAgain:
strDBPath = frmDBLoc.PathFilename
If Len(strDBPath) = 0 Then
strDBPath = PathSlash(App.Path) & "Wings DB.MDB"
End If
If Not objPath.FileExists(strDBPath) Then
frmDBLoc.Setup vbModal, strDBPath
If frmDBLoc.Cancel Then
End
End If
GoTo TryAgain
End If
--------------------------------------------------------
I put a messagebox after this piece of code & on the client pcs that messagebox never showed so its somewhere in here the problem is....I hope the right files are being distributed with the Package Deployment wizard cause it really doesnt give u a choice to select a diff version of a file....
Please HELP!!!!!!!!!!!!
Arif
