[文件操作] 批处理怎样拖入html，打开它（任何默认浏览器即可）然后马上删除它？

窄口牛

鼓捣了几个小时，没搞定。

窄口牛

能打开文件了，但是加上删除就又打不开了。

窄口牛

Set wShell = CreateObject("WScript.Shell")
Set oExec = wShell.Exec("mshta.exe ""about:<input type=file id=FILE><script>FILE.click();new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(FILE.value);close();resizeTo(0,0);</script>""")
File_Selected = oExec.StdOut.ReadLine

Dim WshShell
set WshShell = CreateObject("wscript.Shell")
WshShell.Run """C:\Program Files\Internet Explorer\iexplore.exe"" """& File_Selected &""""
'Dim fso
'Set fso=CreateObject("Scripting.FileSystemObject")
'fso.DeleteFile(""& File_Selected &"")

窄口牛

@echo off
for /f "delims=" %%a in ('mshta "%~f0"') do （
start “” "C:\Program Files\Internet Explorer\iexplore.exe" %%a&&del %%a
）

-->

<input type=file id=f>
<script>
f.click();new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(f.value);close();
</script>

窄口牛

start “” "C:\Program Files\Internet Explorer\iexplore.exe" “%1”&&del %1
path=%path%;C:\Program Files\Internet Explorer\iexplore.exe
start "" iexplore %1&&del %1

Batcher

回复 1# 窄口牛


    请把你尝试过的代码发出来看看？顺便说说报错信息是啥