在文件夹下操作 FileOpen() FileDelete() 都没成功他们不支持变量吗？【已解决】

j88iang · 发表于 2010-5-10 18:00:07

本帖最后由 j88iang 于 2010-9-5 12:24 编辑

Send("{HOME}")
Send("^x")
$link = ClipGet()
$array = StringSplit($link, '.')
StringInStr($array[2],"exe")
If Not @Error Then
        FileOpen($link)
EndIf
FileDelete($array[2])

在文件夹下操作 FileOpen() FileDelete() 都没成功他们不支持变量吗？

netegg · 发表于 2010-5-10 22:35:25

楼主自己解决下简单问题，你用msgbox看看$link返回的是什么，就知道为什么不行了

j88iang · 发表于 2010-5-11 10:12:24

本帖最后由 j88iang 于 2010-5-11 10:18 编辑

回复 2# netegg

就是个链接啊

Send("{HOME}")
Send("^x")
$link = ClipGet()
$array = StringSplit($link, '.')
StringInStr($array[2],"chm")
If Not @Error Then
        FileOpen($link)
EndIf
MsgBox(0, "", $link)

在对话框下操作下图

caodongchun · 发表于 2010-5-11 17:49:18

很奇怪的语句，为什么要send去捕捉？
你把文件open了，不close，没法删的呀！
你说下面的一句话累不？
FileClose(FileOpen('1.exe'))
FileDelete('1.exe')

j88iang · 发表于 2010-5-11 20:18:07

回复 4# caodongchun

现在是fileclose 根本就不起作用啊

caodongchun · 发表于 2010-5-11 22:39:54

你close了吗？
上面没有看到close的语句，记住，删除文件不需要事先open文件的
close的是句柄可不是文件

netegg · 发表于 2010-5-11 22:52:35

本帖最后由 netegg 于 2010-5-11 23:04 编辑

把fileopen改成ShellExecute，默认打开方式不是记事本，似乎没法用fileopen打开
楼上各位，到底在讨论什么，是删除文件还是要干什么，lz的题目里是函数支持不支持变量，好像没说操作过程

j88iang · 发表于 2010-6-2 20:18:28

永泰一针见血啊感谢

j88iang · 发表于 2010-6-2 20:19:03

把fileopen改成ShellExecute，默认打开方式不是记事本，似乎没法用fileopen打开
楼上各位，到底在讨论什么 ...
netegg 发表于 2010-5-11 22:52

总算可以了谢谢了

		自动登录	找回密码
密码			加入

[系统综合] 在文件夹下操作 FileOpen() FileDelete() 都没成功他们不支持变量吗？【已解决】

相关帖子

本帖子中包含更多资源

LZ辛苦了！

[系统综合] 在文件夹下操作 FileOpen() FileDelete() 都没成功 他们不支持变量吗？【已解决】

相关帖子

本帖子中包含更多资源

LZ辛苦了！

[系统综合] 在文件夹下操作 FileOpen() FileDelete() 都没成功他们不支持变量吗？【已解决】