ADO Добавить запись


Мы можем использовать команду SQL INSERT INTO, чтобы добавить запись в таблицу базы данных.


Добавить запись в таблицу базы данных

Мы хотим добавить новую запись в таблицу Customers базы данных Northwind. Сначала нам нужно создать форму, содержащую поля ввода, из которых мы будем собирать данные:

<html>
<body>

<form method="post" action="demo_add.asp">
<table>
<tr>
<td>CustomerID:</td>

</tr><tr>
<td>Название компании:</td>

</tr><tr>
<td>Контактное лицо:</td>

</tr><tr>
<td>Адрес:</td>

</tr><tr>
<td>Город:</td>

</tr><tr>
<td>Почтовый индекс:</td>

</tr><tr>
<td>Страна:</td>

</tr>
</table>
<br><br>
<input type="submit" value="Добавить">
<input type="reset" value="Отмена">
</form>

</body>
</html>

Когда пользователь нажимает кнопку подтверждения, форма отправляется в файл "demo_add.asp". Файл "demo_add.asp" содержит код, который может добавить новую запись в таблицу Customers:

<html>
<body>

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"

sql="INSERT INTO customers (customerID,companyname,"
sql=sql & "contactname,address,city,postalcode,country)"
sql=sql & " VALUES "
sql=sql & "('" & Request.Form("custid") & "',"
sql=sql & "'" & Request.Form("compname") & "',"
sql=sql & "'" & Request.Form("contname") & "',"
sql=sql & "'" & Request.Form("address") & "',"
sql=sql & "'" & Request.Form("city") & "',"
sql=sql & "'" & Request.Form("postcode") & "',"
sql=sql & "'" & Request.Form("country") & "')"

on error resume next
conn.Execute sql,recaffected
if err<>0 then
  Response.Write("Нет разрешения на обновление!")
else
  Response.Write("<h3>" & recaffected & " записей добавлено</h3>")
end if
conn.close
%>

</body>
</html>


Важные замечания

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

  • Если в таблице есть первичный ключ, убедитесь, что значения, которые вы добавляете в поле первичного ключа, уникальны и не пусты (иначе поставщик не добавит запись или возникнет ошибка)
  • Если таблица содержит поле автонумерации, не включайте это поле в команду INSERT (значение этого поля обрабатывается поставщиком)

О полях нулевой длины

В базе данных MS Access, если вы установите свойство AllowZeroLength в значение "Yes", можно вводить строки нулевой длины ("") в текстовых полях, полях гиперссылок и полях Memo.

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

Другие расширения