Главная страница Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Предложение ORDER BY
|
|
Предложение ORDER BY используется для создания набора записей в специфицированном порядке. Опция ASC указывает порядок возрастания, a DESC — порядок убывания
В следующем примере из таблицы Employees возвращаются все поля; записи набора сортируются по полю LastName (фамилия):
SELECT * FROM Employees ORDER BY [LastName] DESC
Использование оператора SELECT с несколькими таблицами
Для объединения данных из нескольких таблиц можно использовать операцию соединения JOIN. Например, если требуется вывести на экран наименования групп товаров и названия товаров из различных таблиц – можно соединить записи из таблиц Categories и Products.
Предложение INNER JOIN определяет, что, например, требуется получить записи, для которых номер группы (CategoryID) из таблицы Categories соответствует номеру группы из таблицы Products.
В следующем примере соединяется информация из таблицы Categories и таблицы Products:
StrSQL = “SELECT Categories.[CategoryName], “ & _
“Products.[ProductName] “ & _
“FROM Categories “ & _
“INNER JOIN Products ON “ & _
“Products.[CategoryID] = Categories.[CategoryID]”
На следующей иллюстрации показан примерный результат такой операции соединения:
| Таблица Categories | |
| CategoryID | CategoryName |
| Мясные | |
| Рыбные | |
| Концентраты |
| Таблица Products | ||
| ProductID | ProductName | CategoryID |
| Бэкон | ||
| Куриные куб. | ||
| Сосиски |
| INNER JOIN | |
| CategoryName | ProductName |
| Мясные | Бэкон |
| Мясные | Сосиски |
| Концентраты | Куриные куб. |
САМОСТОЯТЕЛЬНО
1. В Access создайте эти две таблицы, заполните их данными, свяжите по полю CategoryID. (Ключевые поля не создавайте)
2. Поместите на форму элементы Data и DBGrid.
3. Data привяжите к базе данных и к одной (без разницы какой – они все равно связаны между собой) из таблиц.
4. DBGrid привяжите к элементу Data.
5. Напишите код для вывода результата соединения этих 2 таблиц (третью таблицу)
Код (сначала попробовать самостоятельно)
Private Sub Form_Load()
Dim db As Database
Dim recTovar As Recordset
Dim strSQL As String
Set db = OpenDatabase(" c: \Мои документы\Товары2.mdb")
strSQL = " SELECT Categories.[CategoryName], " & _
" Products.[ProductName] " & _
" FROM Categories " & _
" INNER JOIN Products ON " & _
" Products.[CategoryID] = Categories.[CategoryID]"
Set recTovar = db.OpenRecordset(strSQL)
Set Data1.Recordset = recTovar
End Sub
|
|