SQL запрос к HTML таблице / Visual Basic

ReSQL.ru

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

Гость

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

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

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

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

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / SQL запрос к HTML таблице

47 сообщений из 47, показаны все 2 страниц

все

SQL запрос к HTML таблице

#38636220

IvanC

Гость

Здравствуйте, УВАЖАЕМЫЕ форумчане.
Столкнулся с проблемой подключения к HTML таблице. Подключаюсь к ней через Microsoft.Jet.OLEDB.4.0, мне нужно выбрать неповторяющиеся значения из конкретного столбца, но работает только запрос вида

Код: vbnet

Select * From [export]

, то есть, выборка из конкретного поля не проходит. Возможно ли это?

...

Рейтинг:

0 / 0

08.05.2014, 09:17

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

SQL запрос к HTML таблице

#38636247

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Как подключаетесь, что значит "не проходит" и т.п., пример кода...

Не жалейте букв описывать проблему - они бесплатные

...

Рейтинг:

0 / 0

08.05.2014, 09:54

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

SQL запрос к HTML таблице

#38636257

IvanC

Гость

Код: vbnet

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & MyName & ";Extended Properties='HTML Import;HDR=YES;IMEX=1';"

Подключаюсь средствами VB6, пробовал выборку следующим запросом:

Код: sql

Select DISTINCT export.id From export

но в ответ получаю ошибку: Отсутствует значение для одного или нескольких требуемых параметров

...

Рейтинг:

0 / 0

08.05.2014, 10:03

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

SQL запрос к HTML таблице

#38636261

ПЕНСИОНЕРКА

Участник

Откуда: Владимирская обл

Сообщения: 4 809

Рейтинг: 0 / 0

IvanC,

подозреваю пробелы в MyPath & MyName

...

Рейтинг:

0 / 0

08.05.2014, 10:06

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

SQL запрос к HTML таблице

#38636267

IvanC

Гость

Я пробовал непосредственным адресом задавать. Тем более, запрос на выборку всех полей работает нормально.

...

Рейтинг:

0 / 0

08.05.2014, 10:10

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

SQL запрос к HTML таблице

#38636294

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Можно все-таки полный код подключения и запроса и образец таблицы, чтобы попробовать у себя?
маловато данных, похоже на проблему формирования самого запроса...

...

Рейтинг:

0 / 0

08.05.2014, 10:23

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

SQL запрос к HTML таблице

#38636410

IvanC

Гость

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

 
 cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & MyName & ";Extended Properties='HTML Import;HDR=YES;IMEX=1';"
 cn.Open

 SQL = "Select export.id From export"

rs.Open SQL, cn, adOpenStatic, adLockReadOnly
 
rs.Close
cn.Close

таблицу чуток позже

...

Рейтинг:

0 / 0

08.05.2014, 11:19

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

SQL запрос к HTML таблице

#38636453

IvanC

Гость

Хотя нет, таблицу не получится, там данные не для широкого круга. Попробовал ради интереса на другой HTML-таблице, все нормально работает. Значит, дело именно в таблице. Пойду тогда окольными путями.

...

Рейтинг:

0 / 0

08.05.2014, 11:32

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

SQL запрос к HTML таблице

#38636502

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Ну так таблицу можно урезать, данные заменить на бред (хоть с помощью Ctrl+H)...

...

Рейтинг:

0 / 0

08.05.2014, 11:52

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

SQL запрос к HTML таблице

#38636562

IvanC

Гость

Отредактировал. Выкладываю. Заранее спасибо.

...

Рейтинг:

0 / 0

08.05.2014, 12:18

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

SQL запрос к HTML таблице

#38636589

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

ибо в таблице нет поля "id"

Код: vbnet

SQL = "Select "" id "" From export", cn, adOpenStatic, adLockReadOnly

так работает

...

Рейтинг:

0 / 0

08.05.2014, 12:28

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

SQL запрос к HTML таблице

#38636591

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

у тебя названия колонок другие (неразрывные пробелы)
вот такие нужно делать:

Код: sql

SELECT [ id ] FROM [export]

...

Рейтинг:

0 / 0

08.05.2014, 12:29

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

SQL запрос к HTML таблице

#38636595

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Код: html

