首先”rs.EOF and rs.BOF”要改成”rs.EOF or rs.BOF” 另外要在”for i=1 to rs.Pagesize”后面加上 If rs.EOF or rs.BOF Then Exit For End If