Thao tác thêm một mẩu tin vào cơ sở dữ liệu

Một phần của tài liệu Lập trình web với ASP (Trang 128 - 129)

Giả sử muốn thêm một mẩu tin mới vào table T_BOOK với các thông tin: Tên sách là "Thiết kế và lập trình ứng dụng web bằng ASP", chủ đề của sách là Tin học có ID là 1, tác giả là "Lê Đình Duy", nhà xuất bản là Thống kê có ID là 3, năm xuất bản 2001, tập tin ảnh bìa tên là ltwebasp.jpg.

Ta tạo tập tin addbook.asp như sau: <%@CODEPAGE=65001%>

<%Response.Charset = "utf-8"%> <!--#include file="dbconn.asp"--> <%

' get input data

vBookTitle = "Thiết kế và lập trình ứng dụng web bằng ASP" vBookCatID = 1

vBookAuthor = "Lê Đình Duy" vBookPubID = 3

vBookYear = 2001 vBookPrice = 16000 vBookPic = "ltwebasp.jpg" ' build SQL statement

strSQL = "INSERT INTO T_BOOK(BOOK_TITLE, BOOK_CATID, BOOK_AUTHOR, BOOK_PUBID, BOOK_YEAR, BOOK_PRICE, BOOK_PIC) "

strSQL = strSQL & "VALUES("

strSQL = strSQL & "'" & vBookTitle & "'" & ", " strSQL = strSQL & vBookCatID & ", "

strSQL = strSQL & "'" & vBookAuthor & "'" & ", " strSQL = strSQL & vBookPubID & ", "

strSQL = strSQL & vBookYear & ", "

strSQL = strSQL & vBookPrice & ", " strSQL = strSQL & "'" & vBookPic & "'" strSQL = strSQL & ")"

Response.Write "Thực hiện thao tác tạo mới với câu lệnh SQL: " & strSQL ' execute SQL statement Conn.Execute strSQL %> <% Conn.Close

Set Conn = NOTHING %>

• Thi hành tập tin addbook.asp, sau đó thi hành tập tin

listallbookext.asp để xem lại thông tin của mẩu tin mới được thêm vào.

• Lưu ý rằng trong câu lệnh INSERT, các dữ liệu kiểu chuỗi phải được rào quanh bởi cặp dấu nháy đơn (').

• Mở rộng đoạn mã trên bằng cách tạo một form nhập liệu để

nhập các thông tin trên. Trong đó, chương trình sẽ liệt kê các chủ đề, nhà xuất bản có trong CSDL trong một dropdown listbox để người dùng lựa chọn (xem bài giải ở tập tin

addbookform.aspaddbookext.asp)

Một phần của tài liệu Lập trình web với ASP (Trang 128 - 129)