FileSystemObject Type mismatch

  • Thread starter NuBie via AccessMonster.com
  • Start date
N

NuBie via AccessMonster.com

Given this declaration i got runtime error: 13 Type Mismatch.
variable origin is a string containg the folder location.


Dim fs As New FileSystemObject
Dim f As Folder
Dim afile As File
Set f = fs.GetFolder(origin)

So.. what's wrong why i get type mismatch?

Thanks
 
N

NuBie via AccessMonster.com

Dim fs As New FileSystemObject
' replace this line Dim f As Folder with
Dim f As Scripting.Folder
Dim afile As File
Set f = fs.GetFolder(origin)

Thread resolved!!!
someone may find this useful!!
 
Top