请教mush访问mysql时出现的问题

kaillera

1. -- 载入 ODBC 外部扩展库
   
2. assert (package.loadlib ("odbc.dll", "luaopen_luasqlodbc")) ()
   
3. 
   
4. -- 创建环境对象
   
5. env = assert (luasql.odbc())
   
6. 
   
7. -- 连接数据库
   
8. con = assert (env:connect ("DSN",     -- DSN 名称
   
9.                            "user",        -- 用户名
   
10.                            "pwd"))  -- 密码
    
11. 
    
12. -- 删除数据库中的 players 数据表
    
13. assert (con:execute"DROP TABLE players")
    
14. 
    
15. -- 创建 players 数据表
    
16. assert (con:execute[[
    
17.   CREATE TABLE players(
    
18.     name  varchar(50),
    
19.     class varchar(50)
    
20.   )
    
21. ]])
    
22. 
    
23. 
    
24. -- 添加一些记录
    
25. list = {
    
26.   {name="Nick Gammon", class="mage",},
    
27.   {name="David Haley", class="warrior",},
    
28.   {name="Shadowfyr", class="priest",}
    
29. }
    
30. 
    
31. for i, p in pairs (list) do
    
32.   assert (con:execute(string.format([[
    
33.     INSERT INTO players
    
34.     VALUES ('%s', '%s')]], p.name, p.class)
    
35.   ))
    
36. end  -- for loop
    
37. 
    
38. -- 执行一个查询语句, 返回游标对象
    
39. cur = assert(con:execute("SELECT * from players"))
    
40. -- 打印结果中的所有记录
    
41. row = cur:fetch ({}, 'a')--此处游标对象返回nil
    
42. while row do
    
43.   print ("\n------ 新纪录 ---------\n")
    
44.   table.foreach (row, print)
    
45. 
    
46.   -- 重复使用这个表, 以节省资源
    
47.   row = cur:fetch (row, 'a')
    
48. end  -- while loop
    
49. -- 关闭和数据库有关的所有对象
    
50. cur:close()
    
51. con:close()
    
52. env:close()

复制代码

向table写入数据都是正常的，为啥41行读取的时候游标对象返回值为nil呢？

北大侠客行MUD，中国最好的MUD

littleknife

我重来不用odbc，都是直接用

1. DatabaseOpen ("db", GetInfo (67) .. "pkuxkxmap.db", 6)
   
2. local sql="SELECT MUD_Entrance.roomno,MUD_Entrance.direction,MUD_Entrance.linkroomno,MUD_Room.roomtype from MUD_Entrance,MUD_Room where MUD_Room.roomno=MUD_Entrance.roomno and linkroomno=" ..linkroomno
   
3.    --print(sql)
   
4.    DatabasePrepare ("db", sql)
   
5.    rc = DatabaseStep ("db")
   
6.    while rc == 100 do
   
7. ....
   
8.   rc = DatabaseStep ("db")
   
9.    end
   
10.    DatabaseFinalize ("db")
    
11. 
    

复制代码