Определение пути сохранения в VB

Скрипт создает текстовый файл с информацией на ПК пользователя, а затем сохраняет его в общую папку каталога F:\InstalledSoftware\.

If WriteFile(s, sFileName) Then
  'optional prompt for display
  If MsgBox("Finished processing.  Results saved to " & sFileName & _
            vbcrlf & vbcrlf & "Do you want to view the results now?", _
            4 + 32, sTitle) = 6 Then
    WScript.CreateObject("WScript.Shell").Run """" & sFileName & """", 9
  End If
End If

A) sFileName = "F:\InstalledSoftware\" & sCompName & "_" & GetDTFileName() & "_Software.txt"

B) sFileName = sCompName & "_" & GetDTFileName() & "_Software.txt"

оба приводят к созданию файла, например, «JOHNPC_05112011_093842_Software.txt»

но B правильно создает его в текущем активном каталоге.

Две проблемы: поскольку у меня есть общий диск, если я отправлю ссылку на сценарий VB по электронной почте, мне придется использовать приложение A, поскольку приложение B использует текущий активный каталог. Вторая проблема заключается в том, что диск F: на некоторых машинах отображается как другая буква диска J или K, а в виртуальных средах — как другой диск. Но экспонат B всегда будет работать, пока я нахожусь в правильной папке.

Есть ли другой способ обозначения пути. то есть

IP-адрес или DNS-имя, в котором не используется буква диска?

sFileName = "????????????????\InstalledSoftware\" & sCompName & "…………..


vbscript
person icecurtain    schedule 11.05.2011    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Просто используйте путь UNC к местоположению, к которому привязан диск;

sFileName = "\\server_name_or_ip\optional_path\InstalledSoftware\" & sCompName & ..."

person Alex K.    schedule 11.05.2011
comment
Спасибо, Алекс, иногда мы пересматриваем простой ответ - person icecurtain; 11.05.2011