<% Server.MapPath("files/folder") %>
<% Option Explicit %> <html> <head> <title>ThaiCreate.Com ASP Server Object</title> </head> <body> <% Dim FSO,objFile Set FSO = Server.CreateObject("Scripting.FileSystemObject") '*** thaicreate.txt จะอยู่ที่ C:\Inetpub\wwwroot\myasp\thaicreate.txt ***' '*** ซึ่งสามารถระบุ Path ปัจจุบันโดยใช้ Server.MapPath ***' Set objFile = FSO.OpenTextFile(Server.MapPath("thaicreate.txt"), 1) Response.Write(objFile.ReadAll) objFile.Close Set objFile=Nothing Set FSO=Nothing %> </body> </html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท