文件管理

原创 2005年04月29日 20:51:00

Sub Sure_Click()
        Dim PathString As String
        Dim DirObj As DirectoryInfo
        Dim thepath As String
        thepath = Server.MapPath("/Weboffice/fluxayadmin/youxi/images")
        If Request.QueryString.Get("dir") = "" Then
            PathString = thepath.ToString()
        Else
            PathString = Request.QueryString.Get("dir")
        End If
        DirObj = New System.IO.DirectoryInfo(PathString)
        If DirObj.Exists = False Then
            Response.Write("该文件夹不存在!")
        Else
            DispInfo(PathString)
        End If
    End Sub
    Sub DispInfo(ByVal PathStr As String)
        Dim DirObj As DirectoryInfo
        Dim Arrstr() As DirectoryInfo
        Dim Arrstr1() As FileInfo
        Dim i As Integer
        DirObj = New System.IO.DirectoryInfo(PathStr)
        Response.Write("查看图片文件夹的全部内容")
        Response.Write("点击可以查看图片")
        Response.Write("<p>你现在浏览的目录是:<b>")
        Response.Write(DirObj.FullName.ToString())
        Response.Write("</b></p>")
        Response.Write("该目录创建时间为:<b>")
        Response.Write(DirObj.CreationTime.ToString() & "</b>")
        Response.Write("&nbsp;&nbsp;最后修改时间为:<b>")
        Response.Write(DirObj.LastWriteTime.ToString())
        Response.Write("</b></p>")
        Response.Write("图片文件包括:</p>")
        Response.Write("<table border=0 width=90%>")
        Response.Write("<tr height=30><th width=20%><small>名称</small></th>")
        Response.Write("<th width=15%><small>大小</small></th>")
        Response.Write("<th width=15%><small>类型</small></th>")
        Response.Write("<th width=20%><small>创建时间</small></th>")
        Response.Write("<th width=20%><small>最后修改时间</small></th>")
        Response.Write("<th width=10% align='center'>是否删除</th><tr>")

        Arrstr1 = DirObj.GetFiles()
        For i = 0 To Arrstr1.Length - 1
            Response.Write("<tr>")
            Response.Write("<td><a href='images/")
            Response.Write(Arrstr1(i).Name)
            Response.Write("' target='_blank'>" & Arrstr1(i).Name)
            Response.Write("</a></td>")
            Response.Write("<td align=center><small>" & Arrstr1(i).Length & "字节</small></td>")
            Response.Write("<td align=center><small>" & Arrstr1(i).Extension & "</small></td>")
            Response.Write("<td align=center><small>" & Arrstr1(i).CreationTime.ToString() & "</small></td>")
            Response.Write("<td align=center><small>" & Arrstr1(i).LastWriteTime.ToString() & "</small></td>")
            Response.Write("<td><a href='delpicch.aspx?dir=")
            Response.Write(Arrstr1(i).FullName)
            Response.Write("'>")
            Response.Write("删除")
            Response.Write("</a></td>")
            Response.Write("</tr>")
        Next
        Response.Write("</table>")
    End Sub

   Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        check()
        Dim path As String
        path = Request.QueryString.Get("dir")
        File.Delete(path)
        Response.Write("<script>alert('删除成功');window.location.href='delpic.aspx'</script>")
    End Sub

Linux学习7:文件系统操作与磁盘管理

1、查看磁盘和目录的容量1)使用df命令查看磁盘的容量:一般使用情况下,我们更多只是关心第一行的内容也就是环境中的rootfs或者物理主机上的/dev/sda2。rootfs: (Root Fil...

puppet 配置 3.4 文件管理与自定义模块

利用 puppet 对文件, 配置文件等进行管理 创建目录 创建文件 定义文件内容 自定义模块 模板 template 的使用方法...
  • signmem
  • signmem
  • 2017年01月25日 12:54
  • 868

Linux 命令(文件和目录管理 - zip/unzip)

简述zip/unzip 是 Linux 中广泛使用的压缩/解压缩程序,zip 命令用来将文件压缩为常用的 zip 格式(扩展名为 .zip);unzip 命令则用来解压缩 zip 文件。简述 zip ...

linux - 文件目录管理

mkdir 在当前目录下创建sunchengquan目录mkdir sunchengquan drwxrwxr-x 2 sunchengquan sunchengquan 4.0K 11月 1 ...

android文件管理器开发中遇到的一些问题

1.难点主要有如何获取外挂设备的信息以及路径无论是U盘还是TF卡等等 获取方式在其他博客中请自己查看。 2.在Android6.0中想要对外部设备进行的文件的操作是比较难的 因为6.0中Andr...
  • mo_hen_
  • mo_hen_
  • 2016年10月19日 09:30
  • 416

android怎么用intent跳转到文件管理器

我想实现的是点击一个按钮,然后跳转到文件管理器的主界面,浏览文件。 Intent intent = new Intent(); intent.setAction("android.intent.a...

Linux 命令(文件和目录管理 - locate)

locate 可以很快速的搜寻档案系统内是否有指定的档案。其方法是先建立一个包括系统内所有档案名称及路径的索引数据库,当寻找时就只需查询这个索引数据库而不必实际深入档案系统之中。locate 因为是只...

Linux文件与目录管理

跟阿铭学Linux邀请函 (http://www.aminglinux.com),二期已开班,感兴趣的联系QQ:306798658,现在报名还有优惠!同样欢迎您 购买视频资料。 本章主要介绍L...
  • zlp5201
  • zlp5201
  • 2013年12月25日 23:38
  • 2932

使用maven管理不同环境的配置文件

1.使用maven中properties标签定义变量         (1)引入                   在pom.xml中添加依赖时语法如下: org.springframew...
  • cpf2016
  • cpf2016
  • 2015年05月12日 14:20
  • 544

Deepin系统中文件管理器等应用程序右上角的最大最小化以及关闭按钮不见了的解决办法

我在使用Deepin系统的时候,好几次遇到了文件管理器等应用程窗口右上角的调整窗口最大最小化的按钮和关闭窗口的按钮消失了的问题。经过一番摸索,终于找到了解决办法,下面向大家分享一下我的经验。 解决问...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:文件管理
举报原因:
原因补充:

(最多只允许输入30个字)