Senin, 25 Juni 2012

Bls: Bls: [MS_AccessPros] Erorr : fso = CreateObject("Scripting.FileSystemObject")

 

Thanks Crystal :

Here is the completed codes :

Private Sub Command10_Click()
Dim fso
Dim fol As String
fol = "D:\NEW\VBS\a"
fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(fol) Then
fso.DeleteFolder fol
Else
MsgBox fol & " does not exist or has already been deleted!" _
, vbExclamation, "Folder not Found"
End If
End Sub

And the refrences list that are cheked :
- Visual Basic Application
- Microsoft Access 11.0 Access Object Library
- OLE Automation
- Microsoft DAO 3.6 Object Library
-Microsoft ActiveX Data Objects 2.5 Library
-Microsoft Scripting Runtime

Regards
Hendra

________________________________
Dari: Crystal <strive4peace2008@yahoo.com>
Kepada: "MS_Access_Professionals@yahoogroups.com" <MS_Access_Professionals@yahoogroups.com>
Dikirim: Senin, 25 Juni 2012 23:12
Judul: Re: Bls: [MS_AccessPros] Erorr : fso = CreateObject("Scripting.FileSystemObject")


 
Hi Hendra,

please post the whole routine, and anything it calls, thank you

also please tell us what references are checked, thank you

Warm Regards,
Crystal

 *
   (: have an awesome day :)
 *

________________________________
From: Agestha Hendra <agesthahendra@ymail.com>
To: "MS_Access_Professionals@yahoogroups.com" <MS_Access_Professionals@yahoogroups.com>
Sent: Monday, June 25, 2012 9:19 AM
Subject: Bls: [MS_AccessPros] Erorr : fso = CreateObject("Scripting.FileSystemObject")

Thanks Crystal...
Yes, from the beginning i have clicked the Microsoft Scripting Runtime in refrence setting,
after your post i opened again and make sure it have clicked, but still got same erorr when
i run the codes....what's wrong with my access...? :(
Regards
Hendra

________________________________
Dari: Crystal <strive4peace2008@yahoo.com>
Kepada: "MS_Access_Professionals@yahoogroups.com" <MS_Access_Professionals@yahoogroups.com>
Dikirim: Senin, 25 Juni 2012 21:44
Judul: Re: [MS_AccessPros] Erorr :  fso = CreateObject("Scripting.FileSystemObject")

 
Hi Hendra,

Microsoft Scripting Runtime

Warm Regards,
Crystal

Learn Access on YouTube
http://www.youtube.com/LearnAccessByCrystal

 *
   (: have an awesome day :)
 *

________________________________
From: "agesthahendra@ymail.com"

Hi All,..

I tried to run codes to delete a folder,...
but i got an erorr :
Object doesn't support this property or methods
and with highlite on line :
fso = CreateObject("Scripting.FileSystemObject")

What reference library am i missing..?
i use Access 2003...
Any help would be appreciated,...thank you

Regards
Hendra

[Non-text portions of this message have been removed]

[Non-text portions of this message have been removed]

------------------------------------

Yahoo! Groups Links

[Non-text portions of this message have been removed]

[Non-text portions of this message have been removed]

__._,_.___
Recent Activity:
.

__,_._,___

Tidak ada komentar:

Posting Komentar