怎么把如下的两个sql语句合并成一个达到同样的效果

zangchao

如下图，因为之前excel导入到sql server 效率太慢，目前处理的方式是，先将excel导入到sql server，因为excel导入到sql是生成新表，只能再将数据复制到另一个指定表中，多了一个步骤，还多了已和表，请问怎么修改成一句达到相同效果；符原语句：1：“SELECT * INTO ” ＋ 数据表名称 ＋ “ FROM OPENROWSET('Microsoft.ACE.OLEDB.12.0','Excel 12.0; Database=” ＋ 通用对话框1.文件名 ＋ “', [期末库存cha询$])”；2：“INSERT INTO [dbo].[t_ck_qimokc] SELECT * FROM ” ＋ 数据表名称



补充内容 (2023-9-19 16:39):
没检查，错别字太多请多包涵（还多了一张数据表）（附原语句）

走一回

能用两句解决已经很不错了，功能有了先干为敬

53770zhang

excel导入到sqlserver 我感觉直接用数据库工具处理，可能更快。好多工具都支持直接导入，只要表和数据库结构一样，也很快很方便。

zangchao

53770zhang 发表于 2023-9-19 17:15
excel导入到sqlserver 我感觉直接用数据库工具处理，可能更快。好多工具都支持直接导入，只要表和数据库结 ...

主要是操作人员啥也不会，恨不得你一键全部ok

53770zhang

.版本 2
.支持库 e2ee

.如果真 (取反 (xlBookLoadA (句柄, 取文本指针 (上传目录)) ＝ 1))  ' 打开工作簿
       xlBookReleaseA (句柄)  ' 释放
    返回 ()
.如果真结束

表_句柄 ＝ xlBookGetSheetA (句柄, 读取表格)  ' 取表格内容
行数 ＝ xlSheetLastRowA (表_句柄)  ' 取得行数

.变量循环首 (3, 行数 － 1, 1, 行)  ' 读工作表数据
    姓名 ＝ 指针到文本 (xlSheetReadStrA (表_句柄, 行, 1, 0))  ' 读单元格文本
    电话 ＝ 指针到文本 (xlSheetReadStrA (表_句柄, 行, 3, 0))
    预约日期 ＝ 指针到文本 (xlSheetReadStrA (表_句柄, 行, 5, 0))
    预约日期 ＝ 时间_格式化EX (增减时间 (到时间 (“1900年1月1日”), 5, 到数值 (预约日期) － 2), , , 2)
    预约时间 ＝ 指针到文本 (xlSheetReadStrA (表_句柄, 行, 6, 0))
    单位 ＝ 指针到文本 (xlSheetReadStrA (表_句柄, 行, 7, 0))
    value ＝ value ＋ “('” ＋ 姓名 ＋ “','” ＋ 单位 ＋ “','” ＋ 预约日期 ＋ “','” ＋ 预约时间 ＋ “','” ＋ 电话 ＋ “','” ＋ 登记时间 ＋ “','” ＋ 备注 ＋ “','1'),”
.变量循环尾 ()
value ＝ 取文本左边 (value, 取文本长度 (value) － 1)
SQL ＝ “insert into yuyue (name,company,date,time,tel,record,remarks,stat) values ” ＋ value
连接池.取连接 (连接)
连接.执行 (SQL, , )
xlBookReleaseA (句柄)  ' 释放

可以读取表的内容，然后直接写入表。我以前写过一个类似的。用了libxl