la otra vez tambien pregunte lo mismo y alzu propuso esto (me costo encontrarlo
)
Código:
<%
ExtPermitidas = "|gif|cvs|jpg|jpeg|txt|doc|xls|"
NombreFichero = Split(objFich.Nombre, ".")
Extension = NombreFichero(1)
If InStr(ExtPermitidas, "|" & Extension & "|") = 0 Then
Response.Write "El archivo no puede tener la extensión " & Extension
Response.End()
Else
' El script continúa normalmente aquí
End if
%>