
运行“易语言”主程序,打开“新建工程”对话框,选择“Windows窗口程序”,点击“确定”按钮,进入“Windows窗口程序”设计界面。如图:
在“Windows窗口界面”上绘制标签组件、编辑框组件、拖放对象及按钮组件各一个,调整好各组件的位置和大小。如图:
修改各组件的相关属性和名称,做到规范命名,这对后面的编写代码是至关重要的。有利于明晰我们的编程思路和加快开发速度。如图:
下面就开始编写代码,首先,注册一下拖放对象,然后就是将拖放对象的“接收文件”属性设置为真,继续编写“_拖放对象_mdb数据库_得到文件”事件子程序的代码部分。如图:
编写“打开”按钮的“_按钮_打开_被单击”事件子程序,为了测试方便,这里声明一个名为“结果”的逻辑型局部变量,然后借助信息框来d出结果。如图:
接下来,代码编写完毕就是测试了。果断猛戳“F5”键,运行我们的程序,将mdb数据库文件拖拽到编辑框中,点击“打开”按钮,等待结果。根据反馈结果,数据库打开成功。如图:
就是SQL语句,利用数据库连接1和记录集就可以了.版本 2
.支持库 eDB
.如果真 (数据库连接1.连接Access (取运行目录 () + “\MDB.mdb”, “”) = 假)
信息框 (“连接数据库失败!”, 0, )
返回 ()
.如果真结束
记录集1.置连接 (数据库连接1)
.版本 2
.支持库 eDB
sql = “insert into 通讯表(姓名,电话,地址) values ('” + 编辑框1.内容 + “','” + 编辑框3.内容 + “','” + 编辑框2.内容 + “')”
.如果 (_启动窗口.数据库连接1.执行SQL (sql) = 假)
信息框 (“添加记录失败!”, 0, )
.版本 2
.支持库 iext
.支持库 eDB
临时 = “update 通讯表 set 姓名='” + 编辑框1.内容 + “',电话='” + 编辑框3.内容 + “',地址='” + 编辑框2.内容 + “' where 编号=” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
.如果 (_启动窗口.数据库连接1.执行SQL (临时) = 假)
信息框 (“更改数据失败”, 0, )
编辑框2.内容 = 临时
.版本 2
.支持库 iext
.支持库 eDB
SQL = “delete from 通讯表 where 编号=” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
.如果 (_启动窗口.数据库连接1.执行SQL (SQL) = 假)
信息框 (“删除数据失败!@”, 0, )
.否则
mdb数据库用Access
即可编辑
增加字段增加后
需要改动
保存代码
和
显示代码
多写一个字段
多读一个字段即可没有看到源码
不清楚
具体如何修改而且你的图
也看不清楚
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)