挨谢Upload.ASP文献
找到上面代码:
<%sAllowExt=WordStr (UCase(sAllowExt),"ASP","")%>
改成:
<%sAllowExt=UCase(sAllowExt)DoWhileInStr(sAllowExt,"ASP")OrInStr(sAllowExt,"CER")OrInStr(sAllowExt,"ASA")OrInStr(sAllowExt,"CDX")OrInStr(sAllowExt,"HTR")sAllowExt=WordStr (sAllowExt,"ASP","")sAllowExt=WordStr (sAllowExt,"CER","")sAllowExt=WordStr (sAllowExt,"ASA","")sAllowExt=WordStr (sAllowExt,"CDX","")sAllowExt=WordStr (sAllowExt,"HTR","")Loop