خدا پدر و مادر google رو بیامرزه:
ProtectedSub Page_Load(ByVal sender AsObject, ByVal e As System.EventArgs) HandlesMe.Load
Dim sb AsNew StringBuilder()
Dim pathstring AsString = Context.Request.FilePath.ToString()
sb.Append("Current file path = " & pathstring & "<br>")
sb.Append("File name = " & VirtualPathUtility.GetFileName(pathstring).ToStrin g() & "<br>")
sb.Append("File extension = " & VirtualPathUtility.GetExtension(pathstring).ToStri ng() & "<br>")
sb.Append("Directory = " & VirtualPathUtility.GetDirectory(pathstring).ToStri ng() & "<br>")
Response.Write(sb.ToString())
EndSub