Office中国论坛/Access中国论坛

标题: [求助]如何知道主機的一個文件的連接用戶 [打印本页]

作者: zyp 时间: 2004-12-8 22:04
标题: [求助]如何知道主機的一個文件的連接用戶
是這樣的，我將一Excel文檔放在NT4.0的主機上，供一部分同事們拷用，有了更新版，用新文件覆蓋原文件后，再通知同事重新拷貝即可．可有些同事為了方便，直接用建立捷徑的方法從主機上打開文件（其曰可免除更新之煩）．

可我想更新時，確因文件正在使用中（”提示，文件已被"xyz"鎖定....”），只能唯讀打開，更無法覆蓋．

請問，有什麼辦法可知道目前哪臺電腦正在使用它？

謝謝！

作者: 方漠 时间: 2004-12-9 17:19
将此段代码COPY到你的XLS文件VBA界面里去，用户打开文件时会自动生成一个TEST.TXT的LOG文件，记录打开时间，用户名，电脑名。也可以把TEST.TXT改成TEST.DAT,以欺骗普通用户。写的DAT文件，用记录本方式打开就可以直接看到。Private Sub Workbook_Open()

Dim FN As String

Dim ITF As Integer

Dim Str As String

Str = "User:" & Environ("UserName") & " Computer:" & Environ("COMPUTERNAME") & " Open Time:" & Now

FN = Application.Workbooks(ThisWorkbook.Name).Path & "\Test.txt"

ITF = FreeFile

Open FN For Append As #ITF

Write #ITF, Str

Close #ITF

End Sub

作者: zyp 时间: 2004-12-9 23:06
謝謝方漠兄不知有沒有其它更為簡便的方法，因為可能這個文檔不是我做的，並不是每個人都會用VBA的．多謝各位．

作者: Benjamin_luk 时间: 2004-12-10 00:05
有个WHOHASIT的软件, 可以查到谁在用[em05][attach]8048[/attach]

[此贴子已经被作者于2004-12-9 16:09:43编辑过]

作者: hi-wzj 时间: 2004-12-10 01:12
nt系统中有一个功能是可以看到谁在用文件的，我手头没有nt无法具体的说，您自己找找或看帮助。

作者: zyp 时间: 2004-12-10 21:57
多謝各位的指點![em17][em17][em17][em17]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)