Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Можно ли организовать поиск по гипертексту? / 7 сообщений из 7, страница 1 из 1
11.03.2003, 12:43
    #32117262
Сергей Борисович
Сергей Борисович
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
нужно сделать что-то в этом духе:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
        Dim db As DAO.Database, rst As DAO.Recordset
        Dim intRtn As Integer

        Set db = CurrentDb
        Set rst = db.OpenRecordset( "table" , dbOpenDynaset)
        rst.FindFirst  "Website] = "  "" & Me.URL & "  """            ' << несоотв.типов '
        If Not rst.NoMatch Then
            MsgBox  "ok" 
            ' ... '
        rst.Close


на сей код - ассеss выдаёт несоответствие типов.
Как нужно оформить запрос?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2003, 13:17
    #32117313
Сергей Борисович
Сергей Борисович
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
Тот же вопрос относительно поля мемо:
как правильно организовать запрос и возможно ли это?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2003, 15:28
    #32117499
Senin Viktor
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
rst.FindFirst "Website] = '" & Me.URL & "'" ' << несоотв.типов '
т.е. используй ' вместо "
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2003, 17:36
    #32117685
Сергей Борисович
Сергей Борисович
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2003, 17:40
    #32117689
Senin Viktor
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
"По играй" с аргументами
Set rst = db.OpenRecordset("table", dbOpenDynaset)
Убери dbOpenDynaset

А что выдаст debug.print me!url ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.03.2003, 16:36
    #32118540
Сергей Борисович
Сергей Борисович
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
Формат:
Текст_линка#URL#
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.03.2003, 17:22
    #32118630
Senin Viktor
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Можно ли организовать поиск по гипертексту?
>Текст_линка#URL#

А поле Website] тоже хранит такой же текст (Текст_линка#URL#), если да
то проблема в #. В ## заключаются даты, а у тебя текст- отсюда и не соотвествие типов

Можно сделать следующее (для Акес2000/2002):

dim strTemp as string
strTemp=replace (Me.URL,"#","?",1,-1) 'заменим # на ?

' в strTemp будет типа: СуперСайт?http:\\www.ru?

'перепишем условие поиска на Like. Знак ? будет рассматриваться как один любой символ, что нам и надо

rst.FindFirst "Website] Like '" & strTemp & "'"

' т.е. будем искать rst.FindFirst "Website] Like 'СуперСайт?http:\\www.ru?'"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Можно ли организовать поиск по гипертексту? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 314ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1682125]:
 0ms
get settings:
 6ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 38ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 217ms
total:  314ms
x
x
Закрыть


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