-----开始-----
.版本 2
.支持库 shell
.子程序 写入Hosts
.参数 网址, 文本型
.参数 定向IP, 文本型, 可空, 默认为127.0.0.1
.局部变量 数据, 字节集
文件路径 = 取特定目录 (#Windows系统目录) + “drivers\etc\hosts”
.如果真 (定向IP = “”)
定向IP = “127.0.0.1”
.如果真结束
数据 = 读入文件 (文件路径) + 到字节集 (#换行符 + 网址 + “ ” + 定向IP)
写到文件 (文件路径, 数据)
-----结束-----
By 易语言 包子
.版本2
.支持库
eDB
.程序集
窗口程序集1
.子程序
__启动窗口_创建完毕
数据库连接1.连接Access
(取运行目录
()
+
“\1.mdb”,
“”)
记录集1.置连接
(数据库连接1)
记录集1.打开
(“myTest”,
#数据表名)
'
上面所有数据库初始化工作完成,请在第三局自行加上判断,因为如果出错下面的语句都会失败
记录集1.写字节集
(“1st”,
图片框1.图片)
记录集1.更新
()
'
写入完成!
'需要用到数据库支持库,E语言已经自带
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)