EXCEL文件导入DATAWINDOW_用程序将excel格式画到datawindow-CSDN博客

本文链接：https://blog.csdn.net/liugang78/article/details/2561679

本文介绍了一个将Excel文件数据导入到DataWindow的函数实现方法。该函数通过调用OLE对象操作Excel应用，完成数据读取并粘贴到指定的DataWindow中。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

//***************************************************************// // 函数名称： GF_EXCEL_TO_DATAWINDOW // 函数功能： EXCEL文件导入DATAWINDOW // 参数类型： DWTAWINDOW // 参数名称： DW // RETURN ： 1 SUCCEED -1 ERROR // DATE ： 2004 3.1 //***************************************************************// string str_savename,named,s_grxh int excelok,li_net long li_count,i oleobject excelserver excelserver=create oleobject excelok=excelserver.connecttonewobject("excel.application") //检查返回值，以确保已成功地连接到了Excel if excelok <> 0 then messagebox("信息提示","连接EXCEL失败，请检查计算机中是否安装了EXCEL!") return -1 end if li_net = GetFileOpenName("选择文件", str_savename,named,"xls","Excel文件(*.xls),*.xls") if li_net > 0 then if str_savename = "" then return -1 dw.settransobject(sqlca) dw.reset() excelserver.workbooks.open(str_savename) excelserver.activesheet.cells.copy li_count = dw.importclipboard(2) //导入数据 clipboard("") excelserver.quit() excelserver.disconnectobject() destroy excelserver return 1 else messagebox('信息提示','没有指定导入文件!') return -1 end if