Помогите найти ошибку, или изменить код, вот кстати и он сам
Код
А именно при запуске первого файла, histori\index.html программа выдает 5 ошибку, кто скажет в чем дело? и как это исправить.
Помогите найти ошибку, или изменить код, вот кстати и он сам
Код
А именно при запуске первого файла, histori\index.html программа выдает 5 ошибку, кто скажет в чем дело? и как это исправить.
Чем слабее народ, тем наглее правительство.
Чисто не там где убрались, а там где не мусорили
может потому-что history, кстати, перед ридми.тхт у тебя слэш стоит, так почему его нет перед путём к первому файлу?
Мало что понимаю в программировании, но, по-моему, в описании пути вместо обратного слэша "\" надо ставить обычный "/".
Кроме того, может комменты надо закрыть вторым ' ?
"Никто не спасается иначе, как по незаслуженной милости, и никто не осуждается иначе, как заслуженным судом" © Августин
Текст ошибки в студию.
не в виндах - да.Мало что понимаю в программировании, но, по-моему, в описании пути вместо обратного слэша "\" надо ставить обычный "/".
Нет.Кроме того, может комменты надо закрыть вторым ' ?
Оффтопик
valera (22.11.2011)
вот текст ошибки
run-time error "5"
invalid procedure call or argument
Чем слабее народ, тем наглее правительство.
Чисто не там где убрались, а там где не мусорили
А чем html файл то запускать собираемся? Он же не исполняемый.
Что-то типа такого должно быть.Код:Shell "iexplore " & App.Path & "\histori\index.html", vbNormalFocus
маршрут прописан правильно тут дело в том как я понимаю что разрешение файла html и для него как то по другому прописывается
Добавлено через 5 минут
при таком раскладе вылазит вот такая ошибка
run-time error "53"
file not found
Как я понимаю не видит файл пробовал перенести в корень тоже самое
Последний раз редактировалось valera; 22.11.2011 в 14:15. Причина: Добавлено сообщение
Чем слабее народ, тем наглее правительство.
Чисто не там где убрались, а там где не мусорили
Что содержится в App.Path? Кстати, обязательный параметр только путь.
valera (22.11.2011)
А если с полным путем?
Код:Shell "C:\Program Files\Internet Explorer\iexplore.exe" & App.Path & "\histori\index.html", vbNormalFocus
valera (22.11.2011)
И в дополнение к посту выше, убедись, что нет русских букв в пути. На всякий случай.
valera (22.11.2011)
Последний раз редактировалось valera; 22.11.2011 в 18:44. Причина: Добавлено сообщение
Чем слабее народ, тем наглее правительство.
Чисто не там где убрались, а там где не мусорили
Пробовал с одним параметром т.е. без vbNormalFocus?
И как выше заметили, может надо
И ты так и не сказал что находится в App.PathКод:Shell App.Path & "\histori\index.html", vbNormalFocus
В крайнем случае можно сперва собрать строку с путем, потом уже использовать с shell. Но если и это не поможет...
Последний раз редактировалось a7161; 22.11.2011 в 21:25.
valera (22.11.2011)
Попробуй ShellExecute.
Пример:
Код:ShellExecute 0, "open", "C:\whatever.html", vbNullString, vbNullString, SW_SHOWNORMAL
Последний раз редактировалось a7161; 22.11.2011 в 20:32.
valera (22.11.2011)
Потому что это функция winapi. Нужно подключить к проекту. Попробую щас расписать как.
Так, вот пример:
Код:Private Declare Function ShellExecute Lib "shell32" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Const SW_SHOWNORMAL = 1 Private Sub Form_Load() ShellExecute 0, "open", "C:\whatever.html", vbNullString, vbNullString, SW_SHOWNORMAL End Sub
Последний раз редактировалось a7161; 22.11.2011 в 21:26.
valera (22.11.2011)
Потому что вызов функции не в том обработчике. Перенеси ShellExecute в код для кнопки:
Ну и из Form_Load() удали. Это было только для примера как объявлять и использовать.Код:Private Sub Command1_Click() ShellExecute 0, "open", "C:\whatever.html", vbNullString, vbNullString, SW_SHOWNORMAL End Sub
valera (22.11.2011)
a7161 (22.11.2011)
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)