asp中文件与文件夹常用处理函数(文件后缀、创建文件等)
代码如下:‘===================================== ‘获得文件后缀 ‘===================================== Function Get_Filetxt(ByVal t0) Dim t1 IF Len(t0)<2 Or Instr(t0,”.”)=0 Then Get_Filetxt=False:Exit Function t1=Split(t0,”.”) Get_Filetxt=Lcase(t1(Ubound(t1))) End Function ‘==================================
下载地址
用户评论