1.
2.
3.
4.
5.

  <td nowrap style='background:#DEDEDE;padding:2.25pt 2.25pt 2.25pt 2.25pt'>
  <p class=MsoNormal align=center style='text-align:center'><b><span
  style='font-size:9.0pt;font-family:"Arial","sans-serif";mso-fareast-font-family:
  "Times New Roman"'>&nbsp;<span class=SpellE>id</span>&nbsp;<o:p></o:p></span></b></p>
  </td>

...

Рейтинг:

0 / 0

08.05.2014, 12:30

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

SQL запрос к HTML таблице

#38636605

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Konst_One

Код: sql

[ id ]

не канает ))

...

Рейтинг:

0 / 0

08.05.2014, 12:33

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

SQL запрос к HTML таблице

#38636610

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

а ну да, тут провайдер другой =)

...

Рейтинг:

0 / 0

08.05.2014, 12:34

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

SQL запрос к HTML таблице

#38636657

IvanC

Гость

что-то у меня со строкой

Код: vbnet

SQL = "Select "" id "" From export", cn, adOpenStatic, adLockReadOnly

вытаскивает одни только "id" в значениях.

...

Рейтинг:

0 / 0

08.05.2014, 12:56

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

SQL запрос к HTML таблице

#38636675

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

а что вы хотели?
Вот ваш код (нерабочий)IvanC

Код: vbnet

SQL = "Select export.id From export"

я написал, как его исправить, чтобы он работал

...

Рейтинг:

0 / 0

08.05.2014, 13:02

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

SQL запрос к HTML таблице

#38636719

IvanC

Гость

может, неправильно выразился, но там вся таблица с одним только словом id в каждой ячейке получается. То есть, работает, но некорректно.

...

Рейтинг:

0 / 0

08.05.2014, 13:24

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

SQL запрос к HTML таблице

#38636788

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

А, это я тупанул.

Вот так корректно будет работать

Код: vbnet

SQL = "Select " + Chr(160) + "id" + Chr(160) + " AS id From export"

...

Рейтинг:

0 / 0

08.05.2014, 14:04

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

SQL запрос к HTML таблице

#38638680

IvanC

Гость

На последний запрос пишет, что отсутствует значение для одного или нескольких требуемых параметров. Я понять не могу, почему через recordset возвращает имена полей:

Код: vbnet

rs.Fields(i).Name

, а в запросе к конкретному полю ругается...

...

Рейтинг:

0 / 0

12.05.2014, 13:25

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

SQL запрос к HTML таблице

#38638688

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Что возвращает Asc(rs.Fields(i).Name)?

...

Рейтинг:

0 / 0

12.05.2014, 13:30

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

SQL запрос к HTML таблице

#38638697

IvanC

Гость

160

...

Рейтинг:

0 / 0

12.05.2014, 13:37

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

SQL запрос к HTML таблице

#38638712

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

а как вы пытаетесь обратиться к полю по имени?

...

Рейтинг:

0 / 0

12.05.2014, 13:49

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

SQL запрос к HTML таблице

#38638729

IvanC

Гость

Так же, как и выше описывал

Код: vbnet

SELECT id FROM export

, я понимаю, что это неправильно, но меня больше интересует, почему это не работает? Хочется понять.

...

Рейтинг:

0 / 0

12.05.2014, 14:00

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

SQL запрос к HTML таблице

#38638740

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

уже объясняли же: имя поля у вас не id , а id

= это символ неразрывного пробела (код 160)

...

Рейтинг:

0 / 0

12.05.2014, 14:05

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

SQL запрос к HTML таблице

#38638741

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

& nbsp;

...

Рейтинг:

0 / 0

12.05.2014, 14:05

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

SQL запрос к HTML таблице

#38638743

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

IvanCя понимаю, что это неправильно, но меня больше интересует, почему это не работает? Хочется понять.Ну здрасьти, приехали!
Вы ответы выше читали? поле "id" отсутствует в вашей таблице!!!!

Почему оно отсутствует и как правильно обратиться, я уже написал выше.

Перечитайте топик пожалуйста.

...

Рейтинг:

0 / 0

12.05.2014, 14:06

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

SQL запрос к HTML таблице

#38638789

IvanC

Гость

