工程总承包项目中实施全过程的计算机应用

你易语言源码也在我的文档？取程序运行目录 取的是读取程序的目录

要获取我的文档路径可以使用 取特定目录 方法

调用格式： 〈文本型〉 取特定目录 （整数型 欲获取目录类型） - *** 作系统界面功能支持库->杂类

英文名称：GetSpecialFolderPath

本命令返回指定的Windows系统特定目录，所返回目录名以“\”符号结束，如失败返回空文本。本命令为初级命令。

参数<1>的名称为“欲获取目录类型”，类型为“整数型（int）”。本参数指定欲获取目录的类型，可以为以下常量值之一： 1: #我的文档; 2: #我的收藏夹; 3: #系统桌面; 4: #系统字体; 5: #开始菜单组; 6: #程序菜单组; 7: #启动菜单组; 8: #程序数据目录; 9: #Windows安装目录; 10: #Windows系统目录; 11: #临时文件目录。

说明:"启动窗口"中只有一个编辑框和一个列表框,当编辑框中敲了"回车键"，列表框中就加入一个项目,当编辑框中的文本最后有"edb"并敲了"回车键",就会创建这个名字的数据库创建好之后列表框中为空,又可创建另外一个数据库

点击列表框中的项目,可在编辑框中修改,编辑框中为空,就删除该项目别忘了敲"回车键"

其实在易语言中有创建edb数据库的,按"Alt+B"+S,在"数据库"的第一项"结构编辑器"中

------------------------------------------------------------------

版本 2

子程序 _编辑框1_按下某键, 逻辑型

参数 键代码, 整数型

参数 功能键状态, 整数型

如果真 (键代码 ≠ #回车键)

返回 ()

如果真结束

如果真 (列表框1现行选中项 ≠ -1)

如果 (编辑框1内容 ≠ “”)

列表框1置项目文本 (列表框1现行选中项, 编辑框1内容)

否则

列表框1删除项目 (列表框1现行选中项)

如果结束

列表框1现行选中项 ＝ -1

清空编辑框 ()

返回 ()

如果真结束

如果真 (编辑框1内容 ≠ “”)

返回 ()

如果真结束

如果 (取文本右边 (编辑框1内容, 4) ≠ “edb”)

列表框1加入项目 (编辑框1内容, )

否则

创建数据库 ()

列表框1清空 ()

如果结束

清空编辑框 ()

子程序 创建数据库

局部变量 字段, 字段信息, , "0"

局部变量 计次, 整数型

计次循环首 (列表框1取项目数 (), 计次)

字段 [计次]名称 ＝ 列表框1取项目文本 (计次 － 1)

字段 [计次]类型 ＝ #文本型

字段 [计次]最大文本长度 ＝ 20

计次循环尾 ()

创建 (取运行目录 () ＋ “\” ＋ 编辑框1内容, 字段)

子程序 _列表框1_列表项被选择

编辑框1内容 ＝ 列表框1取项目文本 (列表框1现行选中项)

子程序 清空编辑框

编辑框1内容 ＝ “”

编辑框1获取焦点 ()

这个很简单的，举个例子：

置当前库("数据库名")'必须已连接成功的数据库

到首记录()

如果 (查找(读("userid")="1234"))

信息框(读("姓名"))

否则

信息框("不存在")

如果结束

这句代码，就是定位会员id为1234的姓名，只会显示该会员的姓名而不会显示其他人的。

既然读取到了，那么写入数据、删除数据都不是问题，直接写命令即可。

如果会员1234不存在，就提示不存在。懂了吗？采纳吧。

以上就是关于工程总承包项目中实施全过程的计算机应用全部的内容，包括:工程总承包项目中实施全过程的计算机应用、易语言edb数据库简单问题。、易语言的edb数据库连接问题等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！