Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


«Меня терзают смутные сомнения…»
Цитата Iwest:
путь до файла прописывается так:
strFile = .BuildPath(WScript.CreateObject("Shell.Application").NameSpace("shell:AppData").self.Path, "Replica\New\1.txt") »
Отсюда что ль?


Цитата Iwest:
А вот как прописать этот путь находящийся в Windows 7: C:\Users\All users\Replica\New\1.txt в скрипте? »
Например, так:
Код: Выделить весь код
Option Explicit

Dim objFSO
Dim objShell

Set objFSO   = WScript.CreateObject("Scripting.FileSystemObject")
Set objShell = WScript.CreateObject("Shell.Application")

WScript.Echo objFSO.GetAbsolutePathName(objFSO.BuildPath(objShell.NameSpace("shell:Common Documents").self.Path, "..\Replica\New\1.txt"))

Set objShell = Nothing
Set objFSO   = Nothing

WScript.Quit 0
Если Вы, конечно, не пропустили в пути ничего. Точно не:
Код: Выделить весь код
C:\Users\All users\AppData\Replica\New\1.txt
?

Отправлено: 17:53, 30-12-2012 | #2