我们可以使用 SQL 的 INSERT INTO 命令向数据库中的表添加记录。
我们希望向 Northwind 数据库中的 Customers 表添加一条新的记录。我们首先要创建一个表单,这个表单包含了我们需要从中搜集数据的输入域:
<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 nextconn.Execute sql,recaffectedif err<>0 then Response.Write("No update permissions!")else Response.Write("<h3>" & recaffected & " record added</h3>")end ifconn.close%></body></html>
在您使用 INSERT command 命令时,请注意以下事项:
在 MS Access 数据库中,假如您将 AllowZeroLength 属性设置为 “Yes”,您可以在文本、超链接以及备忘字段输入零长度的字符串 ("")。
注释:并非所有的数据库都支持零长度的字符串,因而当添加带有空白字段的记录时可能会产生错误。因此,检查您使用的数据库所支持的数据类型是很重要的。