ну а почему тогда даже ваш запрос не обрабатывается?

Код: vbnet

SQL = "Select " + Chr(160) + "id" + Chr(160) + " AS id From export"

...

Рейтинг:

0 / 0

12.05.2014, 14:29

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

SQL запрос к HTML таблице

#38638798

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Что в вашем понимании "не обрабатывается"?

В любом случае, тот пример кода, который вы прислали, с тем примером таблицы, который вы прислали, и моей строкой работает. Скиньте код, который у вас не работает.

...

Рейтинг:

0 / 0

12.05.2014, 14:36

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

SQL запрос к HTML таблице

#38638808

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

Используйте CursorLocation adUseClient (3).

можно так:

Код: vbnet

SQL = "Select [" & Chr(160) & "id" & Chr(160) & "] AS id From export"

...

Рейтинг:

0 / 0

12.05.2014, 14:46

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

SQL запрос к HTML таблице

#38638809

IvanC

Гость

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.

Set cn = New ADODB.Connection
 Set rs = New ADODB.Recordset

    Do While MyName <> ""
           If MyName Like "*.html" Then 

 cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & MyName & ";Extended Properties='HTML Import;HDR=YES;IMEX=1';"

  
 SQL = "Select " + Chr(160) + "id" + Chr(160) + " AS id From export"
cn.Open

  rs.Open SQL, cn, adOpenStatic, adLockReadOnly
 
 Do Until rs.EOF
 
 Debug.Print rs.Fields(0)
 
 rs.MoveNext
 Loop

 rs.Close
cn.Close

...

Рейтинг:

0 / 0

12.05.2014, 14:47

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

SQL запрос к HTML таблице

#38638819

Konst_One

Участник

Сообщения: 12 099

Рейтинг: 0 / 0

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.

Set cn = New ADODB.Connection
 Set rs = New ADODB.Recordset

    Do While MyName <> ""
           If MyName Like "*.html" Then 

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & MyName & ";Extended Properties='HTML Import;HDR=YES;IMEX=1';"
cn.CursorLocation = adUseClient
cn.Open
  
SQL = "Select [" & Chr(160) & "id" & Chr(160) & "] AS id From export"

SET rs.ActiveConnection = cn
rs.Open SQL, , adOpenStatic, adLockReadOnly
 
 Do Until rs.EOF
 
 Debug.Print rs.Fields(0)
 
 rs.MoveNext
 Loop

rs.Close
cn.Close

Set rs = Nothing
Set cn = Nothing

...

Рейтинг:

0 / 0

12.05.2014, 14:51

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

SQL запрос к HTML таблице

#38638837

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

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

...

Рейтинг:

0 / 0

12.05.2014, 15:00

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

SQL запрос к HTML таблице

#38638846

IvanC

Гость

Ого! Это чудо! Со скобками заработало... Я б в жизни не додумался до этого! Спасибо!!!!

...

Рейтинг:

0 / 0

12.05.2014, 15:05

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

SQL запрос к HTML таблице

#38640554

IvanC

Гость

И еще вопрос из этой темы назрел. В этот же запрос добавляю условие:

Код: vbnet

SQL = "Select [" & Chr(160) & "id" & Chr(160) & "] AS id From export Where id<>'0'"

, но тут же получаю ошибку, что нет значения для одного или нескольких требуемых параметров. Пробовал и так:

Код: vbnet

SQL = "Select [" & Chr(160) & "id" & Chr(160) & "] AS id From export Where [" & Chr(160) & "id" & Chr(160) & "]<>'0'"

, но получаю ошибку о несоответствии типов данных. Что опять ему не нравится?

...

Рейтинг:

0 / 0

14.05.2014, 09:35

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

SQL запрос к HTML таблице

#38640598

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

IvanCнесоответствии типов данныхну так поле целочисленное, не надо брать ноль в кавычки

...

Рейтинг:

0 / 0

14.05.2014, 10:15

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

SQL запрос к HTML таблице

#38640606

IvanC

Гость

Ну это я для примера, на самом деле у меня там текстовое поле, и в запросе я тоже текст пишу в кавычках.

...

Рейтинг:

0 / 0

14.05.2014, 10:16

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

SQL запрос к HTML таблице

