Declare Function GetTempPath Lib "kernel32" _
Alias "GetTempPathA" (ByVal nBufferLength As Long, _
ByVal lpBuffer As String) As Long
Как в Excell VB получить переменные среды
Народ! Подскажите ответ на такой вопрос:
как в Excell VB получить(считать) переменные среды, я имею ввиду те, которые зарегистрированы в Windows. Напр. TMP или TEMP ?
как в Excell VB получить(считать) переменные среды, я имею ввиду те, которые зарегистрированы в Windows. Напр. TMP или TEMP ?
Цитата:
Originally posted by AlexanderK
Народ! Подскажите ответ на такой вопрос:
как в Excell VB получить(считать) переменные среды, я имею ввиду те, которые зарегистрированы в Windows. Напр. TMP или TEMP ?
Народ! Подскажите ответ на такой вопрос:
как в Excell VB получить(считать) переменные среды, я имею ввиду те, которые зарегистрированы в Windows. Напр. TMP или TEMP ?
Необходимо использовать функции API
Код:
Пример использования
Код:
Dim strPath As String
Dim strBuffer As String
Dim lngBytes As Long
MAX_PATH = 225
....
strBuffer = Space(MAX_PATH)
lngBytes = GetTempPath(Len(strBuffer),strBuffer)
If lngBytes > 0 Then
strPath = Left(strBuffer, lngBytes)
End If
....
Dim strBuffer As String
Dim lngBytes As Long
MAX_PATH = 225
....
strBuffer = Space(MAX_PATH)
lngBytes = GetTempPath(Len(strBuffer),strBuffer)
If lngBytes > 0 Then
strPath = Left(strBuffer, lngBytes)
End If
....
Да, это все хорошо, но тоже самое выдает встроенная функция Environ(), только в обоих случаях я получаю путь к локальной пользовательской временной папке. А, например, под win2000, кроме нее есть еще системный темп, вот мне бы до него добраться! Тем более, что прога, которая готовит входные данные для моей, как-то этот путь получает же. (В ее коде посмотреть не могу т. к. кода нет и прога, наверное, на срр писана). Есть идеи?