general.aspx

来自「Code for VB.NET教程源码 很好的源码」· ASPX 代码 · 共 22 行

<%@ Import Namespace="System.IO" %>
<%
	dim item as string
	dim items() as string

	items = Directory.GetFileSystemEntries("C:\")

	For Each item in items

		Response.Write( item & "<BR>" )
	next

	Response.Write("<p/>Files beginning with b:<br/>")
	items = Directory.GetFileSystemEntries("C:\","h*")

	For Each item in items

		Response.Write( item & "<BR>" )
	next

%>