17-06-13, 10:59 AM
[سؤال] كيف احذف الفراغت باسم الملف؟
هذا الكود لدي آمل المساعدة وبارك الله فيكم
كود :
Dim fo As New DirectoryInfo(Server.MapPath("~/flvs/")) For Each fl As FileInfo In fo.GetFiles
If fl.Extension.Trim.ToLower = ".flv" Then
Dim fn As String = Nothing
fn = fl.Name.Trim
File.Copy(Server.MapPath("~/flvs/" & fl.Name), Server.MapPath("~/flvs/n" & fn))
End If
Next
هذا الكود لدي آمل المساعدة وبارك الله فيكم