UI를 이용하여 폴더 만들고, 선택 하기

소스 코드

    Dim oSession As IpfcSession: Set oSession = conn.session
    Dim oCreateDirectory As New CCpfcDirectorySelectionOptions
    Dim oDirectorySelectionOptions As IpfcDirectorySelectionOptions
    Set oDirectorySelectionOptions = oCreateDirectory.Create
     
    Dim oFolderName As String  '폴더 이름 정의 매개변수  
    oFolderName = oSession.UISelectDirectory(oDirectorySelectionOptions)
    Cells(5, "D") = oFolderName

 

적용 예)