
<html>
<body>

<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
p=fs.GetDriveName("c:\windows\cursors\abc.cur")

Response.Write("是：" & p)

set fs=nothing
%>

</body>
</html>