Đối tượng Response trong web Course
Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (51.98 KB, 12 trang )
1
Bài 2
1
BÀI 6
ASP NÂNG CAO
Khoa CNTT - ĐHKHTN
Bài 6
2
Khoa CNTT - ĐHKHTN
Nội dung
1. Đối tượng Response
2. Đối tượng Request
3. Đối tượng Session và Application
4. File GLOBAL.ASA
5. COOKIES
6. Đối tượng SERVER
7. ASPError
8. ADO Nâng cao
Bài 6
3
Khoa CNTT - ĐHKHTN
1. Đối tượng Response (1)
n Chuyển hướng trang web
q Response.Redirect “URL”
q Browser chuyển sang thực hiện trang “URL”, bỏ
qua các kết quả xuất ra
2
Bài 6
4
Khoa CNTT - ĐHKHTN
1. Đối tượng Response (2)
<HTML>
<HEAD>
<TITLE>Page Redirect</TITLE>
</HEAD>
<BODY>
<%
Site = Request.QueryString(“SiteName”)
Select case Site
case “Microsoft”
Response.Redirect ””
case “Intel”
Response.Redirect ””
case “Oracle”
Response.Redirect ””
End Select
%>
</BODY>
</HTML>
Bài 6
5
Khoa CNTT - ĐHKHTN
1. Đối tượng Response (3)
n Kiểm soát việc kết xuất dữ liệu ra trình duyệt
q Response.Buffer
n FALSE : không đặt buffer
n TRUE : đặt buffer lưu tạm dữ liệu xuất
q <%Response.Buffer=TRUE/FALSE%> : đặt ở đầu trang
ASP
q Response.Flush : xuất dữ liệu buffer về cho client
q Response.Clear : xóa dữ liệu vùng đệm
q Response.End : kết thúc xử lý
q Response.Expires : đặt thời gian (min) cache (-1:no cache)
q Response.ExpiresAbsolute = #date#
Bài 6
6
Khoa CNTT - ĐHKHTN
1. Đối tượng Response (4)
n Kiểm tra client cócòn nối với máy chủ
q Response.IsClientConnected (TRUE/FALSE)
<% 'Check to see if the client is connected.
If Not Response.IsClientConnected Then
'Get the sessionid to send to the shutdown function.
Shutdownid = Session.SessionID
Shutdown(Shutdownid) 'Perform shutdown processing.
End If
%>
n Response.CharSet = “UTF-8” : đặt bảng mã dữ liệu
trả về
3
Bài 6
7
Khoa CNTT - ĐHKHTN
2. Đối tượng Request (1)
n Request.Form, Request.QueryString
q Trường hợp control cónhiều giátrị
q Request.Form(“FieldName”).Count : số giátrị
q Request.Form(“FieldName”)(i) i=1..count : lấy
từng giátrị
q Tương tự QueryString hoặc chỉ cóRequest
Bài 6
8
Khoa CNTT - ĐHKHTN
2. Đối tượng Request (1)
<%
For i = 1 to
Request.Form("FavoriteFlavor").count
%>
Request.Form(FavoriteFlavor) =
<%= Request.Form("FavoriteFlavor")(i)%>
<BR>
<% Next %>
Bài 6
9
Khoa CNTT - ĐHKHTN
2. Đối tượng Request (2)
n Cách tạo HTTP QueryString
q Dùng Form với method=GET
q Gõ trực tiếp vào chuỗi URL
<A HREF=“example.asp?FirstName=Duy&LastName=Le Dinh">
string sample</A>
n Request.ServerVariables(“Variable”) : Lấy
các thông tin môi trường tại server
4
Bài 6
10
Khoa CNTT - ĐHKHTN
2. Đối tượng Request (3)
n AUTH_PASSWORD : Lấy thông tin password nhập từ
CLIENT (qua đặt quyền Authentication IIS)
n LOCAL_ADDR : Trả về địa chỉ Server chứa trang đang được
request (trường hợp hosting nhiều địa chỉ)
n REMOTE_ADDR : Địa chỉ IP của máy client gọi trang web
n REQUEST_METHOD: phương thức truyền Request
(GET,POST)
n ….
Bài 6
11
Khoa CNTT - ĐHKHTN
3. Đối tượng Application, Session
n Mục đích: lưu biến dữ liệu dùng chung cho
nhiều trang
q Application : chia sẻ thông tin (biến dữ liệu) cho
nhiều người dùng cùng 1 ứng dụng
q Session: chia sẻ thông tin (biến dữ liệu) cho nhiều
trang cùng 1 phiên làm việc của người dùng
Bài 6
12
Khoa CNTT - ĐHKHTN
3. Sử dụng Application (1)
n Sử dụng biến Application
<%
Application("greeting") = "Welcome to My Web World!"
Application("num") = 25
Set Application("Obj1") = Server.CreateObject("MyComponent")
%>
...
<%
Set MyLocalObj1 = Application("Obj1")
MyLocalObj1.MyObjMethod
%>
5
Bài 6
13
Khoa CNTT - ĐHKHTN
3. Sử dụng Application (2)
n Sử dụng biến Application
<%
Application.Lock
Application("NumVisits") = Application("NumVisits") + 1
Application.Unlock
%>
This application page has been visited
<%= Application("NumVisits") %> times!
Bài 6
14
Khoa CNTT - ĐHKHTN
3. Sử dụng Session (1)
n Mỗi phiên làm việc cóthời gian xác định
q Session.Timeout = minutes
q Session.SessionID : ID của phiên làm việc
q Session.Contents : chứa danh sách các biến
collection trong Session
q Session.CodePage: quy định bảng mã xử lý của
cả session (=65001 : Unicode UTF-8)
n Session.Abandon : Hủy phiên làm việc (hủy cả biến
dữ liệu)
Bài 6
15
Khoa CNTT - ĐHKHTN
3. Sử dụng Session (2)
<%
Session("username") = "Janine"
Session("age") = 24
Set Session("Obj1") = Server.CreateObject("MyComponent.class1")
%>
...
<%
UserName = Session(“username”)
Set MyLocalObj1 = Session("Obj1")
MyLocalObj1.MyObjMethod
%>
