การเพิ่มข้อมูลสามารถทำได้โดยกรอกข้อมูลในช่องข้อมูลจนครบ
จากนั้น Form
จะส่งข้อมูลในลักษณะตัวแปร
เข้าสู่เงื่อนไขการเพิ่มข้อมูล
ถ้าตรงตามเงื่อนไขทุกอย่าง
โปรแกรมก็จะเพิ่มข้อมูลลงสู่ฐานข้อมูล
หลักการและเงื่อนไขการเพิ่มข้อมูล
FIle insert_data.asp
- ถ้ามีการกดปุ่ม Inseart_Data
โดยไม่ได้กรอกข้อมูลใดให้แสดงผลคำว่า
"โปรดกรอกข้อมูลให้ครบ"
- ถ้ามีการกรอกข้อมูลไม่ครบทุกช่อง
และกดปุ่ม Inseart_Data ให้แสดงผลคำว่า
"โปรดกรอกข้อมูลให้ครบ"
- ถ้ามีการกรอกข้อมูลครบทุกช่อง
และกดปุ่ม Inseart_Data ให้แสดงผลคำว่า
"เพิ่มข้อมูลลง Database
เรียบร้อยแล้ว"
ตัวอย่างและคำอธิบาย
การ Insert database
insert_data.asp
<% if
request.form("action") = "" then %>
<%'
ถ้าไม่พบตัวแปร action หรือกดปุ่ม
Insert_data ให้แสดงกรอบกรอกข้อมูล %>
<html>
<head><title>เพิ่มข้อมูล</title></head>
<body>
<form action="insert_data.asp" method="post">
<%'Formส่งข้อมูล
%><center>
<FONT SIZE=3 FACE="MS Sans
Serif"><B>เพิ่มข้อมูลลงสู่
Database</B></FONT>
</cener>
<TABLE BORDER="1" CELLPADDING="3" BORDERCOLOR="#C0C0C0"
BGCOLOR="#FCF9D8" style="font-family: MS Sans Serif">
<tr>
<td><input type=text name=name size=15></td>
<td><input type=text name=phone size=15></td>
<td><input type=text name=address size=15></td>
<td>
</td>
</tr>
<tr>
<td>Name:</td>
<td>Phone:</td>
<td>Address: </td>
<td>
<input type=hidden name=action value="add">
<input type=submit value=Inseart_Data>
</td>
</tr>
</table>
</form>
</body>
</html>
<%
elseif request.form("name")= "" OR _
request.form("phone")= "" OR _
request.form("address")= "" then
'กำหนดเงื่อนไข
ถ้าไม่มีกรอกข้อมูลใดๆ
แล้วกดปุ่ม ให้แสดงข้อความ
โปรดกรอกข้อมูลให้ครบ
%>
<center><FONT SIZE=3 FACE="MS Sans Serif"><B>
โปรดกรอกข้อมูลให้ครบ<br><a
href=insert_data.asp>กรอกข้อมูลใหม่</a>
</B></FONT></center>
<%else
'เริ่มเปิดฐานข้อมูลและเขียนข้อมูลลงฐานข้อมูล
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select * from phone_book", "DSN=phonenet", 1, 3
rs.AddNew
rs("name") = Request.Form("name")
rs("phone") = Request.Form("phone")
rs("address") = Request.Form("address")
rs.Update
'เริ่มเปิดฐานข้อมูล เขียนข้อมูลลงฐานข้อมูล
%>
<html>
<head><title>เพิ่มข้อมูลเสร็จแล้ว</title></head>
<body>
<center><FONT SIZE=3 FACE="MS Sans Serif"><B>
เพิ่มข้อมูลลง Database
เรียบร้อยแล้วครับ
<br><a href="show_data.asp"> ดูข้อมูล</a>
<a href="insert_data.asp">เพิ่มข้อมูล </a>
</B></FONT></center>
<%
'กลับไปเพิ่มข้อมูลหรือขอดูข้อมูลอีก
%>
</body>
</html>
<% end if %>
<% 'จบเงื่อนไข %>
|
ผลลัพธ์
คงไม่ต้องแสดงผลให้ดู
ลอง test กันเลยดีกว่า

|