<%@ Page Language="VB" %>
<html>
<head>
<title>Determining a Physical Path</title>
<script runat="server">
Sub MapPath()
Dim RelativePath As String
Dim PhysicalPath As String
RelativePath = "HtmlEncode.aspx"
PhysicalPath = Server.MapPath(RelativePath)
Response.Write(PhysicalPath)
End Sub
</script>
</head>
<body>
<% MapPath %>
</body>
</html>