Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: путь к файлу в MMControl Добавлено: 19.06.06 03:42  

Автор вопроса:  pinky | Web-сайт: jimsunweed.com | ICQ: 218-538-334 
через MMControl обращаюсь к wav-файлу, путь к нему подробоно прописываю в свойстве FileName с указанием диска, всех папок и т.д(иначе не работает!). поэтому если папку с прогой переношу в другое место, то звука, естессно, нет, что совсем не радует!! можно ли как-то вызвать звуковой файл, просто указав его имя и подразумевая что он находится в тойже папке что и экзешник?? или это можно сделать без MMControl?
помогите плиз!!

Ответить

  Ответы Всего ответов: 8  

Номер ответа: 1
Автор ответа:
 [root]



Вопросов: 45
Ответов: 1212
 Web-сайт: bit.pirit.info
 Профиль | | #1
Добавлено: 19.06.06 08:44
App.Path
Вроде еще никто не отменял

К примеру:
strInfo = Now
FilneNum = FreeFile
Open App.Path & "\log.lg" For Append As #FilneNum
    Print #FilneNum, strInfo
Close #FilneNum



Ответить

Номер ответа: 2
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #2 Добавлено: 19.06.06 11:54
[root], ну чему ты человека учишь? Проверка на App.Path где? Вот кинет чел свою прогу в корень, и будет ругаться - какой же [root] ламер, такую бяку подсказал, неработает :()

Ответить

Номер ответа: 3
Автор ответа:
 Mervil



Вопросов: 1
Ответов: 7
 Профиль | | #3 Добавлено: 19.06.06 12:51
LamerOnLine - Что за проверка?

Ответить

Номер ответа: 4
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #4 Добавлено: 19.06.06 12:57
Элементарная. Все App.Path заменяешь на AppPath и добавляешь код

Dim AppPath As String
If Right$(AppPath, 1) = "\" Then
    AppPath = App.Path
Else
    AppPath = App.Path & "\"
End If

Ответить

Номер ответа: 5
Автор ответа:
 pinky



ICQ: 218-538-334 

Вопросов: 3
Ответов: 9
 Web-сайт: jimsunweed.com
 Профиль | | #5
Добавлено: 19.06.06 13:10
спасибо , [root], все получилось! так долго парился, а оказывается что все просто=)

2 LamerOnLine - а что это за проверка? прога везде работает и в корне тоже

Ответить

Номер ответа: 6
Автор ответа:
 GSerg



Вопросов: 0
Ответов: 1876


 Профиль | | #6 Добавлено: 19.06.06 13:43
pinky, если винда 2000 и выше заменяет за тебя \\ на \, это не значит, что \\ - это правильно.

Ответить

Номер ответа: 7
Автор ответа:
 [root]



Вопросов: 45
Ответов: 1212
 Web-сайт: bit.pirit.info
 Профиль | | #7
Добавлено: 19.06.06 18:52
LamerOnLine - все гуд, я общий смысл подсказал

Ответить

Номер ответа: 8
Автор ответа:
 pinky



ICQ: 218-538-334 

Вопросов: 3
Ответов: 9
 Web-сайт: jimsunweed.com
 Профиль | | #8
Добавлено: 19.06.06 19:10
GSerg, я все понял. просто никогда с этим не сталкивался, не в курсе

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам