lzkd 发表于 2011-1-30 12:20:20

原帖由 ptouch 于 2011-1-30 10:41 AM 发表 http://www.pkuxkx.com/forum/images/common/back.gif

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

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

lzkd 发表于 2011-1-30 12:20:58

原帖由 lihaooo 于 2011-1-30 12:11 PM 发表 http://www.pkuxkx.com/forum/images/common/back.gif
我觉得如果mush+php+mysql的配合应该很不错吧?后两个可是经典搭档打遍天下哦……就是不知道mush对php的支持如何:)

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

littleknife 发表于 2011-1-30 14:27:43

仅供参考。

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

--------------------------------------------

hongdou.getanswer=function()
DatabaseOpen ("db", GetInfo(67).."hongdou2010.db", 6)
dbp=DatabasePrepare ("db",sqlstr)
rc = DatabaseStep ("db")
dbinfo=DatabaseInfo("db",1)

---------------------------------------------------------------
hdanswer={}
selnum=nil

------------------------db.answer->hongdou.answer---------------
---------------------------------------------------------------
while rc == 100 do

db_timu=DatabaseColumnValue("db",1)
db_answer=DatabaseColumnValue("db",2)
comparestring(hongdou.fulltimu,db_timu)

if same_percent==100 then
hongdou.timsame="100%"
hongdou.answer=db_answer
break
else
hongdou.timsame=""
comparestring(hongdou.timu,db_timu)

hdanswer=db_answer

--print(hdanswer,db_timu,same_percent)
end
rc = DatabaseStep ("db")
end
DatabaseFinalize ("db")
---------------------------------------------------------------
---------------------------------------------------------------
if hongdou.timsame~="100%" then

hongdou.answer=hdanswer
hongdou.timsame=table.maxn(hdanswer).."%"
end

---------------------------------------------------------------
hdanswer={}
selnum=nil
---------------------------------------------------------------

--print(hongdou.fulltimu,hongdou.answer)
for key, value in pairs (hongdou.answertable) do
comparestring(hongdou.answer,value)
--print(hongdou.answer,value,same_percent)
hdanswer=key
same_percent=1
end
selnum=hdanswer
hongdou.daansame=table.maxn(hdanswer).."%"
--print("selnum="..selnum.."hongdou.daansame"..hongdou.daansame)
--------------------------------------------------------------------------


if selnum==nil then
selnum=math.random (1,4)
print("System AUTO random Number(1-4) is:"..selnum)
hongdou.hasanswerstr="猜"
else
hongdou.hasanswerstr="库"

end
hongdou.answer=hongdou.answertable


if hongdou["answer"]~=nil then
print("【建议答案】"..hongdou["answer"].."【选项】"..selnum)
print("【查询方式】("..hongdou.hasanswerstr..")".."【相似度】(题目:"..hongdou.timsame..",答案:"..hongdou.daansame..")")
hongdou.hasanswer=1
else
print("数据库无查询结果。入库中..")
hongdou.hasanswer=0
end
Execute("answer "..selnum)
hongdou.answer=""

end

ptouch 发表于 2011-1-30 19:16:01

原帖由 lzkd 于 2011-1-30 12:20 PM 发表 http://pkuxkx.com/forum/images/common/back.gif


只是想提供简单的查询,取单条记录之类的功能,不可能整很大一个东西出来,如果有写的机会的话
程序开发经典3层结构 数据层 业务层 应用层
要是想做通用类 需要设计业务层

labaz 发表于 2011-6-28 17:03:52

回复 23楼 的帖子

在胡子这里总能看到对我有帮助的东西,牛人啊
页: 1 2 [3]
查看完整版本: MUSH+Access碰到的问题,求教