| Вопрос: Как узнать адрес "Мои докуметны" | Добавлено: 30.04.08 13:30 |
Автор вопроса:  KreAtoR
|
|
У меня к примеру этот адрес вглядит вот так
D:\Dokumente und Einstellungen\Nick\Eigene Dateien на другом компе выглядит так: С:\Dokumente und Einstellungen\Administrator\Eigene Dateien на русской винде выглядит тоже по другому и на английской тоже. Как узнать этот адрес? |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  J. Smith ICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #1 | Добавлено: 30.04.08 13:38 |
|
Dim WSH As Object
Dim MyDocs as String Set WSH = CreateObject("WScript.Shell" 
MyDocs = WshShell.SpecialFolders("MyDocuments"
Set WSH = Nothing |
||
|
Номер ответа: 2 Автор ответа: ZagZag ICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #2 | Добавлено: 30.04.08 13:40 |
|
В реестре
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders] Параметр "Personal" |
||
|
Номер ответа: 3 Автор ответа:  Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #3 | Добавлено: 30.04.08 13:46 |
| Ну или в переменных окружения. | ||
|
Номер ответа: 4 Автор ответа: KreAtoRВопросов: 120 Ответов: 438 |
Профиль | | #4 | Добавлено: 30.04.08 13:54 |
ZagZag сенкс 
|
||
|
Номер ответа: 5 Автор ответа: J. SmithICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #5 | Добавлено: 30.04.08 14:04 |
|
MyDocs = WshShell.SpecialFolders("MyDocuments"
MyDocs = WSH.SpecialFolders("MyDocuments"
|
||
|
Номер ответа: 6 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #6 | Добавлено: 30.04.08 19:49 |
| SHGetFolderPath | ||
Страница: 1 |