ADO Добавить записи
Мы можем использовать команду SQL INSERT INTO для добавления записи в таблицу базы данных.
Добавить запись в таблицу в базе данных
Мы хотим добавить новую запись в таблицу Customers в базе данных Northwind. Сначала мы создаем форму, содержащую поля, из которых мы хотим собирать данные:
<html>
<body>
<form method="post" action="demo_add.asp">
<table>
<tr>
<td>CustomerID:</td>
<td><input name="custid"></td>
</tr><tr>
<td>Company Name:</td>
<td><input name="compname"></td>
</tr><tr>
<td>Contact Name:</td>
<td><input name="contname"></td>
</tr><tr>
<td>Address:</td>
<td><input name="address"></td>
</tr><tr>
<td>City:</td>
<td><input name="city"></td>
</tr><tr>
<td>Postal Code:</td>
<td><input name="postcode"></td>
</tr><tr>
<td>Country:</td>
<td><input name="country"></td>
</tr>
</table>
<br><br>
<input type="submit" value="Add New">
<input type="reset" value="Cancel">
</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("No update permissions!")
else
Response.Write("<h3>" & recaffected & " record added</h3>")
end if
conn.close
%>
</body>
</html>
Важный
Если вы используете команду SQL INSERT, имейте в виду следующее:
- Если таблица содержит первичный ключ, убедитесь, что к полю первичного ключа добавлено уникальное значение, отличное от NULL (в противном случае провайдер может не добавить запись или произойдет ошибка).
- Если таблица содержит поле AutoNumber, не включайте это поле в команду SQL INSERT (о значении этого поля автоматически позаботится поставщик).
Как насчет полей без данных?
В базе данных MS Access вы можете вводить строки нулевой длины ("") в поля "Текст", "Гиперссылка" и "Заметка", ЕСЛИ для свойства AllowZeroLength установлено значение "Да".
Примечание. Не все базы данных поддерживают строки нулевой длины и могут вызвать ошибку при добавлении записи с пустыми полями. Важно проверить, какие типы данных поддерживает ваша база данных.