1 --转载地址:http://www.cnblogs.com/windtail/archive/2012/01/08/2623191.html
 2 require"luasql.sqlite3"    
 3 function enumSimpleTable(t)    
 4          print"-------------------"    
 5          fork,v in pairs(t) do    
 6                    print(k, " = ", v)    
 7          end  
 8          print"-------------------\n"    
 9 end  
10   
11 function rows(cur)    
12          return function(cur)    
13                    localt = {}    
14                     if(nil~= cur:fetch(t, 'a')) then return t   
15                    else
16                     return nil 
17                    end    
18          end
19          cur    
20 end  
21   
22 env = assert(luasql.sqlite3())    
23 db =assert(env:connect("test.db"))    
24    
25 db:setautocommit(false)    
26 res = assert(db:execute [[CREATE TABLEpeople(name text, sex text)]])   
27 res = assert(db:execute [[INSERT INTOpeople VALUES('程序猿','男')]])    
28 res = assert(db:execute [[INSERT INTOpeople VALUES('程序猿老婆', '女')]])    
29 assert(db:commit())   
30    
31   
32 res = assert(db:execute [[SELECT * FROMpeople]])    
33 colnames = res:getcolnames()    
34 coltypes = res:getcoltypes()    
35 enumSimpleTable(colnames)    
36 enumSimpleTable(coltypes)  
37   
38 for r in rows(res) do  
39     enumSimpleTable(r)  
40 end  
41   
42 res:close()    
43 db:close()    
44 env:close()  

 

原文地址:http://www.cnblogs.com/chenyalin/p/16877992.html

1. 本站所有资源来源于用户上传和网络,如有侵权请邮件联系站长! 2. 分享目的仅供大家学习和交流,请务用于商业用途! 3. 如果你也有好源码或者教程,可以到用户中心发布,分享有积分奖励和额外收入! 4. 本站提供的源码、模板、插件等等其他资源,都不包含技术服务请大家谅解! 5. 如有链接无法下载、失效或广告,请联系管理员处理! 6. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需! 7. 如遇到加密压缩包,默认解压密码为"gltf",如遇到无法解压的请联系管理员! 8. 因为资源和程序源码均为可复制品,所以不支持任何理由的退款兑现,请斟酌后支付下载 声明:如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性