以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何判断EXCEL文件是否已经打开？求助（已解决）  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=7933)
--  作者：migold
--  发布时间：2010/8/20 18:25:00
--  如何判断EXCEL文件是否已经打开？求助（已解决）

如题，求助

[此贴子已经被作者于2010-8-21 16:42:14编辑过]
--  作者：czy
--  发布时间：2010/8/20 20:17:00
--  
Dim FName As String = "文件路径及文件名"
If FileSys.FileExists(FName) Then
    Try
    Dim f As New System.IO.FileStream(FName,IO.FileMode.Open,IO.FileAccess.Read,IO.FileShare.None)
    f.Dispose()
    Catch ex As Exception
    MessageBox.Show("目标文件处于打开状态")
End Try
--  作者：kylin
--  发布时间：2010/8/20 20:20:00
--  
以下是引用czy在2010-8-20 20:17:00的发言：
Dim FName As String = "文件路径及文件名"
If FileSys.FileExists(FName) Then
    Try
    Dim f As New System.IO.FileStream(FName,IO.FileMode.Open,IO.FileAccess.Read,IO.FileShare.None)
    f.Dispose()
    Catch ex As Exception
    MessageBox.Show("目标文件处于打开状态")
End Try

学习了，收藏
--  作者：migold
--  发布时间：2010/8/21 16:42:00
--  
谢谢！问题终于解决了
--  作者：donaldwc
--  发布时间：2010/8/21 16:57:00
--  
收藏