<% FolderObject.CopyFolder(Soruce,Destination) %>
<% Option Explicit %> <html> <head> <title>ThaiCreate.Com ASP Folder Object</title> </head> <body> <% Dim objFSO,objFolder Set objFSO = Server.CreateObject("Scripting.FileSystemObject") objFSO.CopyFolder Server.MapPath("MyFiles"),Server.MapPath("MyFiles2") Response.write("Folder copyed") Set objFSO = Nothing %> </body> </html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท