当前位置:首页  »  编程知识  »  ASP用FSO一次删除多张图片

  • ASP用FSO一次删除多张图片

  • 本文主要为广大网友提供“ASP用FSO一次删除多张图片”,希望对需要ASP用FSO一次删除多张图片网友有所帮助,学习一下!

    For i=1 to dp.RecordCount
    Dim objFS()
    Dim phyPath()
    ReDim Preserve objFS(i)
    set objFS(i-1)=Server.CreateObject("Scripting.FileSystemObject")       
    ReDim Preserve phyPath(i)
    address=dp("picture")
    phyPath(i-1)=Server.MapPath(address)
    if objFS(i-1).FileExists(phyPath(i-1)) then
    objFS(i-1).DeleteFile phyPath(i-1),True
    end if
    dp.movenext
    next

    这个不要解释吧?原理就是把数组定义成FSO,可以循环删除多张图片

    全国精品课程资源库
  • 友情链接