Dim dir As Directory, fs As String(), i As Integer
            fs = dir.GetFiles(Server.MapPath("face/"))
            For i = 0 To UBound(fs)
                fs(i) = Replace(fs(i), Server.MapPath("face/"), "")
            Next
            face.DataSource = fs
            face.DataBind()face 是dropdownlist控件