马上注册，结交更多易友，享用更多功能，让你轻松玩转觅风论坛。
您需要 登录 才可以下载或查看，没有账号？立即注册
x
.版本 2
.支持库 eDB
.子程序 _按钮1_被单击
.如果 (数据库连接1.连接Access (取运行目录 () ＋ “\my.mdb”, “”) ＝ 真)
信息框 (“连接数据库成功”, 0, , )
记录集1.置连接 (数据库连接1)
记录集1.打开 (“成绩表”, #数据表名, )
.否则
信息框 (“连接数据库失败”, 0, , )
.如果结束
.版本 2
.支持库 eDB
sql ＝ “insert into 成绩表（姓名，学号，身高，体重）values（'” ＋ 编辑框1.内容 ＋ “','” ＋ 编辑框2.内容 ＋ “','” ＋ 编辑框3.内容 ＋ “','” ＋ 编辑框4.内容 ＋ “'）”
_启动窗口.数据库连接1.执行SQL (sql, )
|
