Dim FileExten As String = System.IO.Path.GetExtension(FileUpload1.PostedFile.FileName)

Select Case FileExten.ToUpper
    Case ".DOC"
 Response.Write(FileExten.ToUpper)
    Case ".ZIP"
 Response.Write(FileExten.ToUpper)
    Case ".XLS"
 Response.Write(FileExten.ToUpper)
    Case Else
 Response.Write("都不是")
End Select

創作者介紹

歡迎~ 程式設計 學生 作業 專題製作 程式外包 家教...

goodlucky 發表在 痞客邦 PIXNET 留言(0) 人氣()