数据库大神进，数据库测试出错

流星雨

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 到文本 (日期框1.今天)) ＝ 真)
信息框 (“加入成功”, 0, )
刷新 ()
返回 ()
信息框 (“加入失败”, 0, )
返回 ()

子程序名	返回值类型	公开	备 注
刷新

变量名	类 型	静态	数组	备 注
i	整数型
f

超级列表框1.全部删除 ()
计次循环首 (取记录数 (), i)
跳到 (i)
f ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (f, 0, 读 (“ID”))
超级列表框1.置标题 (f, 1, 读 (“标题”))
超级列表框1.置标题 (f, 2, 读 (“内容”))
' 超级列表框1.置标题 (f, 3, 到文本 (读 (“保存时间”)))
超级列表框1.置标题 (f, 3, 读 (“保存时间”))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

如果 (超级列表框1.现行选中项 ＝ -1)
信息框 (“请选择你要修改的表项”, 0, )
返回 ()


修改表 ()

子程序名	返回值类型	公开	备 注
修改表

如果 (查找 (读字段 (编辑框1.内容, ) ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)) ＝ 真)
如果 (修改 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 到文本 (日期框1.今天))) ＝ 真)
信息框 (“修改成功”, 0, )
刷新 ()
返回 ()
信息框 (“修改失败”, 0, )
返回 ()

信息框 (“查找失败”, 0, )

子程序名	返回值类型	公开	备 注
_超级列表框1_左键单击表项

编辑框1.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
编辑框2.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
编辑框3.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 2)
日期框1.今天 ＝ 到时间 (超级列表框1.取标题 (超级列表框1.现行选中项, 3))

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> <br /> .如果 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 到文本 (日期框1.今天)) ＝ 真)<br /> 信息框 (“加入成功”, 0, )<br /> 刷新 ()<br /> 返回 ()<br /> .否则<br /> 信息框 (“加入失败”, 0, )<br /> 返回 ()<br /> .如果结束<br /> <br /> <br /> .子程序 刷新<br /> .局部变量 i, 整数型<br /> .局部变量 f<br /> <br /> 超级列表框1.全部删除 ()<br /> .计次循环首 (取记录数 (), i)<br /> 跳到 (i)<br /> f ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置标题 (f, 0, 读 (“ID”))<br /> 超级列表框1.置标题 (f, 1, 读 (“标题”))<br /> 超级列表框1.置标题 (f, 2, 读 (“内容”))<br /> ' 超级列表框1.置标题 (f, 3, 到文本 (读 (“保存时间”)))<br /> 超级列表框1.置标题 (f, 3, 读 (“保存时间”))<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> .如果 (超级列表框1.现行选中项 ＝ -1)<br /> 信息框 (“请选择你要修改的表项”, 0, )<br /> 返回 ()<br /> .否则<br /> <br /> 修改表 ()<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 修改表<br /> <br /> .如果 (查找 (读字段 (编辑框1.内容, ) ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)) ＝ 真)<br /> .如果 (修改 (加记录 (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 到文本 (日期框1.今天))) ＝ 真)<br /> 信息框 (“修改成功”, 0, )<br /> 刷新 ()<br /> 返回 ()<br /> .否则<br /> 信息框 (“修改失败”, 0, )<br /> 返回 ()<br /> .如果结束<br /> <br /> .否则<br /> 信息框 (“查找失败”, 0, )<br /> .如果结束<br /> <br /> <br /> <br /> .子程序 _超级列表框1_左键单击表项<br /> <br /> 编辑框1.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)<br /> 编辑框2.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)<br /> 编辑框3.内容 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 2)<br /> 日期框1.今天 ＝ 到时间 (超级列表框1.取标题 (超级列表框1.现行选中项, 3))

数据库大神进，数据库测试出错，有会的大神帮忙看看，谢谢了

蛋疼啊，论坛怎么上传不了附件了，搞个百度网盘了http://pan.baidu.com/s/1bnphevd

Leadership

不懂帮顶了  ！

萧杨

好了 请不要叫我大神
流星数据管理系统_萧杨修正.zip (60.8 KB, 下载次数: 12)

2014-8-26 02:13 上传

点击文件名下载附件

流星雨

萧杨 发表于 2014-8-26 02:13
好了 请不要叫我大神

为什么找你接单找不到人呢