MUSH+Access碰到的问题，求教

lzkd

原帖由 ptouch 于 2011-1-30 10:41 AM 发表

觉得没必要做通用类
毕竟和底层数据库表结构有关。
字段定义什么都不一样

只是想提供简单的查询，取单条记录之类的功能，不可能整很大一个东西出来，如果有写的机会的话

lzkd

原帖由 lihaooo 于 2011-1-30 12:11 PM 发表
我觉得如果mush+php+mysql的配合应该很不错吧？后两个可是经典搭档打遍天下哦……就是不知道mush对php的支持如何：）

我试过，mush对php的支持很不友好，很容易整个挂掉

littleknife

以下是我用sqlite做的部分红豆机器人的代码。请参考，也许对楼主有帮助。若需要可以qq联系。

1. --------------------------------------------
   
2. 
   
3. hongdou.getanswer=function()
   
4. DatabaseOpen ("db", GetInfo(67).."hongdou2010.db", 6)
   
5. dbp=DatabasePrepare ("db",sqlstr)
   
6. rc = DatabaseStep ("db")
   
7. dbinfo=DatabaseInfo("db",1)
   
8. 
   
9. ---------------------------------------------------------------
   
10. hdanswer={}
    
11. selnum=nil
    
12. 
    
13. ------------------------db.answer->hongdou.answer---------------
    
14. ---------------------------------------------------------------
    
15. while rc == 100 do
    
16. 
    
17. db_timu=DatabaseColumnValue("db",1)
    
18. db_answer=DatabaseColumnValue("db",2)
    
19. comparestring(hongdou.fulltimu,db_timu)
    
20. 
    
21. if same_percent==100 then
    
22. hongdou.timsame="100%"
    
23. hongdou.answer=db_answer
    
24. break
    
25. else
    
26. hongdou.timsame=""
    
27. comparestring(hongdou.timu,db_timu)
    
28. 
    
29. hdanswer[same_percent]=db_answer
    
30. 
    
31. --print(hdanswer[same_percent],db_timu,same_percent)
    
32. end
    
33. rc = DatabaseStep ("db")
    
34. end
    
35. DatabaseFinalize ("db")
    
36. ---------------------------------------------------------------
    
37. ---------------------------------------------------------------
    
38. if hongdou.timsame~="100%" then
    
39. 
    
40. hongdou.answer=hdanswer[table.maxn(hdanswer)]
    
41. hongdou.timsame=table.maxn(hdanswer).."%"
    
42. end
    
43. 
    
44. ---------------------------------------------------------------
    
45. hdanswer={}
    
46. selnum=nil
    
47. ---------------------------------------------------------------
    
48. 
    
49. --print(hongdou.fulltimu,hongdou.answer)
    
50. for key, value in pairs (hongdou.answertable) do
    
51. comparestring(hongdou.answer,value)
    
52. --print(hongdou.answer,value,same_percent)
    
53. hdanswer[same_percent]=key
    
54. same_percent=1
    
55. end
    
56. selnum=hdanswer[table.maxn(hdanswer)]
    
57. hongdou.daansame=table.maxn(hdanswer).."%"
    
58. --print("selnum="..selnum.."hongdou.daansame"..hongdou.daansame)
    
59. --------------------------------------------------------------------------
    
60. 
    
61. 
    
62. if selnum==nil then
    
63. selnum=math.random (1,4)
    
64. print("System AUTO random Number(1-4) is:"..selnum)
    
65. hongdou.hasanswerstr="猜"
    
66. else
    
67. hongdou.hasanswerstr="库"
    
68. 
    
69. end
    
70. hongdou.answer=hongdou.answertable[selnum]
    
71. 
    
72. 
    
73. if hongdou["answer"]~=nil then
    
74. print("【建议答案】"..hongdou["answer"].."【选项】"..selnum)
    
75. print("【查询方式】（"..hongdou.hasanswerstr.."）".."【相似度】（题目："..hongdou.timsame.."，答案："..hongdou.daansame.."）")
    
76. hongdou.hasanswer=1
    
77. else
    
78. print("数据库无查询结果。入库中..")
    
79. hongdou.hasanswer=0
    
80. end
    
81. Execute("answer "..selnum)
    
82. hongdou.answer=""
    
83. 
    
84. end

复制代码

ptouch

原帖由 lzkd 于 2011-1-30 12:20 PM 发表


只是想提供简单的查询，取单条记录之类的功能，不可能整很大一个东西出来，如果有写的机会的话

程序开发经典3层结构 数据层 业务层 应用层
要是想做通用类 需要设计业务层

labaz

在胡子这里总能看到对我有帮助的东西，牛人啊