怎么把多个编辑框内容存edb指定的位置,或者直接存页面,菜鸟一枚,门外汉,勿用概论,来源码谢谢
确保数据能够写入到数据库,首先要注意建立数据库结的结构,例如地址这样比较长而且不确定字数的文本,在数据库中就要选择文本类型,并且将长度写到最大,个人建议直接选择备注类型.图例:
代码部分比较简单
.版本 2.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.如果真 (取反 (打开 (取运行目录 () + “\db.edb”, , , , , , )))
信息框 (“数据库读取失败.”, 0, , )
返回 ()
.如果真结束
.子程序 _按钮_保存_被单击
加空记录 ()
.如果真 (取反 (写 (1, 编辑框_姓名.内容)))
信息框 (“姓名写入失败.”, 0, , )
编辑框_姓名.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (2, 编辑框_身份证.内容)))
信息框 (“身份证写入失败.”, 0, , )
编辑框_身份证.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (3, 编辑框_身份证地址.内容)))
信息框 (“身份证地址写入失败.”, 0, , )
编辑框_身份证地址.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (4, 编辑框_性别.内容)))
信息框 (“性别写入失败.”, 0, , )
编辑框_性别.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (5, 编辑框_婚否.内容)))
信息框 (“婚否写入失败.”, 0, , )
编辑框_婚否.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (6, 编辑框_手机.内容)))
信息框 (“手机号写入失败.”, 0, , )
编辑框_手机.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (7, 编辑框_座机.内容)))
信息框 (“座机写入失败.”, 0, , )
编辑框_座机.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (8, 编辑框_现住址.内容)))
信息框 (“现住址写入失败.”, 0, , )
编辑框_现住址.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (9, 编辑框_住房情况.内容)))
信息框 (“住房情况写入失败.”, 0, , )
编辑框_住房情况.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (10, 编辑框_单位名称.内容)))
信息框 (“单位名称写入失败.”, 0, , )
编辑框_单位名称.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (11, 编辑框_单位地址.内容)))
信息框 (“单位地址写入失败.”, 0, , )
编辑框_单位地址.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (12, 编辑框_月收入.内容)))
信息框 (“月收入写入失败.”, 0, , )
编辑框_月收入.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (13, 编辑框_社保号.内容)))
信息框 (“社保号写入失败.”, 0, , )
编辑框_社保号.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (14, 编辑框_审批额度.内容)))
信息框 (“审批额度写入失败.”, 0, , )
编辑框_审批额度.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (15, 编辑框_办理类型.内容)))
信息框 (“办理类型写入失败.”, 0, , )
编辑框_办理类型.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (16, 编辑框_业务员.内容)))
信息框 (“业务员写入失败.”, 0, , )
编辑框_业务员.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (17, 编辑框_风控.内容)))
信息框 (“风控写入失败.”, 0, , )
编辑框_风控.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (18, 编辑框_外访.内容)))
信息框 (“外访写入失败.”, 0, , )
编辑框_外访.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (19, 编辑框_公司.内容)))
信息框 (“公司写入失败.”, 0, , )
编辑框_公司.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (20, 日期框_审批日期.今天)))
信息框 (“审批日期写入失败.”, 0, , )
日期框_审批日期.获取焦点 ()
返回 ()
.如果真结束
.如果真 (取反 (写 (21, 日期框_续约日.今天)))
信息框 (“续约日写入失败.”, 0, , )
日期框_续约日.获取焦点 ()
返回 ()
.如果真结束
信息框 (“信息已保存.”, 0, , )
.子程序 _按钮_清除_被单击
连续赋值 (“”, 编辑框_姓名.内容, 编辑框_身份证.内容, 编辑框_身份证地址.内容, 编辑框_性别.内容, 编辑框_婚否.内容, 编辑框_手机.内容, 编辑框_座机.内容, 编辑框_现住址.内容, 编辑框_住房情况.内容, 编辑框_单位名称.内容, 编辑框_单位地址.内容, 编辑框_月收入.内容, 编辑框_社保号.内容, 编辑框_审批额度.内容, 编辑框_办理类型.内容, 编辑框_业务员.内容, 编辑框_风控.内容, 编辑框_外访.内容, 编辑框_公司.内容)
.子程序 __启动窗口_将被销毁
全部关闭 ()
效果图:
打开记录编辑器观察结果:
如果出现写入失败,请检查数据库结构类型.
温馨提示:答案为网友推荐,仅供参考