Xem đoạn mã sau:
<%
'--------------Code de doc Table MENU ra man hinh ----------------///// code by ai do//////
Set rsmenu = Server.CreateObject("ADODB.RecordSet")
sqlmenu="SELECT * FROM MENU ORDER BY SAPXEP"
Rsmenu.open sqlmenu, conn
'-----------ket thuc phan lay Table Menu -------------------------////
%>
<%for i=1 to 10000000000000000000000000000
if rsmenu.eof=true then exit for
%>
<%=rsmenu("ID")%>
<%=rsmenu("TEN")%>
"> Sua
">Delete
& vbCrLf & _ “
<%=rsmenu(
" & vbCrLf & _ “size="3">
<%
rsmenu.Movenext
next%>
Hãy cho biết dòng lệnh: if rsmenu.eof=true then exit for Xảy ra khi nào?
Xem đoạn mã sau:
<%
'--------------Code de doc Table MENU ra man hinh ----------------///// code by ai do//////
Set rsmenu = Server.CreateObject("ADODB.RecordSet")
sqlmenu="SELECT * FROM MENU ORDER BY SAPXEP"
Rsmenu.open sqlmenu, conn
'-----------ket thuc phan lay Table Menu -------------------------////
%>
<%for i=1 to 10000000000000000000000000000
if rsmenu.eof=true then exit for
%>
<%=rsmenu("ID")%>
<%=rsmenu("TEN")%>
"> Sua
">Delete
& vbCrLf & _ “
<%=rsmenu(
" & vbCrLf & _ “size="3">
<%
rsmenu.Movenext
next%>
Hãy cho biết dòng lệnh: if rsmenu.eof=true then exit for Xảy ra khi nào?
Trả lời:
Đáp án đúng: A
Đoạn mã sử dụng `ADODB.RecordSet` để truy vấn dữ liệu từ bảng MENU. Câu lệnh `if rsmenu.eof=true then exit for` được sử dụng để kiểm tra xem con trỏ của RecordSet đã đến cuối tập dữ liệu (End Of File) hay chưa. Nếu `rsmenu.eof` trả về `true`, tức là không còn bản ghi nào để đọc, vòng lặp `for` sẽ kết thúc bằng lệnh `exit for`.
* **A. Lệnh xảy ra khi đối tượng rsmenu kết thúc tệp:** Đáp án này chính xác vì `rsmenu.eof` là thuộc tính cho biết đã đến cuối tập dữ liệu.
* **B. Lệnh xảy ra khi đối tượng rsmenu bắt đầu xử lý tệp:** Đáp án này không chính xác vì `rsmenu.eof` không kiểm tra trạng thái bắt đầu tệp.
* **C. Lệnh xảy ra khi:** Đáp án này không hoàn chỉnh và không cung cấp thông tin đầy đủ.