Вобщем сделал программу для обзора CD проверил на 2000-й винде - идет.
Вставляю диск на 98-й винде - Ошибка 75-я
Пути прописаны в строках:
1) List1.Path = App.Path & "Doc" // List1 - это FileListBox - нейм менять было лень...
2) fileFoto.Path = App.Path & "foto" // fileFoto - это тоже FileListBox
3) RichTextBox1.LoadFile App.Path + "\doc\info\w.rtf"
все ...
Все пкти прописаны правильно - проверял...
Заранее спасибо
Run-time 75!!! Не знаю что и делать. Помогите!!!
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 3
• Страница 1 из 1
- Skif_Xaero
- Начинающий
- Сообщения: 3
- Зарегистрирован: 22.04.2004 (Чт) 6:12
- Откуда: Омск
Run-time 75!!! Не знаю что и делать. Помогите!!!
Skif_Xaero » 22.04.2004 (Чт) 6:25
- Aleksej
- Продвинутый пользователь
-
- Сообщения: 191
- Зарегистрирован: 03.06.2003 (Вт) 9:58
Aleksej » 22.04.2004 (Чт) 8:40
Попробуй написать так:
- Код: Выделить всё
List1.Path = App.Path & "\Doc"
fileFoto.Path = App.Path & "\foto"
- alibek
- Большой Человек
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 22.04.2004 (Чт) 8:42
- Код: Выделить всё
Function AppPath() As String
If Right$(App.Path, 1) = "\" Then
AppPath = App.Path
Else
AppPath = App.Path & "\"
End If
End Function
RichTextBox1.LoadFile AppPath() + "doc\info\w.rtf"
Lasciate ogni speranza, voi ch'entrate.
Сообщений: 3
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Yandex-бот и гости: 3