#38640610

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

ну на "для примера" я и ответил для примера
будет другой пример, может будет другой ответ

...

Рейтинг:

0 / 0

14.05.2014, 10:17

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

SQL запрос к HTML таблице

#38640619

IvanC

Гость

Применимо к той таблице, которую я раньше выгружал, запрос будет выглядеть так:

Код: vbnet

SQL = "Select DISTINCT [" & Chr(160) & "Получатель" & Chr(160) & "] AS usr From export Where usr<>' server';"

...

Рейтинг:

0 / 0

14.05.2014, 10:26

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

SQL запрос к HTML таблице

#38640622

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

не, where с алиасом работать не будет
надо либо использовать оригинальное имя поля, либо делать вложенный подзапрос

...

Рейтинг:

0 / 0

14.05.2014, 10:27

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

SQL запрос к HTML таблице

#38640682

IvanC

Гость

С оригинальным именем

Код: vbnet

SQL = "Select DISTINCT [" & Chr(160) & "Получатель" & Chr(160) & "] AS usr From export Where [" & Chr(160) & "Получатель" & Chr(160) & "]<>' server';"

получаю несоответствие типов данных, а вот с вложенными запросами не встречался, поэтому буду разбираться.

...

Рейтинг:

0 / 0

14.05.2014, 11:27

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

SQL запрос к HTML таблице

#38640696

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

IvanCполучаю несоответствие типов данных

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.

Set cn = New ADODB.Connection
 Set rs = New ADODB.Recordset

  

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=v:\1.html;Extended Properties='HTML Import;HDR=YES;IMEX=1';"
cn.CursorLocation = adUseClient
cn.Open
  
SQL = "Select DISTINCT [" & Chr(160) & "Получатель" & Chr(160) & "] AS usr From export Where [" & Chr(160) & "Получатель" & Chr(160) & "]<>' server';"

Set rs.ActiveConnection = cn
rs.Open SQL, , adOpenStatic, adLockReadOnly
 
 Do Until rs.EOF
 
 Debug.Print rs.Fields(0)
 
 rs.MoveNext
 Loop

rs.Close
cn.Close

Set rs = Nothing
Set cn = Nothing

вот этот код на вашей таблице у меня исправно выдает " fdhghgh ". Даже не знаю, что сказать

...

Рейтинг:

0 / 0

14.05.2014, 11:33

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

SQL запрос к HTML таблице

#38640702

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Какая версия ADO подключена к проекту?

...

Рейтинг:

0 / 0

14.05.2014, 11:35

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

SQL запрос к HTML таблице

#38640745

IvanC

Гость

ADO 2.8. А проблема в 64-разрядной винде может быть?

...

Рейтинг:

0 / 0

14.05.2014, 11:59

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

SQL запрос к HTML таблице

#38640770

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

Я сейчас пробую на Win7/64

...

Рейтинг:

0 / 0

14.05.2014, 12:12

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

SQL запрос к HTML таблице

#38640772

Shocker.Pro

Участник

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

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

Рейтинг: 0 / 0

а если попробовать

Код: vbnet

" where [" & Chr(160) & "id" & Chr(160) & "] = 5"

...

Рейтинг:

0 / 0

14.05.2014, 12:13

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

SQL запрос к HTML таблице

#38640958

IvanC

Гость

Извиняюсь, сначала с адресом напутал, не те таблицы брал, а потом и подавно увидел, что на самом деле там тип поля не совпадал с тем, что я запрашивал. Опять подвела невнимательность. Всем очередной раз спасибо!

...

Рейтинг:

0 / 0

14.05.2014, 14:02

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

47 сообщений из 47, показаны все 2 страниц

все

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / SQL запрос к HTML таблице

Цитировать

Написать

Автор*:

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

Тема*:

Сообщение

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

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

Автор:

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

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

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

Вложение:

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

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

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

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

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

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

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

start [/forum/topic.php?all=1&fid=60&tid=2156380]:	0ms
get settings:	10ms
get forum list:	14ms
check forum access:	4ms
check topic access:	4ms
track hit:	59ms
get topic data:	11ms
get forum data:	3ms
get page messages:	70ms
get tp. blocked users:	1ms
others:	293ms

total:	469ms