.版本 2
.支持库 iext
.子程序 目录文件夹
.局部变量 link, 文本型
.局部变量 link1, 文本型
.局部变量 目录, 文本型
超级列表框1.全部删除 ()
目录 = 驱动器框1.驱动器 + “:\*”
link = 寻找文件 (目录, #子目录)
.判断循环首 (link ≠ “”)
.如果真 (link ≠ “.” 且 link ≠ “..”)
超级列表框1.插入表项 (, link, 0, , , )
.如果真结束
link = 寻找文件 (, #子目录)
.判断循环尾 ()
link1 = 寻找文件 (目录, #子目录)
.判断循环首 (link1 ≠ “”)
.如果真 (link1 ≠ “.” 且 link1 ≠ “..”)
超级列表框1.插入表项 (, link1, 1, , , )
.如果真结束
link1 = 寻找文件 (, )
.判断循环尾 ()
.子程序 _驱动器框1_驱动器被改变
目录文件夹 ()
组件2个 超级列表框+驱动器
以下为代码图:
扩展资料:
易语言编写开机自动启动的程序的方法:
1、首先需要打开易语言软件,先添加两个按钮组件,一个把按钮标题设置为设置开机启动,另一个把按钮标题设置为取消开机启动。
2、然后接下来双击第一个按钮,进入窗口程序集1写代码。
3、在代码处写设置自动运行这个命令有三个参数,第一个参数是程序名称,我们写取执行文件名(),第二个参数是程序文件名写取运行目录()+取执行文件名(),最后参数是程序要写到的位置,写#接口常量.到注册表即可。
4、最后,设置好之后,如图所示,再点击下面的启动窗口即可完成 *** 作,这样就可以解决问题。
参考资料来源:百度百科-易语言
你好。这个完全可以通过易语言实现。这个比较简单,就直接给源码了吧。双击易语言窗口,输入以下源码:
-----------------------------------------
启动线程
(&创建线程,
,
线程)
.子程序
创建线程
文件搜索
(“C:\”,“你要打开的文件”)
文件搜索
(“D:\”,“你要打开的文件”)
文件搜索
(“E:\”,“你要打开的文件”)
文件搜索
(“F:\”,“你要打开的文件”)
'
若还有其他盘还可以继续添加
关闭线程句柄
(线程)
.子程序
文件搜索
.参数
目录名,
文本型
.参数
文件名,
文本型,
可空
.局部变量
寻找结果,
文本型
.如果真
(目录名
=
“”)
信息框
(“目录名不能为空”,
0,
)
返回
()
.如果真结束
.如果真
(文件名
=
“”)
文件名
=
“*.*”
.如果真结束
.如果真
(取文本右边
(目录名,
1)
≠
“\”)
目录名
=
目录名
+
“\”
.如果真结束
寻找结果
=
寻找文件
(目录名
+
文件名,
)
.判断循环首
(寻找结果
≠
“”)
寻找结果
=
寻找文件
(,
)
.判断循环尾
()
寻找结果
=
寻找文件
(目录名
+
“*.*”,
#子目录)
.判断循环首
(寻找结果
≠
“”)
.如果真
(寻找结果
≠
“.”
且
寻找结果
≠
“..”)
文件搜索
(目录名
+
寻找结果,
文件名)
.如果真结束
寻找结果
=
寻找文件
(,
#子目录)
.判断循环尾
()
运行
(“你要打开的文件名字”,
假,
)
或者
运行
(寻找结果,
假,
)
-------------------------------------------
运用以上源码就可以了。不过为了防止打开错误或者因为无法分辨而打开多个文件夹,需要在路径处详细填写,如:DNF\start,把包含start这个子文件夹的主文件夹路径详细写进去,就会自动搜索并打开了。
~~~~~~~Aesthet1c非常荣幸为您回答,如果不明白欢迎追问,满意请采纳。祝你好运!~~~~~~~
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)