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 Thiết kế và lập trình web bằng ngôn ngữ ASP - Ebook (Trang 128 - 129)

Bài tham khảo : Phương pháp hỗ trợ giới hạn truy cập trang web

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

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.asp và addbookext.asp)

Một phần của tài liệu Thiết kế và lập trình web bằng ngôn ngữ ASP - Ebook (Trang 128 - 129)

Tải bản đầy đủ (PDF)

(142 trang)