易语言创建网页快捷方式源码

资源介绍：

网页自动跳转-Internet快捷方式创建器

资源作者：

火山教程网

资源界面：

.版本 2

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 a, 字节集

.如果真 (编辑框3.内容 ＝ “”)
    信息框 (“你还没有输入网址”, 0, )
    返回 ()
.如果真结束
.如果真 (编辑框4.内容 ＝ “”)
    信息框 (“你还没有为新文件取名”, 0, )

    返回 ()
.如果真结束
a ＝ 到字节集 (编辑框1.内容 ＋ 编辑框3.内容 ＋ 编辑框2.内容)
.如果真 (写到文件 (取运行目录 () ＋ “” ＋ 编辑框4.内容 ＋ “.html”, a) ＝ 假)
    信息框 (“写到文件失败”, 0, )
    返回 ()
.如果真结束
标签4.标题 ＝ 编辑框5.内容
.如果 (标签4.文本颜色 ＝ #红色)

    标签4.文本颜色 ＝ #蓝色
.否则
    标签4.文本颜色 ＝ #红色
.如果结束
按钮2.禁止 ＝ 假

.子程序 _编辑框3_内容被改变

标签4.标题 ＝ “”
标签4.文本颜色 ＝ #蓝色

.子程序 _编辑框4_内容被改变

标签4.标题 ＝ “”
标签4.文本颜色 ＝ #蓝色


.子程序 _按钮2_被单击

输出调试文本 (“explorer” ＋ “ ” ＋ 取运行目录 ())

.如果真 (运行 (“explorer” ＋ “ ” ＋ 取运行目录 (), 假, ) ＝ 假)
    信息框 (“查看失败”, 0, )
.如果真结束

资源下载：