<% FileSystemObject.CopyFile(Source,Destination,Overwrite) %>
<% Option Explicit %> <html> <head> <title>ThaiCreate.Com ASP FileSystemObject Object</title> </head> <body> <% Dim objFSO Set objFSO = Server.CreateObject("Scripting.FileSystemObject") objFSO.CopyFile Server.MapPath("MyFiles/thaicreate.txt"),Server.MapPath("MyFiles/thaicreate-new.txt"),True 'objFSO.CopyFile Server.MapPath("MyFiles/*.txt"),Server.MapPath("MyNewFiles/"),true '*** Copy All files *.txt ***' Response.write ("File Copyed") Set objFSO = Nothing %> </body> </html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท