Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Слово из строки. / 12 сообщений из 12, страница 1 из 1
01.10.2010, 17:21
    #36877667
Rampage
Rampage
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
Подскажите пожалуйста.
Есть у меня в переменной строка вида <test>lala</test>.
как мне в другой переменной присвоить значение находящееся между <test> и </test>?

Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.10.2010, 17:51
    #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, 22:10
    #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:12
    #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
| Ответить | Цитировать | Написать  
04.10.2010, 10:01
    #36879641
Rampage
Rampage
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
Хуго, спс,

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

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

а нужо именно, в переменную взять то, что находиться после тега <test> и перед тегом </test>.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.10.2010, 12:38
    #36879974
С.В.
С.В.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
Можно подключить бибилиотеку Regex от MS IE и попробовать составить регулярное выражение для твоего случая.
P.S. сам не пробовал :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.10.2010, 12:41
    #36879983
С.В.
С.В.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
Тынц
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.10.2010, 15:22
    #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:29
    #36880524
HandKot
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
ээх, тряхну стариной
Код: plaintext
split(split("DOHRENATEKSTA<TEST>lala</TEST>DOHRENATEKSTA", "<TEST>")( 1 ), "</TEST>")( 0 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.10.2010, 17:35
    #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
| Ответить | Цитировать | Написать  
05.10.2010, 10:30
    #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, 13:45
    #36882351
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Слово из строки.
Вообще, есть еще несколько вариантов:
- если исходная строка взята из файла/web-страницы/XML-документа, то можно воспользоваться стандартными парсерами из "MS HTML object library" или "MS XML parser"
- написать собственный парсер строк, исходя из структуры собственных тэгов
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Слово из строки. / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 421ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2177610]:
 0ms
get settings:
 6ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 160ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 31ms
get tp. blocked users:
 1ms
others: 199ms
total:  421ms
x
x
Закрыть


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