详解易语言链接DB2 OLEDB实例方法 - 行业资讯 - 肥雀云

很多朋友在写易语言软件的时候需要用到链接DB2等内容,大家参阅下。

“数据库=rbsj;这是连数据库名、主机名=pc - 200806261910;“这是自己的计算机的名字,

如果真(数据库连接。连接(“供应商=IBMDADB2;数据库=rbsj;主机名=pc - 200806261910;”))

　　　　　　第2版。本　　。支持库教育局　　。支持库eGrid 　　　　。如果真(记录集。打开sql (sql, #语句)=真) 　　“如果真(记录集。打开并排序(“日报数据”,“编号排序升”)) 　　信息框(“已连接表”,#错误图标,“连接数据库错误”) 　　高级表1格。清空数据() 　　高级表1格。表头行数=1 　　高级表1格。表头列数=0 　　高级表1格。行数=记录集。记录数量+ 1 　　高级表1格。列数=记录集。字段数量　　“高级表1格。置数据(0,0,#表格常量。文本型,到文本(“标签”)) 　　计。次循环首(记录集。字段数量,变量1) 　　高级表1格。置数据(0,变量1 - 1 #表格常量。文本型,记录集。取字段名(变量1 - 1)) 　　计。次循环尾() 　　到首记录() 　　计。次循环首(记录集。记录数量,变量2) 　　计。次循环首(记录集。字段数量,变量1) 　　记录集。读文本(变量1 - 1,单元) 　　高级表1格。置数据(变量2,变量1 - 1 #表格常量。文本型,单元) 　　“高级表1格。置数据(变量2,1 - 1,表号格常量。文本型,到文本(记录集。取字段名(0))) 　　计。次循环尾() 　　记录集。到下一条() 　　计。次循环尾() 　　之前　　　　

感谢大家对的支持。