你这个思路必须反过来想,不能从 1 号 来递推下面,应该由下面变化引起上层变化。
例如 A介绍b,b介绍c,c介绍d,d介绍e ,e介绍f ----------------设置为五级变动
数据库的关系:
建个表:test
字段:id --自动增加
laode ----文本
xinde ----文本
按正常有实际五级关系。
取最末级,f ,,f变动了,加100积分(至于实际怎么变看你自己的),
影响e加 50, 影响d加 25 ,影响c加15,影响b加10,影响a加5,,,
一级获取:
e:写法,rs.open"select * from test where xinde = '"&f&"'",conn,1,1
if not rs.eof then
e = rs("laode")
end if
rs.close
e 干嘛处理
二级获取:
rs.open"select * from test where xinde = '"&e&"'",conn,1,1
if not rs.eof then
d = rs("laode")
end if
rs.close
d 干嘛处理
递推,。。。。。。。。。。。。。不再描述。。
程序必须一次点击,执行到位,至于相应的人变动,可以变动时,加入相应处理个人代码。
不知道你懂了吗。不能从大到小思考,必须以从小到大来写该程序。
[ 本帖最后由 ysf0181 于 2012-5-5 15:54 编辑 ]