How to Check whether a file is text file or not in ASP

How to Check whether a file is text file or not in AS开发者_开发知识库P

<%
dim fs
set fs=Server.CreateObject("Scripting.FileSystemObject")
Response.Write(fs.GetExtensionName("c:\test\test.htm"))
set fs=nothing
%>

Output:

htm