.net读取Lotus Domino文件数据库

Domino有组件支持.net,虽然感觉支持的不太好，但是能用，安装组件的方法很简单，在NuGet中联机搜索Domino，然后根据需要安装即可。

开发时，要在开发机上安装Notes客户端，网上很多，这里不赘述，直接上简易读取代码：

NotesSession ns = new NotesSession();
            //ns.Initialize("test1234");
            ns.Initialize();
            if (ns == null)
            {
                MessageBox.Show("未能初始化");
                return;
            }
            //http://10.31.100.50
            NotesDatabase db = ns.GetDatabase("", @"names.nsf", false);
            if (db == null)
            {
                MessageBox.Show("未能初始化数据库");
                return;
            }
            
            StringBuilder sb = new StringBuilder();

            NotesView view = db.GetView("$users");
            object[] cols = view.ColumnNames;
            Dictionary<int, object> dic = new Dictionary<int, object>();
            if (cols != null)
            {
                int ix = 0;
                foreach (object obj in cols)
                {
                    dic.Add(ix, obj);
                    if (obj != null) sb.Append(string.Format("{0}\r\n", obj));
                    ix++;
                }
            }
            NotesViewEntry ve = view.GetEntryByKey("12345");
            if (ve != null)
            {
                int ix = 0;
                object[] objs = ve.ColumnValues;
                foreach (object obj in objs)
                {
                    KeyValuePair<int, object> kv = dic.FirstOrDefault(m => m.Key == ix);
                    Type tp = obj.GetType();
                    if (tp.Name.Contains("Object[]"))
                    {
                        int ik = 0;
                        object[] nobjs = (object[])obj;
                        foreach (object nobj in nobjs)
                        {
                            sb.Append(string.Format("{0}[{1}]值为：{2}\r\n", kv.Value, ik, nobj));
                            ik++;
                        }
                    }
                    else
                    {
                        sb.Append(string.Format("{0}值为：{1}\r\n", kv.Value, obj));
                    }
                    ix++;
                }

            }