ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Слово из строки.
12 сообщений из 12, страница 1 из 1
Слово из строки.
    #36877667
Фотография Rampage
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rampage
Участник
Подскажите пожалуйста.
Есть у меня в переменной строка вида <test>lala</test>.
как мне в другой переменной присвоить значение находящееся между <test> и </test>?

Спасибо!
...
Рейтинг: 0 / 0
01.10.2010, 17:21
| Ответить | Цитировать | Написать  
Слово из строки.
    #36877735
Aster32
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aster32
Гость
Код: plaintext
1.
'strY - переменная содержащая это самое ла-ла...
x = Left(Right(strY, Len(strY) -  6 ),Len(Right(strY, Len(strY) -  6 )) -  7 )
...
Рейтинг: 0 / 0
01.10.2010, 17:51
| Ответить | Цитировать | Написать  
Слово из строки.
    #36878076
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub tt()
strY = "<test>lala</test>"
strX = Replace(strY, "<test>", "")
strX = Replace(strX, "</test>", "")
MsgBox strY & vbNewLine & strX
End Sub
...
Рейтинг: 0 / 0
01.10.2010, 22:10
| Ответить | Цитировать | Написать  
Слово из строки.
    #36878080
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Или одной строкой тоже самое, но сложнее понять:
Код: plaintext
1.
2.
3.
4.
5.
Sub ttt()
strY = "<test>lala</test>"
strX = Replace(Replace(strY, "<test>", ""), "</test>", "")
MsgBox strY & vbNewLine & strX
End Sub
...
Рейтинг: 0 / 0
01.10.2010, 22:12
| Ответить | Цитировать | Написать  
Слово из строки.
    #36879641
Фотография Rampage
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rampage
Участник
Хуго, спс,

но если слева DOHRENATEKSTA<TEST>
а справа </TEST>DOHRENATEKSTA.

то получиться DOHRENATEKSTALALADOHRENATEKSTA.

а нужо именно, в переменную взять то, что находиться после тега <test> и перед тегом </test>.
...
Рейтинг: 0 / 0
04.10.2010, 10:01
| Ответить | Цитировать | Написать  
Слово из строки.
    #36879974
Фотография С.В.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
С.В.
Участник
Можно подключить бибилиотеку Regex от MS IE и попробовать составить регулярное выражение для твоего случая.
P.S. сам не пробовал :)
...
Рейтинг: 0 / 0
04.10.2010, 12:38
| Ответить | Цитировать | Написать  
Слово из строки.
    #36879983
Фотография С.В.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
С.В.
Участник
Тынц
...
Рейтинг: 0 / 0
04.10.2010, 12:41
| Ответить | Цитировать | Написать  
Слово из строки.
    #36880496
Aster32
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aster32
Гость
авторно если слева DOHRENATEKSTA<TEST>
а справа </TEST>DOHRENATEKSTA.
то получиться DOHRENATEKSTALALADOHRENATEKSTA.
а нужно именно, в переменную взять то, что находиться после тега <test> и перед тегом </test>.
Код: plaintext
1.
2.
3.
4.
5.
strY = "UTTT65JFK<test>lala777lala</test>RTY"
For i =  1  To Len(strY)
If Mid(strY, i,  1 ) = "<" And Mid(strY, i +  1 ,  1 ) <> "/" Then intStart = i +  6 
If Mid(strY, i,  1 ) = "<" And Mid(strY, i +  1 ,  1 ) = "/" Then intLenght = i - intStart: Exit For
Next i
strX = Mid(strY, intStart, intLenght)
...
Рейтинг: 0 / 0
04.10.2010, 15:22
| Ответить | Цитировать | Написать  
Слово из строки.
    #36880524
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
ээх, тряхну стариной
Код: plaintext
split(split("DOHRENATEKSTA<TEST>lala</TEST>DOHRENATEKSTA", "<TEST>")( 1 ), "</TEST>")( 0 )
...
Рейтинг: 0 / 0
04.10.2010, 15:29
| Ответить | Цитировать | Написать  
Слово из строки.
    #36880894
Aster32
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aster32
Гость
Ну ладно, тогда так: :)

Код: plaintext
1.
strY = "DOHRENATEKSTA<TEST>lalabumbum</TEST>DOHRENATEKSTA"
strX = Mid(strY, InStr(strY, "<TEST>") +  6 , InStr(strY, "</TEST>") - InStr(strY, "<TEST>") -  6 )
...
Рейтинг: 0 / 0
04.10.2010, 17:35
| Ответить | Цитировать | Написать  
Слово из строки.
    #36881660
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
Aster32Ну ладно, тогда так: :)

Код: plaintext
1.
strY = "DOHRENATEKSTA<TEST>lalabumbum</TEST>DOHRENATEKSTA"
strX = Mid(strY, InStr(strY, "<TEST>") +  6 , InStr(strY, "</TEST>") - InStr(strY, "<TEST>") -  6 )


а если дать такую строку
Код: plaintext
strY = "</TEST>DOHRENATEKSTA<TEST>lalabumbum</TEST>DOHRENATEKSTA"
?
...
Рейтинг: 0 / 0
05.10.2010, 10:30
| Ответить | Цитировать | Написать  
Слово из строки.
    #36882351
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Вообще, есть еще несколько вариантов:
- если исходная строка взята из файла/web-страницы/XML-документа, то можно воспользоваться стандартными парсерами из "MS HTML object library" или "MS XML parser"
- написать собственный парсер строк, исходя из структуры собственных тэгов
...
Рейтинг: 0 / 0
05.10.2010, 13:45
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Слово из строки.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36878080&tid=2177610]:
 0ms
get settings:
 4ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 148ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 196ms
total:  396ms
созд. / загр.: 396ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]