Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ПРОГ_ИНЖ / Лекция 8.ppt
Скачиваний:
88
Добавлен:
16.03.2015
Размер:
2.38 Mб
Скачать

Объект Command

СОЗДАНИЕ ОБЪЕКТА Command

Dim strConn,strSQL As String StrConn=“….;”

StrSQL=“SELECT Customer_id, CompanyName FROM Table1”

Dim Cn As New OleDbConnection (strConn) Cn.Open()

Dim cmd As New OleDbCommand(strSQL, cn)

КАК СОЗДАТЬ ОБЪЕКТ Command

:

ИмяОбъектаСОММАND= New

OleDbCommand(SQLзапрос,ИмяПод

ключения)

Выполнение запроса.

1Метод.ПолучениеExecuteScalarединственноговозвращает

значениезначениятипа Object.

ПРИМЕР

select count(*) from Table_1;

Dim strCon, strSQL as string strConn = “……”

strSQL = " select count(*) from Table_1" Dim cn As New OleDbConnection(strConn) Cn.Open()

Dim cmd As New OleDbCommand(strSQL,cn) Dim Res as Integer Res=СInt(cmd.ExecuteScalar)

MsgBox "Общее количество Строк в Таблице 1=" & Cstr(Results)

Cn.Close()

2. Выполнение запроса, не возвращающего записей

метод ExecuteNonQuery

СRЕАТЕ TABLE Tablel (Fieldl int NOT NULL, Field2 varchar(32))

DROP PROCEDURE StoredProcedure1

INSERT INTO Customers (CustomerlD,

CompanyName) VALUES (2, ‘Кора’)

UPDATE Customers SET CompanyName

= ‘Чибис’ WHERE CustomerlD = 2

DELETE FROM Customers WHERE

CustceerlD = 2

Объект OleDbCommand сообщает о результатах выполнения запроса с помощью

значения, возвращаемого методом

ExecuteNonQuery и определяющего

количество обработанных записей.

ПРИМЕР

Dim intR as Integer

intR = cmd.ExecuteNonQuery() If intR =1 then

Msgbox (“Обновление успешно”)

Else

Msgbox (“Обновление НЕуспешно”) End IF

3. Выполнение запроса, возвращающего массив

записей

метод ExecuteReader()

Например

SELECT * FROM Table1

Соседние файлы в папке ПРОГ_ИНЖ