提问
SAP Business One Extensibility

B1的OpenFileDialog

2020-08-25 05:45发布

站内问答 / B1
2501 5 4

点击此处---> 群内免费提供SAP练习系统（在群公告中）加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）嗨，我注意到sdk似乎没有Ope...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）


嗨，我注意到sdk似乎没有OpenFileDialog，您可以在其中浏览文件。 我尝试将dotnet随附的那个与UI API一起使用，但是似乎没有出现。 有人能帮忙吗？ 谢谢

这是我的代码：

OpenFileDialog openFileDialog1 = new OpenFileDialog（）;

openFileDialog1.InitialDirectory = @" C：\";

openFileDialog1.Title ="选择文件";

openFileDialog1.Filter ="访问文件| * .mdb";

如果（openFileDialog1.ShowDialog（）！= DialogResult.Cancel）

{

oEdit.Value = openFileDialog1.FileName;

}

其他

{

oEdit.Value ="";

}

字符串loadString = oEdit.Value.ToString（）;

编辑：Costas Ioannou于2009年6月16日下午4:11

5条回答
95年老男孩
2020-08-25 06:07 .采纳回答

和


 公共子ShowFolderBrowser（）

         作为新FileIOPermission（PermissionState.None）昏暗
         f.AllLocalFiles = FileIOPermissionAccess.AllAccess
         Dim MyProcs（）作为System.Diagnostics.Process
         BankFileName =""
         将OpenFile设为新的OpenFileDialog

         尝试
             OpenFile.Multiselect =假
             OpenFile.Filter =" | *。*"
             昏暗filterindex为整数= 0
             尝试
                 filterindex = 0
             异常捕获
             结束尝试

             OpenFile.FilterIndex =过滤索引

             OpenFile.RestoreDirectory = True
             MyProcs = Process.GetProcessesByName（" SAP业务一"）

             如果MyProcs.Length = 1，则
                 对于i作为整数= 0到MyProcs.Length-1

                     将MyWindow设为新的WindowWrapper（MyProcs（i）.MainWindowHandle）
                     暗淡为DialogResult = OpenFile.ShowDialog（MyWindow）

                     如果ret = DialogResult.OK然后
                         昏暗的FileName作为字符串= OpenFile.FileName
                         OpenFile.Dispose（）
                     其他
                         System.Windows.Forms.Application.ExitThread（）
                     万一
                 下一个
             万一
         异常捕获
             m_SBO_Application.StatusBar.SetText（例如消息）
             BankFileName =""
         最后
             OpenFile.Dispose（）
         结束尝试

     结束子

一周热门 更多>