VBS可以显示出赋值 怎么才能被调用，提示找不到路径，赋值出问题了吗？

ailstt

1. set wjm=CreateObject("Scripting.FileSystemObject")
   
2. set ws=CreateObject("wscript.shell")
   
3. p=ws.regread("HKEY_CURRENT_USER\Software\rwy\lgj\ChrPath")
   
4. Wscript.Echo "确认路径：" & p
   
5. wjm.MoveFile "(p)\123.txt","(p)\456.txt"
   
6. 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文件来的 所以不担心格式问题

1. Windows Registry Editor Version 5.00
   
2. 
   
3. [HKEY_CURRENT_USER\Software\rwy\lgj]
   
4. "ChrPath"="D:\\abc"
   

复制代码

ailstt

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

czjt1234

FSO对象不支持环境变量

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

复制代码

ailstt

回复 3# czjt1234


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

czjt1234

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

ailstt

回复 5# czjt1234


    好膜拜你啊 想拜师