觅风36课 insert into 表里 数据添加失败 求解
启动窗口程序.程序集 窗口程序集_启动窗口
.程序集变量 姓名, 文本型
.程序集变量 学号, 文本型
.程序集变量 性别, 文本型
.程序集变量 身高, 文本型
.程序集变量 体重, 文本型
.程序集变量 语文, 文本型
.程序集变量 数学, 文本型
.程序集变量 n, 整数型
.程序集变量 a, 整数型
.子程序 _按钮2_被单击
.如果真 (记录集1.记录数量 > a + 1)
记录集1.到下一条 ()
a = a + 1
读出数据 ()
.如果真结束
返回 ()
.子程序 _按钮3_被单击
记录集1.到首记录 ()
.计次循环首 (记录集1.记录数量, n)
记录集1.读文本 (“姓名”, 姓名)
记录集1.读文本 (“学号”, 学号)
记录集1.读文本 (“性别”, 性别)
记录集1.读文本 (“身高”, 身高)
记录集1.读文本 (“体重”, 体重)
记录集1.读文本 (“语文”, 语文)
记录集1.读文本 (“数学”, 数学)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (n - 1, 0, 姓名)
超级列表框1.置标题 (n - 1, 1, 到文本 (学号))
超级列表框1.置标题 (n - 1, 2, 到文本 (性别))
超级列表框1.置标题 (n - 1, 3, 到文本 (身高))
超级列表框1.置标题 (n - 1, 4, 到文本 (体重))
超级列表框1.置标题 (n - 1, 5, 到文本 (语文))
超级列表框1.置标题 (n - 1, 6, 到文本 (数学))
记录集1.到下一条 ()
.计次循环尾 ()
.子程序 _按钮4_被单击
载入 (窗口1, , 真)
.子程序 __启动窗口_创建完毕
唯美随机Win8皮肤 ()
窗口1 程序
.版本 2
.支持库 eDB
.程序集 窗口程序集_窗口1
.子程序 _按钮2_被单击
窗口1.销毁 ()
.子程序 _按钮1_被单击
.局部变量 s, 文本型
s = “insert into 成绩表(姓名,学号,性别,身高,体重,语文,数学) values ('” + 编辑框1.内容 + “','” + 编辑框2.内容 + “','” + 编辑框3.内容 + “','” + 编辑框4.内容 + “','” + 编辑框5.内容 + “','” + 编辑框6.内容 + “','” + 编辑框7.内容 + “')”
.如果 (_启动窗口.数据库连接1.执行SQL (s, ) = 真)
信息框 (“添加成功”, 0, , )
.否则
信息框 (“添加失败”, 0, , )
.如果结束
怎么改都添加不成功,数据无法添加进去 求大佬指正下那里错误了,谢谢!
.版本 2
.支持库 eDB
.支持库 iext
.子程序 _按钮1_被单击
.如果 (数据库连接1.连接Access (取运行目录 () + “\成绩.mdb”, “”) = 真)
记录集1.置连接 (数据库连接1)
记录集1.打开 (“成绩表”, #数据表名, )
.否则
信息框 (“连接失败”, 0, , )
结束 ()
.如果结束
记录集1.到首记录 ()
读出数据 ()
.子程序 读出数据
记录集1.读文本 (“姓名”, 姓名)
记录集1.读文本 (“学号”, 学号)
记录集1.读文本 (“性别”, 性别)
记录集1.读文本 (“身高”, 身高)
记录集1.读文本 (“体重”, 体重)
记录集1.读文本 (“语文”, 语文)
记录集1.读文本 (“数学”, 数学)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (a, 0, 姓名)
超级列表框1.置标题 (a, 1, 到文本 (学号))
超级列表框1.置标题 (a, 2, 到文本 (性别))
超级列表框1.置标题 (a, 3, 到文本 (身高))
超级列表框1.置标题 (a, 4, 到文本 (体重))
超级列表框1.置标题 (a, 5, 到文本 (语文))
超级列表框1.置标题 (a, 6, 到文本 (数学))
已经自己找到问题所在了 楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了! 楼主说说是那里出错了?我的也是,程序能运行,添加数据却失败。 请问下楼主找到的原因是什么 我也卡着求解
页:
[1]