主题：[求助]文件管理

老师，下面的文件管理项目是论坛视频讲座里的。我把文件上传后保存不了。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:文件管理器.table

 我第二次点击单元格窗口显示已被删除。单元格只有文件名称。

AfterLoad事件代码改一下

If GetConfigValue("文件夹路径" & ComputerId,"") = "" Then  '若未指定存储路径
    e.Form.Controls("路径").text = "尚未指定文件存储路径!"
Else
    e.Form.Controls("路径").text = GetConfigValue("文件夹路径" & ComputerId,"")
End If

If Tables("表A").Current.Isnull("文件名") = True Then '若文件名为空
    e.Form.Controls("文件名").text = "未上传文件!"
    e.Form.Controls("PictureBox1").image = getimage("other.png")
Else
    If filesys.FileExists(e.Form.Controls("路径").text & "\" & Tables("表A").Current("文件名")) = False Then
        e.Form.Controls("文件名").text = "文件已被删除!"
        e.Form.Controls("PictureBox1").image = getimage("del.png")
    Else
        e.Form.Controls("文件名").text = Tables("表A").Current("文件名")
        Functions.Execute("刷新图标")
    End If
End If