[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

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

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

回复 1# 窄口牛


    请把你尝试过的代码发出来看看?顺便说说报错信息是啥
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

本帖最后由 窄口牛 于 2023-2-23 18:22 编辑

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

TOP

@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>

TOP

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 &"")

TOP

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

TOP

返回列表