皮皮网

1.易语言：怎么把多个编辑框内容存edb指定的易语言额语ahk source源码位置

易语言：怎么把多个编辑框内容存edb指定的位置

       确保数据能够写入到数据库,首先要注意建立数据库结的结构,例如地址这样比较长而且不确定字数的文本,在数据库中就要选择文本类型,并且将长度写到最大,个人建议直接选择备注类型.图例:

       代码部分比较简单

.版本 2

       .程序集 窗口程序集_启动窗口

       .子程序 __启动窗口_创建完毕

       .如果真 (取反 (打开 (取运行目录 () ＋ “\db.edb”, , , , , , )))

           信息框 (“数据库读取失败.”, 0, , )

           返回 ()

       .如果真结束

       .子程序 _按钮_保存_被单击

       加空记录 ()

       .如果真 (取反 (写 (1, 编辑框_姓名.内容)))

           信息框 (“姓名写入失败.”, 0, , )

           编辑框_姓名.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (2, 编辑框_身份证.内容)))

           信息框 (“身份证写入失败.”, 0, , )

           编辑框_身份证.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (3, 编辑框_身份证地址.内容)))

           信息框 (“身份证地址写入失败.”, 0, , )

           编辑框_身份证地址.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (4, 编辑框_性别.内容)))

           信息框 (“性别写入失败.”, 0, , )

           编辑框_性别.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (5, 编辑框_婚否.内容)))

           信息框 (“婚否写入失败.”, 0, , )

           编辑框_婚否.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (6, 编辑框_手机.内容)))

           信息框 (“手机号写入失败.”, 0, , )

           编辑框_手机.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (7, 编辑框_座机.内容)))

           信息框 (“座机写入失败.”, 0, , )

           编辑框_座机.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (8, 编辑框_现住址.内容)))

           信息框 (“现住址写入失败.”, 0, , )

           编辑框_现住址.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (9, 编辑框_住房情况.内容)))

           信息框 (“住房情况写入失败.”, 0, , )

           编辑框_住房情况.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_单位名称.内容)))

           信息框 (“单位名称写入失败.”, 0, , )

           编辑框_单位名称.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_单位地址.内容)))

           信息框 (“单位地址写入失败.”, 0, , )

           编辑框_单位地址.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_月收入.内容)))

           信息框 (“月收入写入失败.”, 0, , )

           编辑框_月收入.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_社保号.内容)))

           信息框 (“社保号写入失败.”, 0, , )

           编辑框_社保号.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_审批额度.内容)))

           信息框 (“审批额度写入失败.”, 0, , )

           编辑框_审批额度.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_办理类型.内容)))

           信息框 (“办理类型写入失败.”, 0, , )

           编辑框_办理类型.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_业务员.内容)))

           信息框 (“业务员写入失败.”, 0, , )

           编辑框_业务员.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_风控.内容)))

           信息框 (“风控写入失败.”, 0, , )

           编辑框_风控.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_外访.内容)))

           信息框 (“外访写入失败.”, 0, , )

           编辑框_外访.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 编辑框_公司.内容)))

           信息框 (“公司写入失败.”, 0, , )

           编辑框_公司.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 日期框_审批日期.今天)))

           信息框 (“审批日期写入失败.”, 0, , )

           日期框_审批日期.获取焦点 ()

           返回 ()

       .如果真结束

       .如果真 (取反 (写 (, 日期框_续约日.今天)))

           信息框 (“续约日写入失败.”, 0, , )

           日期框_续约日.获取焦点 ()

           返回 ()

       .如果真结束

       信息框 (“信息已保存.”, 0, , )

       .子程序 _按钮_清除_被单击

       连续赋值 (“”, 编辑框_姓名.内容, 编辑框_身份证.内容, 编辑框_身份证地址.内容, 编辑框_性别.内容, 编辑框_婚否.内容, 编辑框_手机.内容, 编辑框_座机.内容, 编辑框_现住址.内容, 编辑框_住房情况.内容, 编辑框_单位名称.内容, 编辑框_单位地址.内容, 编辑框_月收入.内容, 编辑框_社保号.内容, 编辑框_审批额度.内容, 编辑框_办理类型.内容, 编辑框_业务员.内容, 编辑框_风控.内容, 编辑框_外访.内容, 编辑框_公司.内容)

       .子程序 __启动窗口_将被销毁

       全部关闭 ()

       效果图:

       打开记录编辑器观察结果:

       如果出现写入失败,请检查数据库结构类型.