请教—如何判断某文档是否可写

淮上

如题

假如有个文件为d:\\MyDWG.dwg，如何判断此文件是否可写（非只读、未被其他程序使用），谢谢。。。。。。

淮上

顶上去！！

mccad

用独占方式打开文件，如果出错，则已被占用。
以下是VB代码，你用同样的思路看看LISP怎样做。

1. On Error GoTo ErrOpen
2. Open "d:\MyDWG.dwg" For Binary Lock Read Write As #1
3. Close fFile
4. End If
5. ErrOpen:
6. If Err.Number = 70 Then
7. MsgBox ("文件已被打开")
8. End If

复制代码