 |
on-line-teaching.com Онлайн курсы MS Office: Word, Excell. Как сделать сайт: HTML, JS, PHP
|
Предыдущая тема :: Следующая тема
|
Автор |
Сообщение |
stan Prizivnik - draftee

Зарегистрирован: 13.06.2008 Сообщения: 3
|
Добавлено: Пт Июн 13, 2008 9:48 am Заголовок сообщения: Подскажите пожалуйста, с поиском в строке, еще 1 вопрос! |
|
|
Вопрос состоит в том, что имеется строка, например: "C:\Documents and Settings\Администратор\Рабочий стол\документы\dx000001.blg", необходимо получить имя открываемого файла, т.е. dx000001,естесственно имя файла может меняться в зависимости от выбранного файла пользователем,путь к файлу храниться в локальной переменной, каким образом это возможно сделать?..
P.S. Заранее благодарю за ответ и помощь...
Последний раз редактировалось: stan (Пн Июн 16, 2008 8:08 pm), всего редактировалось 1 раз |
|
Вернуться к началу |
|
 |
AsIs captain


Зарегистрирован: 27.01.2006 Сообщения: 250 Откуда: СПб
|
Добавлено: Вс Июн 15, 2008 2:01 pm Заголовок сообщения: |
|
|
Например вот так:
Код: | Sub ExtractFileName()
Dim strPath As String, strFileName As String
Dim intC As Integer
strPath = "C:\Documents and Settings\Profile\dx000001.blg"
intC = Len(strPath)
Do Until Mid(strPath, intC, 1) = "\"
strFileName = Mid(strPath, intC, 1) & strFileName
intC = intC - 1
If intC = 0 Then Exit Do
Loop
MsgBox (strFileName)
End Sub |
PS: с библиотеками .Net Framework все было бы на порядок короче... |
|
Вернуться к началу |
|
 |
stan Prizivnik - draftee

Зарегистрирован: 13.06.2008 Сообщения: 3
|
Добавлено: Пн Июн 16, 2008 5:29 pm Заголовок сообщения: |
|
|
А как пользоваться такой библиотекой?
P.S. Заранее благодарю...Спасибо за ответ... |
|
Вернуться к началу |
|
 |
|
|
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
|
|