you're welcome, Hendra ;) happy to help
Warm Regards,
Crystal
*
(: have an awesome day :)
*
________________________________
From: Agestha Hendra
Ooh..okay... i have to setted it, and now it run successfully...Thanks John, Thanks Crystal....Have a nice day... :)
Regards
Hendra
________________________________
Dari: Agestha Hendra
Thanks John,,..
I have tried that but give other erorr :
highlite :
fso = CreateObject("Scripting.FileSystemObject")
erorr desc :
Object variable or With block variable not set
Regards
Hendra
________________________________
Dari: John Viescas
Hendra-
You need to:
Dim fso As Object
When you just Dim fso, it's a Variant that can't accept an object.
John Viescas, author
Microsoft Office Access 2010 Inside Out
Microsoft Office Access 2007 Inside Out
Building Microsoft Access Applications
Microsoft Office Access 2003 Inside Out
SQL Queries for Mere Mortals
<http://www.viescas.com/> http://www.viescas.com/
(Paris, France)
From:Agestha Hendra
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
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
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
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]
Senin, 25 Juni 2012
Re: Bls: [MS_AccessPros] Erorr : fso = CreateObject("Scripting.FileSystemObject")
__._,_.___
.
__,_._,___
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar