‘壹’ 如何用易语言实现打开并修改Excel文件
使用ODBC打开文件,将文件的内容可以读入到高级表格内,猜春迟在高级表格内修改,最后再将高级森袭表格的内容导出EXCEL。其中需要用穗李到sql语句。
‘贰’ 易语言如何查询excel数据库
.版本 2
.支持库 eExcel2000
Excel工作簿1.置程序 (Excel程序1) ' 设置工作簿于excel程序领导之下
Excel工作簿1.打开 (取当前目录 () + “\” + 年级数 + “.xls”) ' 本来可以加个文件名的,如果没有文件,则另存为吧.
Excel工作簿1.表格序号 = 1 ' 设置第一张表为工作表.
Excel程序1.显示 = 真
' 以下是把数据库中的查询结果放入excel程序里
tempnum = 1 ' 第一条记录
tempnumtext = 到文本 (tempnum)
外部数据库1.到首记录 (记录集句柄1)
.判断循环首 (外部数据库1.尾记录后 (记录集句柄1) = 假) ' 是不是已经到了尾记录了.如果不是,继续.
.变量循环首 (1, 33, 1, loopnum) ' 共有33个字段,每行显示33段,在excel表中表示列.tempnum表示为行
Excel工作簿1.首单元格 = 表列数组 [loopnum] + tempnumtext
Excel工作簿1.尾单元格 = 表列数组 [loopnum] + tempnumtext
Excel工作簿1.内容格式 = “@” ' 这代表是文本型的数据.本行可读可写,你可以先设置好格式,然后读一下,显示是什么,再设置
Excel工作簿1.内容 = 外部数据库1.读 (记录集句柄1, loopnum)
.变量循环尾 ()
外部数据库1.到后一记录 (记录集句柄1)
tempnum = tempnum + 1
tempnumtext = 到文本 (tempnum)
.判断循环尾 ()
' Excel工作簿1.保存 (取当前目录 () + “\” + 年级数 + “.xls”)
' Excel工作簿1.关闭 ()
' Excel程序1.退出 ()
‘叁’ 易语言excel导入sql
您是要问易语言excel怎么导入sql吗?易语言excel导入sql的方法如下:
1、可通过多种方法从易语言Excel导入数据。需要安装SQLServerManagementStudio(SSMS)才能使用其中一些工具。
2、首先导出到文本(SQLServer和SQL数据库);
3、直接从易语言Excel(仅本地SQLServer)进行就可以直接导入了。通过查询网络得知。MicrosoftExcel是Microsoft为使用Windows和AppleMacintosh操作系统的电脑编写的一款电子表格软件。
‘肆’ 怎么把易语言数据库里的内容写到Excel里
如果真
(选择框_excel可视.选中
=
真)
Excel程序_写.显示
=
真
.如果真结束
Excel工作簿_写.置程序
(Excel程序_写)
Excel工作簿_写.打开
(编辑框_需写入excel.内容)
z
=
1
x
=
1
y
=
1
坐标
=
字符
(x
+
64)
+
到文本
(y)
Excel工作簿_写.表格序号
=
z
Excel工作簿_写.首单元格
=
坐标
Excel工作簿_写.尾单元格
=
坐标
Excel工作簿_写.内容=内容
Excel工作簿_写.保存
(编辑框_需写入excel.内容)
Excel工作簿_写.关闭
()
Excel工作簿_写.释放
()
Excel程序_写.退出
()
Excel程序_写.释放
()
补充内容
(2014-9-6
13:24):
如果真上面少了一行,.版本
2
.支持库
eExcel2000
Excel程序_写.创建
()
‘伍’ 如何用易语言读取excel表格的数据
用“外部数据库”组件,或者“EXCEL程序”和“EXCEL工作薄”组件
第一种方法,遇到文本数据和数值数据有一定可能出错,如果EXCEL全部为文本或全部为数字就没事
第二张方法,更完整的调用EXCEL
‘陆’ 易语言 SQL语句查询结果如果显示到超级列表框,并且导出excel,求源码
.版本 2
.支持库 eDB
.支持库 iext
数据库连接1.连接SQLServer (, , , )
记录集1.置连接 (数据库连接1)
记录集1.打开 (“SELECT 列 FROM 表”, #SQL语句, )
.计次循环首 (记录集1.记录数量, n1)
记录集1.读文本 (“列”, 临时)
超级列表框1.插入表项 (n1, 临时, , , , )
.计次循环尾 ()
.计次循环首 (超级列表框1.取表项数 (), n2)
写到文件 (“XX.txt”, 超级列表框1.取标题 (n2, ))
.计次循环尾 ()
‘柒’ 易语言怎么导入XLS
数据导入xls:可以利用组件“外部数据库”,做一个按钮,在点击按钮子程序中输入下面的代码(提示:以下方法看似复杂,只需要整一遍,写成子程序,以后所有程序均可直接调用):
外部数据库1.打开()
调试输出(外部数据库.取连接文本())
1、运行程序,点击按钮;2、选择数据源,在DNS名称位置选择“新建”;3、创建的新的数据源,选择Microsoft Excel Driver(*.xls,*.xlsx,*.xlsb),点击下一步;4、点击浏览—桌面,文件名写123,点击保存,点击下一步,点击完成;5、在ODBC Microsoft Excel安装窗口点击“选择工作簿”,找到你想打开的excel表,点击确定;6、在ODBC Microsoft Excel安装窗口点击确定;7、在选择数据源窗口点击确定,剩下全部点击确定;8、你会发现会出现调试文本,是“ODBC;DBQ=C:\USERS\ADMINISTRATOR\DESKTOP\户籍地关联.xlsx;DefaultDir=C:\USERS\ADMINISTRATOR\DESKTOP;Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DriverId=1046;FIL=excel 12.0;FILEDSN=C:\Users\Administrator\Desktop\123.dsn;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;ReadOnly=1;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;”
这就是以数据库方式连接excel的方法,这个文本就是连接使用的信息,我已经将上述文本写成了子程序,直接写入参数excel文件路径即可连接,写入方式需要用sql语言(外部数据库1.执行(sql插入语句)):
.版本 2
.子程序 连接Excel, 逻辑型
.参数 excel路径, 文本型
.判断开始 (外部数据库_Excel.打开 (“ODBC;DBQ=” + excel路径 + “;DefaultDir=” + 取文本左边 (excel路径, 倒找文本 (excel路径, “\”, , 假)) + “;Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DriverId=1046;FIL=excel 12.0;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;ReadOnly=0;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;”, , ) = 假)
返回 (假)
.默认
返回 (真)
‘捌’ 如何用易语言操控Excel里面数据
利用易语言编程环境创建一个“Windows窗口程序”。点击菜单“工具”->“支持库配置”项。
在打开的窗口中,找到并勾选“通用对象支持库
2.0版”,并点击“确定”以添加“超级列表框”组件。
接下来在“启动窗口”中绘制如图所示的界面,其中包括一个“外部数据库”和一个“超级列表框”(从扩展面板中可以找到)组件。
然后利用Excel创建一个名为“jiance.xls”的Excel文件。其内容如图所示:
注:将该文件与易语言程序本身放置在同一目录下。
5、确保选中“启动窗口”,然后为其添加“创建完毕”事件。接着输入如图所示的易语言代码:
.版本
2
.支持库
iext
.如果真
(外部数据库1.打开
(“ODBC;DBQ=”
+
取当前目录
()
+
“\jiance.xls;Driver={Microsoft
Excel
Driver
(*.xls)};DriverId=790;FIL=excel
8.0;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;ReadOnly=0;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;”,
,
)
=
假)
信息框
(“数据库连接失败!”,
#错误图标,
)
返回
()
.如果真结束
查询语句
=
“select
*
from
[Sheet1$]”
记录集
=
外部数据库1.查询
(查询语句)
.如果真
(记录集
=
0)
信息框
(“查询失败!”,
#错误图标,
)
返回
()
.如果真结束
外部数据库1.到首记录
(记录集)
局部_计次
=
1
超级列表框1.插入列
(,
“序号”,
80,
,
,
)
超级列表框1.插入列
(,
“姓名”,
80,
,
,
)
超级列表框1.插入列
(,
“性别”,
80,
,
,
)
超级列表框1.插入列
(,
“年龄”,
80,
,
,
)
.判断循环首
(外部数据库1.尾记录后
(记录集)
=
假)
局部_临时A
=
外部数据库1.读
(记录集,
1)
局部_临时B
=
外部数据库1.读
(记录集,
2)
局部_临时C
=
到文本
(外部数据库1.读
(记录集,
3))
索引
=
超级列表框1.插入表项
(,
,
,
,
,
)
超级列表框1.置标题
(索引,
0,
到文本
(局部_计次))
超级列表框1.置标题
(索引,
1,
局部_临时A)
超级列表框1.置标题
(索引,
2,
局部_临时B)
超级列表框1.置标题
(索引,
3,
局部_临时C)
外部数据库1.到后一记录
(记录集)
局部_计次
=
局部_计次
+
1
.判断循环尾
()
外部数据库1.关闭记录集
()