<% Server.CreateObjet("COM/MODULE") %>
<% Option Explicit %> <html> <head> <title>ThaiCreate.Com ASP Server Object</title> </head> <body> <% Dim Fso,Drive Set Fso=Server.CreateObject("Scripting.FileSystemObject") Set Drive=Fso.GetDrive("C:") Response.Write("Drive " & Drive & " = " &FormatNumber((Drive.TotalSize)/1024/1024/1024,0)&" GB") set Fso=nothing set Drive=nothing %> </body> </html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท