主题：利用FileSys.DeleteFile删除文件时,怎么提前判断文件是否处于打开状态?

    如题.用FileSys.DeleteFile删除文件时,如果文件处于打开状态,代码执行会出错,删除失败,并连续出现两个FoxTable的错误提示,这样很不好!
    我想请教一下,怎么在删除文件前先判断文件是否处于打开状态,然后根据打开状态决定是否删除.例如:如果文件处于关闭状态,则删除文件,如果处于打开状态,则不删除文件,弹出对话框"请先把XX文件关闭后才能删除!"

   或者简单一点,用用FileSys.DeleteFile删除文件时,当发现文件处于打开状态时,自动忽略(即不删除),别让系统出错,也不出现错误提示.这样也能基本解决问题.

   谢谢!

   但即使这样,在删除处于打开状态下的文件时,仍然会弹出一个Foxtable的对话框,名字叫"删除文件或文件夹时出错"(内容是无法删除XX文件,文件被下列程序使用!),然后才会弹出自己写的这个对话框(即删除失败,请先解锁!),感觉很不顺!请教一下,能否禁用狐表本身的那个错误提示?或者提前检测一下某个文件是否处于打开状态?

     这个对话框是挺好,绝大多数情况下都很有用.但在某些特殊情况下,我不需要有这个提示.例如,我在系统退出时,把项目中使用的一些临时文件自动删除掉,如果正在使用,则忽略.这样的情况下,出现对话框是很别扭的!

请贺老师帮忙解决一下。

不要提示就这样:

Try
    FileSys.DeleteFile("c:\data\fox2.jpg", 3, 3)
Catch ex As System.IO.IOException
End Try

   即使这样,在删除处于打开状态下的文件时,仍然会弹出一个Foxtable的对话框,名字叫"删除文件或文件夹时出错"(内容是无法删除XX文件,文件被下列程序使用!)  感觉很不顺!
   请教一下,能否禁用狐表本身的那个错误提示?或者提前检测一下某个文件是否处于打开状态?

  难道这个小问题没有办法解决？

标准代码:

Try
    Dim aa As New System.IO.FileStream("c:\book1.xls", IO.FileMode.Open, IO.FileAccess.Read, IO.FileShare.None)
    aa.Dispose()
    messagebox.show("没有人打开")
Catch ex As Exception
    messagebox.show("有人打开")
End Try

收藏,慢慢研究!

谢谢!我先试一下!