01.<%@ Import Namespace="System.IO"%>
02.<%@ Page Language="VB" %>
03.<script runat="server">
04. Sub Page_Load(sender As Object, e As EventArgs)
05. Dim DirInfo As New DirectoryInfo(Server.MapPath("MyFolder"))
06.
07. If Not DirInfo.Exists Then
08. DirInfo.Create()
09. Me.lblText1.Text = "Folder Created."
10. End If
11.
12.
13. If DirInfo.Exists Then
14. DirInfo.Delete()
15. Me.lblText2.Text = "Folder Deleted."
16. End If
17. End Sub
18.</script>
19.<html>
20.<head>
21.<title>ThaiCreate.Com ASP.NET - Create/Delete Directory</title>
22.</head>
23.<body>
24. <form runat="server">
25. <asp:Label id="lblText1" runat="server"></asp:Label><br />
26. <asp:Label id="lblText2" runat="server"></asp:Label><br />
27. </form>
28.</body>
29.</html>
