检查 电脑上装的access版本

[zlb789]

  Type type;
            object access = null;
            object version = null;

            type = Type.GetTypeFromProgID("Access.Application");//Access 判断出错 excel可以

            if (type == null)
            {
                MessageBox.Show("没有安装access"); Application.Exit();
            }
            else
            {
                access = Activator.CreateInstance(type);
                if (access == null)
                {
                    MessageBox.Show("没有安装access");
                    Application.Exit();
                }
                else
                {
                    version = type.GetProperty("Version").GetValue(access, null);
                    PropertyInfo p = type.GetProperty("Visible");
                       p.SetValue(access, true, null);//设置可见性
                    MethodInfo[] ms=type.GetMethods();//CloseCurrentDatabase 退出数据库
                    type.GetMethod("Quit").Invoke(access, null);//type.GetProperty("Visible").ReflectedType
                }
            }
            if (version != null)
            {
                // MessageBox.Show("Excel版本号是：" + version.ToString());
            }

上面如果是判断excel 可以 ，但是如果是access 就出在调用quit 或者CloseCurrentDatabase 方法的时候出错。

怎么解决

[蓝海D鱼]

up

[genius_tong]

mark~

[sjf_kk]

不懂，只能帮顶了。

[yuanhuiqiao]

从注册表读取信息

[zlb789]

读取 注册表 似乎也可以 我想知道我这里怎么不行

[zlb789]

自己顶起

[zlb789]

没人 ？

[SlaughtChen]

关注中...

[llnet]

PropertyInfo p = type.GetProperty("Visible");
p.SetValue(access, true, null);//设置可见性
MethodInfo[] ms=type.GetMethods();//CloseCurrentDatabase 退出数据库
type.GetMethod("Quit").Invoke(access, null);//type.GetProperty("Visible").ReflectedType





去掉这几行，可以的

[llnet]

PropertyInfo p = type.GetProperty("Visible");
p.SetValue(access, true, null);//设置可见性
MethodInfo[] ms=type.GetMethods();//CloseCurrentDatabase 退出数据库
type.GetMethod("Quit").Invoke(access, null);//type.GetProperty("Visible").ReflectedType


去掉这几行，可以的

[llnet]

PropertyInfo p = type.GetProperty("Visible");
p.SetValue(access, true, null);//设置可见性
MethodInfo[] ms=type.GetMethods();//CloseCurrentDatabase 退出数据库
type.GetMethod("Quit").Invoke(access, null);//type.GetProperty("Visible").ReflectedType


去掉这几行，可以的

[llnet]

PropertyInfo p = type.GetProperty("Visible");
p.SetValue(access, true, null);//设置可见性
MethodInfo[] ms=type.GetMethods();//CloseCurrentDatabase 退出数据库
type.GetMethod("Quit").Invoke(access, null);//type.GetProperty("Visible").ReflectedType


去掉这几行，可以的

[zlb789]

楼上的 联系发这么多 ?

去掉这个 错是不会错了 但是效果对不 ?

[zlb789]

没有好答案?

[zlb789]

无满意答案