ADO Tambahkan Catatan
Kita dapat menggunakan perintah SQL INSERT INTO untuk menambahkan catatan ke tabel dalam database.
Tambahkan Catatan ke Tabel di Database
Kami ingin menambahkan catatan baru ke tabel Pelanggan di database Northwind. Kami pertama-tama membuat formulir yang berisi bidang yang ingin kami kumpulkan datanya:
<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>
Saat pengguna menekan tombol kirim, formulir dikirim ke file bernama "demo_add.asp". File "demo_add.asp" berisi kode yang akan menambahkan catatan baru ke tabel Pelanggan:
<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>
Penting
Jika Anda menggunakan perintah SQL INSERT, perhatikan hal berikut:
- Jika tabel berisi kunci utama, pastikan untuk menambahkan nilai unik non-Null ke bidang kunci utama (jika tidak, penyedia mungkin tidak menambahkan catatan, atau terjadi kesalahan)
- Jika tabel berisi bidang AutoNumber, jangan sertakan bidang ini dalam perintah SQL INSERT (nilai bidang ini akan ditangani secara otomatis oleh penyedia)
Bagaimana dengan Bidang Tanpa Data?
Dalam database MS Access, Anda bisa memasukkan string panjang nol ("") di bidang Teks, Hyperlink, dan Memo JIKA Anda menyetel properti AllowZeroLength ke Ya.
Catatan: Tidak semua database mendukung string panjang nol dan dapat menyebabkan kesalahan saat catatan dengan bidang kosong ditambahkan. Penting untuk memeriksa tipe data apa yang didukung database Anda.