返回列表 发帖

[问题求助] [已解决]路径有空格VBS怎么处理?这么久还是没有解决

这个批处理就是用来一键以管理员权限执行某个任务的批处理或者vbs,抛砖引玉一下 ,  谁还有更加完善和更好的方法呢?(公司的电脑是域环境,win7系统和win8系统,所以经常遇到这种草蛋的事情,很多程序都没权限。)
楼下三种方法都试过了都不行
第一种用双引号直接执行提示错误
第二种用简写目录名执行没有反应,况且那些不能简写的目录呢
第三种对话框不智能一键,而且执行出现不可预知的结果
@echo off
net user administrator winfly >nul
if exist runas自动输入密码.vbs del /f /q /s runas自动输入密码.vbs
echo Option Explicit >runas自动输入密码.vbs
echo Dim sh >>runas自动输入密码.vbs
echo set sh=WScript.CreateObject("WScript.Shell") >>runas自动输入密码.vbs
echo Wscript.sleep 1000 >>runas自动输入密码.vbs
echo sh.run "runas /user:administrator D:\program files\Tencent\WeChat\webchat.exe" >>runas自动输入密码.vbs
echo Wscript.sleep 1000 >>runas自动输入密码.vbs
echo sh.SendKeys "winfly{ENTER}" >>runas自动输入密码.vbs
start "" runas自动输入密码.vbs
@ping 127.0.0.1 -n 5 >nul
@del /f /q /s runas自动输入密码.vbs >nul
net user administrator "" >nul
exitCOPY
保存为cmd或者bat后缀格式的文件

问题其实已经被解答了,楼主大概没去认真看回复

TOP

你需要的应该是微软“网管”工具 pstools 里面的 psexec.exe 。

例:
以管理员radmin(密码Abcd1234)身份执行 C:\1.exe
psexec.exe C:\1.exe -u radmin -p Abcd1234COPY
远程电脑
psexec.exe \\远程电脑名 C:\1.exe -u radmin -p Abcd1234COPY
net use \\远程电脑名\ipc$ Abcd1234 /user:radmin
psexec.exe \\远程电脑 C:\1.exe COPY
『千江有水千江月』千江有水,月映千江;万里无云,万里青天。    http://yu2n.qiniudn.com/

TOP

修改下exe就可以在任何环境下管理员身份运行

TOP

用vbs格式就是
Option Explicit
Dim sh
set sh=WScript.CreateObject("WScript.Shell")
Wscript.sleep 1000
sh.run "runas /user:administrator D:\program files\Tencent\WeChat\webchat.exe"
Wscript.sleep 1000
sh.SendKeys "winfly{ENTER}" COPY
换成没有空格的目录就可以执行

TOP

回复 8# codegay


    哈哈 ,我只是测了2秒多线程访问网站的运用,却不是爬取。
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

回复 7# WHY


    所以应该是ivor在用python爬。
去学去写去用才有进步。安装python3代码存为xx.py 双击运行或右键用IDLE打开按F5运行

TOP

楼下继续....

TOP

再加把火
MsgBox "runas /user:administrator " & Chr(34) & "D:\program files\Tencent\WeChat\webchat.exe" & Chr(34)COPY

TOP

本帖目前查看人数1800+

TOP

回复 3# 522235677


    program files    缩写应该是progra~1
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

sh.run "runas /user:administrator D:\PROGRA~2\Tencent\WeChat\webchat.exe"COPY

TOP

回复 1# winsfly
sh.run "runas /user:administrator ""D:\program files\Tencent\WeChat\webchat.exe"""COPY
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

返回列表