%@ Import Namespace="System.IO" %>
<%
Dim strPath As String
' Get a Temporary File
strPath = Path.GetTempFileName
Response.Write( "
Created TempFile " & strPath )
' Retrieve File Name
Response.Write( "The name of the file is " )
Response.WRite( Path.GetFileName( strPath ) )
' Retrieve Directory Name
Response.Write( "The name of the directory is " )
Response.Write( Path.GetDirectoryName( strPath ) )
' Retrieve File Extension
Response.Write( "The file has the extension " )
Response.Write( Path.GetExtension( strPath ) )
%>