最新的Web开发教程
 

ADO添加记录


我们可以使用SQL INSERT INTO命令记录在数据库中添加一个表。


添加记录到数据库表中

我们希望一个新的记录在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命令要注意以下几点:

  • 如果表中包含一个主键,确保一个独特的,非空值追加到主键字段(如果没有,则供应商可以不追加记录,或发生错误)
  • 如果表中包含一个自动编号字段,不包括在SQL INSERT命令此字段(这个字段的值将由供应商被照顾的自动)

什么字段没有数据?

在MS Access数据库,您可以输入零长度字符串("")如果设置AllowZeroLength属性为是在文本,超链接,和备注字段。

Note:并非所有的数据库都支持零长度字符串,当添加空白字段记录可能会导致错误。 检查你的数据库支持的数据类型是很重要的。