Запрос в Oracle из VB6 sp6
Формулировка задачи:
Собственно содержимое
Dim strQuery As String
strQuery = "SELECT SMCARD.ARTICLE, SMCARD.NAME, SMPRICES.PRICE, SMGOODS.QUANTITY, SMPRICES.STORELOC FROM ((SMPRICES INNER JOIN SMCARD ON SMPRICES.ARTICLE = SMCARD.ARTICLE) INNER JOIN SVAARTCLASSIF ON SMPRICES.ARTICLE = SVAARTCLASSIF.ARTICLE) INNER JOIN SMGOODS ON SMPRICES.ARTICLE = SMGOODS.ARTICLE GROUP BY SMCARD.ARTICLE, SMCARD.NAME, SMPRICES.PRICE, SMGOODS.QUANTITY, SMPRICES.STORELOC, SMPRICES.PRICETYPE, SVAARTCLASSIF.TREE, SMGOODS.STORELOC HAVING (((SMGOODS.QUANTITY)>= 0) AND ((SMPRICES.STORELOC) Like 1) AND ((SMPRICES.PRICETYPE) Like 1) AND ((SVAARTCLASSIF.TREE) Like '69.*') AND ((SMGOODS.STORELOC) Like 2))"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
повисает после запуска, содержимое таблиз из запроса огромное несколько десяток тысяч, итог запроса 100-300. думаю дело не в количесиве обрабатываемой информации, Аксеесс сделал за 2 минуты.
Может дело в том то что запрос в оракл и есть какая то специфика?? хелп мии :~(
Dim strQuery As String
strQuery = "SELECT SMCARD.ARTICLE, SMCARD.NAME, SMPRICES.PRICE, SMGOODS.QUANTITY, SMPRICES.STORELOC FROM ((SMPRICES INNER JOIN SMCARD ON SMPRICES.ARTICLE = SMCARD.ARTICLE) INNER JOIN SVAARTCLASSIF ON SMPRICES.ARTICLE = SVAARTCLASSIF.ARTICLE) INNER JOIN SMGOODS ON SMPRICES.ARTICLE = SMGOODS.ARTICLE GROUP BY SMCARD.ARTICLE, SMCARD.NAME, SMPRICES.PRICE, SMGOODS.QUANTITY, SMPRICES.STORELOC, SMPRICES.PRICETYPE, SVAARTCLASSIF.TREE, SMGOODS.STORELOC HAVING (((SMGOODS.QUANTITY)>= 0) AND ((SMPRICES.STORELOC) Like 1) AND ((SMPRICES.PRICETYPE) Like 1) AND ((SVAARTCLASSIF.TREE) Like '69.*') AND ((SMGOODS.STORELOC) Like 2))"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
повисает после запуска, содержимое таблиз из запроса огромное несколько десяток тысяч, итог запроса 100-300. думаю дело не в количесиве обрабатываемой информации, Аксеесс сделал за 2 минуты.
Может дело в том то что запрос в оракл и есть какая то специфика?? хелп мии :~(
Решение задачи: «Запрос в Oracle из VB6 sp6»
textual
Листинг программы
<font color="blue">SELECT</font> SMCARD.ARTICLE, SMCARD.NAME, SMPRICES.PRICE, SMGOODS.QUANTITY, SMPRICES.STORELOC
<font color="blue">FROM</font> SMPRICES, SMCARD, SVAARTCLASSIF, SMGOODS
<font color="blue">WHERE</font> SMPRICES.ARTICLE = SMCARD.ARTICLE
<font color="blue">AND</font> SMPRICES.ARTICLE = SVAARTCLASSIF.ARTICLE
<font color="blue">AND</font> SMPRICES.ARTICLE = SMGOODS.ARTICLE
<font color="blue">AND</font> SMGOODS.QUANTITY >= <font color="darkblue"><b>0</b></font>
<font color="blue">AND</font> SMPRICES.STORELOC = <font color="darkblue"><b>1</b></font>
<font color="blue">AND</font> SMPRICES.PRICETYPE = <font color="darkblue"><b>1</b></font>
<font color="blue">AND</font> SVAARTCLASSIF.TREE <font color="blue">LIKE</font> <font color="red">'69.*'</font>
<font color="blue">AND</font> SMGOODS.STORELOC = <font color="darkblue"><b>2</b></font>
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д