外部数据库.打开EXCEL问题

wangglby · 发表于 2023-4-4 19:16:42

请教下，我用这个代码，把EXCEL连接到外部数据库，每次运行，过会就会弹出这个提示窗，请问，怎么能取消这个提示？

mingyu3600 · 发表于 2023-4-4 19:29:01

把工作簿共享。在相关的设置中勾选，允许多用户同时编辑......

wangglby · 发表于 2023-4-4 20:04:37

mingyu3600 发表于 2023-4-4 19:29
把工作簿共享。在相关的设置中勾选，允许多用户同时编辑......

你这个办法是让程序打开EXCEL文件，而不出这个提示窗吧？

我想要的是，既不打开文件，也不出这个提示窗

在弹出这个窗口前，EXCEL表格内的数据已经被引用完了，没必要在打开这个文件了的,

mingyu3600 · 发表于 2023-4-4 20:13:37

wangglby 发表于 2023-4-4 20:04
你这个办法是让程序打开EXCEL文件，而不出这个提示窗吧？

我想要的是，既不打开文件，也不出这个提示窗 ...

那你需要的不就是让他直接修改内容

wangglby · 发表于 2023-4-4 20:33:46

mingyu3600 发表于 2023-4-4 20:13
那你需要的不就是让他直接修改内容

这是我在论坛搜集拼凑的代码，除了弹出那个提示窗，其它都挺好用，速度也很快。
我只是需要在不打开EXCEL（或者不要有上面那个提示窗），引用数据至高级表格。不知道怎么修改

Excel程序1.创建 ()
Excel程序1.显示＝假
Excel工作簿1.置程序 (Excel程序1)
Excel工作簿1.打开 (编辑框1.内容)
外部数据库1.打开 (“ODBC;DBQ=” ＋编辑框1.内容＋ “;Driver={Microsoft Excel Driver (*.xls)};DriverId=1046;FIL = EXCEL8.0 ”, , )
记录集句柄＝外部数据库1.cha询 (“select * from [sheet1]”)

如果 (记录集句柄 ≠ 0)

外部数据库1.到首记录 (记录集句柄)

m ＝ 1

判断循环首 (外部数据库1.尾记录后 (记录集句柄) ＝假)

高级表格1.插入行 (, )

高级表格1.置数据 (m, 0, #表格常量 .文本型, 到文本 (外部数据库1.读 (记录集句柄, 1))) ' 序号

高级表格1.置数据 (m, 1, #表格常量 .文本型, 到文本 (外部数据库1.读 (记录集句柄, 2))) ' 编码

m ＝ m ＋ 1

外部数据库1.到后一记录 (记录集句柄)

判断循环尾 ()

外部数据库1.关闭记录集 (记录集句柄)
外部数据库1.关闭 ()
Excel工作簿1.关闭 ()
Excel工作簿1.释放 ()
Excel程序1.退出 ()
Excel程序1.释放 ()

i支持库列表	支持库注释
eExcel2000	EXCEL2000支持库
eGrid	高级表格支持库

wangglby · 发表于 2023-4-4 21:03:48

自己顶下

wangglby · 发表于 2023-4-4 22:07:46

自己顶下

wangglby · 发表于 2023-4-5 07:29:01

自己顶，我知道的吗

		自动登录	找回密码
密码			注册

[易语言] 外部数据库.打开EXCEL问题