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