批处理之家 - Powered by Discuz! Board

标题: [问题求助] VBS可以显示出赋值怎么才能被调用，提示找不到路径，赋值出问题了吗？ [打印本页]

作者: ailstt 时间: 2015-4-21 02:20 标题: VBS可以显示出赋值怎么才能被调用，提示找不到路径，赋值出问题了吗？

set wjm=CreateObject("Scripting.FileSystemObject")
set ws=CreateObject("wscript.shell")
p=ws.regread("HKEY_CURRENT_USER\Software\rwy\lgj\ChrPath")
Wscript.Echo "确认路径：" & p
wjm.MoveFile "(p)\123.txt","(p)\456.txt"
wjm.DeleteFile("(p)FSO\1.txt") 
复制代码

根据注册表键值读取到路径p = D:\abc
然后在对其路径下的文件进行文件操作重命名
添加拷贝文件的命令我新手这个不太会
拷贝是拷贝%temp%\out.dll 拷贝至（P）\web\mst\ abcde.exe

bat的我知道是 copy "%temp%\out.dll" （P）\web\mst\ abcde.exe
我这里的out.dll本身就是pe文件来的所以不担心格式问题

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\rwy\lgj]
"ChrPath"="D:\\abc"
复制代码

作者: ailstt 时间: 2015-4-21 17:56

为什么用绝对路径可以而用全局的却不行

作者: czjt1234 时间: 2015-4-21 20:53

FSO对象不支持环境变量

source = ws.ExpandEnvironmentStrings("%temp%\out.dll")
wjm.CopyFile source, "（P）\web\mst\abcde.exe"
复制代码

作者: ailstt 时间: 2015-4-21 21:53

回复 3# czjt1234

这个应该怎么才能修改更简结呢！

作者: czjt1234 时间: 2015-4-22 15:09

wjm.CopyFile ws.ExpandEnvironmentStrings("%temp%\out.dll"), "（P）\web\mst\abcde.exe"

作者: ailstt 时间: 2015-4-23 06:20

回复 5# czjt1234

好膜拜你啊想拜师

欢迎光临批处理之家 (http://bathome.net./)