Dim sess As New NotesSession
Dim db As NotesDatabase
Dim path As String
Dim filePath As String
Set db = sess.CurrentDatabase
path = sess.GetEnvironmentString("Directory",True)
filePath = path + "\domino\html\*.doc"
获取data目录的位置
最新推荐文章于 2024-03-21 11:14:48 发布