<%
Option Explicit
Dim objFileSys
set objFileSys = Server.CreateObject("Scripting.FileSystemObject")
Response.Write "cieka do foldera Windows: " & objFileSys.GetSpecialFolder(0) & "<P>"
Response.Write " cieka do foldera Windows/System: " & objFileSys.GetSpecialFolder(1) & "<P>"
Response.Write " cieka do foldera Temp Folder: " & objFileSys.GetSpecialFolder(2) & "<P>"
%>
