Tham khảo tài liệu ''thiết kế và lập trình web bằng ngôn ngữ asp phần 8'', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả
Lê Đình Duy - ĐH KHTN Tp HCM Email: ledduy@ieee.org Chương nghĩa server gửi kết client xử lí xong dịng lệnh Ngược lại, thuộc tính TRUE, server không gửi kết client mà gửi chúng vào vùng đệm tất đoạn mã trang asp hành xử lí xong, sau kết từ vùng đệm chuyển đến client ASP NÂNG CAO ĐỐI TƯỢNG RESPONSE 1.1 Chuyển hướng trang web Để yêu cầu trình duyệt chuyển sang nạp web khác xử lí trang web hành, ta dùng phương thức Response.Redirect với tham số địa URL Khi sử dụng phương thức tất nội dung kết xuất trình duyệt trước trang web hành bị bỏ qua Ví dụ sau minh họa việc chuyển hướng trang tùy theo yêu cầu người dùng Page Redirect Tuy nhiên, trường hợp tập tin ASP dài, để xử lí xong hết đoạn mã kết xuất client, kéo dài thời gian chờ đợi hiển thị trang web người dùng Phương thức Response.Flush cho phép ta chuyển kết có vùng đệm đến client Lưu ý lệnh dùng đặt Để yêu cầu server ngừng xử lí đoạn mã chuyển kết có (có thể cịn nằm vùng đệm) đến client, ta dùng phương thức Response.End Phương thức thường dùng cấu trúc điều khiển If Then Else Có thể xem Response.End tương tự lệnh halt() C Để xóa kết xuất hành vùng đệm, ta dùng phương thức Response.Clear Lưu ý lệnh dùng đặt Để định thời gian lưu tạm (cache) trang trình duyệt hết hạn (expires) bao lâu, ta đặt giá trị cho thuộc tính Response.Expires Nếu đặt , trang web hết hạn lưu tạm 1.3 Kiểm tra client cịn kết nối với máy chủ khơng Để kiểm tra client cịn kết nối với webserver hay khơng, ta dùng thuộc tính Response.IsClientConnected Ví dụ sau minh họa thao tác tương ứng với trạng thái client 1.2 Kiểm sốt việc kết xuất trình duyệt Thuộc tính Response.Buffer cho phép u cầu server kiểm sốt q trình gửi kết client hay khơng q trình xử lí đoạn mã trang ASP Nếu thuộc tính FALSE, điều có Lê Đình Duy - ĐH KHTN Tp HCM Việc thiết lập giá trị thuộc tính bắt bắt buộc phải thực trước server gửi kết client Do đó, dịng lệnh phải đặt từ dòng trang ASP 199 -file2.asp "" Then Response.Write ", " & objASPError.ASPCode Response.Write " (0x" & Hex(objASPError.Number) & ")" & "" Response.Write "" & objASPError.Description & "" If objASPError.ASPDescription > "" Then Response.Write objASPError.ASPDescription & "" blnErrorWritten = False ' Only show the Source if it is available and the request is from the same machine as IIS If objASPError.Source > "" Then strServername = LCase(Request.ServerVariables("SERVER_NAME")) strServerIP = Request.ServerVariables("LOCAL_ADDR") strRemoteIP = Request.ServerVariables("REMOTE_ADDR") If (strServername = "localhost" Or strServerIP = strRemoteIP) And objASPError.File "?" Then ASP2.asp Lê Đình Duy - ĐH KHTN Tp HCM in chuỗi: http%3A%2F%2Fwww%2Emicrosoft%2Ecom Để biết thao tác có gặp lỗi hay khơng, ta dùng phương thức Server.GetLastError Phưong thức trả thể đối tượng ASPError mô tả thông tin liên quan đến lỗi có Kết là: c:\inetpub\wwwroot\script\data.txt Kết : c:\inetpub\wwwroot\script\data.txt c:\inetpub\wwwroot\script Để mã hóa chuỗi thành qui tắc mã hóa URL, ta dùng phương thức Server.URLEncode Ví dụ đoạn mã sau: 217 218 Email: ledduy@ieee.org Lê Đình Duy - ĐH KHTN Tp HCM Email: ledduy@ieee.org Response.Write objASPError.File If objASPError.Line > Then Response.Write ", line " & objASPError.Line If objASPError.Column > Then Response.Write ", column " & objASPError.Column Response.Write "" Response.Write "" Response.Write Server.HTMLEncode(objASPError.Source) & "" If objASPError.Column > Then Response.Write String((objASPError.Column - 1), "-") & "^" Response.Write "" blnErrorWritten = True End If End If If Not blnErrorWritten And objASPError.File "?" Then Response.Write "" & objASPError.File If objASPError.Line > Then Response.Write ", line " & objASPError.Line If objASPError.Column > Then Response.Write ", column " & objASPError.Column Response.Write "" End If %> 7.2 Xử lí lỗi thao tác liên quan đến sở liệu Để kiểm tra thao tác thực sở liệu có xảy lỗi hay không, ta sử dụng collection Connection.Errors Để biết thao tác xảy hay khơng ta vào giá trị Connection.Errors.Count Nếu giá trị lớn 0, có nghĩa thao tác gặp lỗi Nếu gặp lỗi Connection.Errors.Number trả số mã lỗi, Connection.Errors.Description trả chuỗi kí tự mơ tả lỗi, Connection.Errors.Source trả chuỗi kí tự mơ tả tên đối tượng hay ứng dụng gây lỗi, Connection.Errors.SQLState trả mã lỗi kí tự mơ tả lỗi liên quan đến việc thực câu lệnh SQL Ta phải sử dụng câu lệnh “On Error Resume Next” nơi có tiềm ẩn khả xảy lỗi để yêu cầu hệ thống tiếp tục thực lệnh có lỗi xảy Nếu không, xảy lỗi, thông báo lỗi hệ thống chương trình bị dừng lại (lỗi run-time error) Ví dụ sau minh họa việc xử lí lỗi thực thao tác liên quan đến sở liệu: ADO NÂNG CAO 7.1 Thực store procedure Để yêu cầu thực store procedure, đơn giản ta cần thay chuỗi strSQL câu lệnh Conn.Execute strSQL chuỗi tới tên store procedure Ví dụ ta có store procedure có tên sp_AddUser, ta gọi thực sau: Conn.Execute “sp_AddUser” Error Handling Example (VBScript) Error Handling Example (VBScript) Total Page:Page
No ISBN Title Abstract Authors Publisher Year Lê Đình Duy - ĐH KHTN Tp HCM 223 "" Then Response.Write ", " & objASPError.ASPCode Response.Write " (0x" & Hex(objASPError.Number) & ")" & "" Response.Write "" & objASPError.Description... Server.Transfer Ví dụ: ASP1 .asp