default.aspx

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

<%@ Language="VB" %>
<%@ Import Namespace="System.IO" %>

<%

dim Drives() as string
dim Drive as string

Drives = Directory.GetLogicalDrives()

For Each Drive in Drives
	Response.Write(drive)
	Response.Write("<BR>")
Next


%>