1
打開Windows文件夾我用這個代碼來設置文檔場目錄地址:的Lotus Notes:使用@formula或腳本
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder(0, "Select destination folder", 0, "N:\")
If Not (objFolder Is Nothing) Then
Set objFolderItem = objFolder.Self
Call uidoc.FieldSetText("arc_file",Cstr(objFolderItem.Path))
End If
是否有打開的文件夾包含在「arc_file」字段的窗口的方法?
它返回「意外:行尾;除外:表情」!在這行代碼 –
我更新,再試一次,我與「 – adminfd
完美的現在,它的工作取代'謝謝的! –