Найти в строке... / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Найти в строке...

22 сообщений из 22, страница 1 из 1

Найти в строке...

#37787468

lenash

Гость

Есть строка
{i:0;.....i:5741;}

Нужна взять последнее значение (5741), причем это число не всегда четырехзначное.
Подскажите, с помошью каких функций это можно сделать?

...

Рейтинг:

0 / 0

10.05.2012, 11:27

| Ответить | Цитировать | Написать

Найти в строке...

#37787475

s plit

Гость

lenash,

SPLIT

...

Рейтинг:

0 / 0

10.05.2012, 11:30

| Ответить | Цитировать | Написать

Найти в строке...

#37787482

рвота

Гость

lenash,

Код: vbnet

1.
2.
3.

dim s() as string
s=split(строка,"i:")
msgbox s(ubound(s)-1)

...

Рейтинг:

0 / 0

10.05.2012, 11:32

| Ответить | Цитировать | Написать

Найти в строке...

#37787542

lenash

Гость

Îáúåêò Response ошибка 'ASP 0106 : 80020005'
Íåñîîòâåòñòâèå òèïà

/default_mysql.asp, line 0

Îáíàðóæåí íåîáðàáàòûâàåìûé òèï äàííûõ.

...

Рейтинг:

0 / 0

10.05.2012, 12:00

| Ответить | Цитировать | Написать

Найти в строке...

#37787548

lenash

Гость

Ой эт я нечайно)

...

Рейтинг:

0 / 0

10.05.2012, 12:02

| Ответить | Цитировать | Написать

Найти в строке...

#37787549

lenash

Гость

Хотя на split говорит "Обнаружен необрабатываемый тип данных"

...

Рейтинг:

0 / 0

10.05.2012, 12:03

| Ответить | Цитировать | Написать

Найти в строке...

#37787570

lenash

Гость

str1=rsID("option_value")
x=CHARINDEX(':',str1,len(str1))

Т.е. хочу найти : в строке str1 с конца. И вот что выходит - Ошибка компиляции Microsoft VBScript ошибка '800a03ea'
Синтаксическая ошибка.
А как по-другому?

...

Рейтинг:

0 / 0

10.05.2012, 12:12

| Ответить | Цитировать | Написать

Найти в строке...

#37787574

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

А озвучить сразу то, что речь идет о VBScript слабо?
А судя по CHARINDEX - речь идет вообще об MSSQL
Так на каком языке написать-то надо?

...

Рейтинг:

0 / 0

10.05.2012, 12:15

| Ответить | Цитировать | Написать

Найти в строке...

#37787580

lenash

Гость

сори) VBScript

...

Рейтинг:

0 / 0

10.05.2012, 12:17

| Ответить | Цитировать | Написать

Найти в строке...

#37787588

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

вот так попробуй

Код: vbnet

str1=CStr(rsID("option_value"))

...

Рейтинг:

0 / 0

10.05.2012, 12:21

| Ответить | Цитировать | Написать

Найти в строке...

#37787591

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

это для дальнейшей обработки сплитом

...

Рейтинг:

0 / 0

10.05.2012, 12:21

| Ответить | Цитировать | Написать

Найти в строке...

#37787600

lenash

Гость

Пробовала, та же ошибка

...

Рейтинг:

0 / 0

10.05.2012, 12:23

| Ответить | Цитировать | Написать

Найти в строке...

#37787606

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Странно, какой тип поля "option_value" на cтороне MSSQL?
Каким запросом идет выборка?

...

Рейтинг:

0 / 0

10.05.2012, 12:24

| Ответить | Цитировать | Написать

Найти в строке...

#37787622

lenash

Гость

Я наверное вас убью, но это MySql, тип поля longtext.
Запрос:
idSQL = "select * from ako_options where option_id=85"
Set rsID = Server.CreateObject("ADODB.Recordset")
Set rsID = conx.Execute(idSQL)

Просто основная информация из MSSQL берется, а тут кое-что надо из другое базы.

...

Рейтинг:

0 / 0

10.05.2012, 12:35

| Ответить | Цитировать | Написать

Найти в строке...

#37787644

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

попробуй

Код: vbnet

idSQL = "select cast(option_value as ....) as option_value from ako_options where option_id=85"

тока не помню, как в mysql называется текстовый тип

кроме того, можно отрезать нужные данные на стороне сервера в запросе и не делать это на стороне скрипта

а строка, часом, не длиннее 64кб?

...

Рейтинг:

0 / 0

10.05.2012, 12:45

| Ответить | Цитировать | Написать

Найти в строке...

#37787745

lenash

Гость

Нее не помогает cast, все равно "необрабатываем тип данных". А почему charindex ругается?

...

Рейтинг:

0 / 0

10.05.2012, 13:27

| Ответить | Цитировать | Написать

Найти в строке...

#37787756

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

lenashА почему charindex ругается?Потому что нет такой функции в VB. Предлагаю тогда применять ее внутри запроса.

...

Рейтинг:

0 / 0

10.05.2012, 13:32

| Ответить | Цитировать | Написать

Найти в строке...

#37787825

lenash

Гость

и в строке запроса не знает такую функцию((

...

Рейтинг:

0 / 0

10.05.2012, 14:01

| Ответить | Цитировать | Написать

Найти в строке...

#37787845

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

значит в MySQL эта функция иначе называется... но это уже немножко не сюда

...

Рейтинг:

0 / 0

10.05.2012, 14:11

| Ответить | Цитировать | Написать

Найти в строке...

#37787866

lenash

Гость

все равно спасибо)

...

Рейтинг:

0 / 0

10.05.2012, 14:22

| Ответить | Цитировать | Написать

Найти в строке...

#37788018

studieren

Участник

Откуда: Tashkent, Uzbekistan

Сообщения: 2 850

Рейтинг: 0 / 0

lenashЕсть строка
{i:0;.....i:5741;}

Нужна взять последнее значение (5741), причем это число не всегда четырехзначное.
Подскажите, с помошью каких функций это можно сделать?
А если так попробовать не вариант?

Код: vbnet

1.
2.
3.

Dim strText As String, strResult As String
strText = "{i:0;.....i:5741;}"
strResult = Val(Mid$(strText, InStrRev(1, strText, "i:") + 2))

...

Рейтинг:

0 / 0

10.05.2012, 15:37

| Ответить | Цитировать | Написать

Найти в строке...

#37788029

studieren

Участник

Откуда: Tashkent, Uzbekistan

Сообщения: 2 850

Рейтинг: 0 / 0

lenash,

Сорри, чуть-чуть ошибся (лишний "1, "). Исправляю:

Код: vbnet

1.
2.
3.

Dim strText As String, strResult As String
strText = "{i:0;.....i:5741;}"
strResult = Val(Mid$(strText, InStrRev(strText, "i:") + 2))

...

Рейтинг:

0 / 0

10.05.2012, 15:40

| Ответить | Цитировать | Написать

22 сообщений из 22, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Найти в строке...

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&fpage=79&tid=2157805]:	0ms
get settings:	8ms
get forum list:	13ms
check forum access:	4ms
check topic access:	4ms
track hit:	28ms
get topic data:	10ms
get forum data:	2ms
get page messages:	59ms
get tp. blocked users:	2ms
others:	343ms

total:	473ms