limitstrul

när jag tar bort min vip så kan jag bläddra fram till fler än 100 poster så var ligger felet i denna kod

set vipCheck=objConn.Execute("SELECT vip, username, sender mailID, Reciever "&_
"FROM tblUsers INNER JOIN tblUsers_imail ON tblUsers.userID = tblUsers_imail.sender "&_
"WHERE Reciever="& UserID &" order by mailID desc")

if vipCheck.eof then
   response.write " "
else
 if vipCheck("VIP") = "1" then
       sqlStr = "limit 100"
   else
       sqlStr = "limit 1000"
   end if
    strSQL = "SELECT mailRead, username, mailDate, mailTime, sender, Headline, visaNyhetsbrev, message, mailID,Reciever, vip, saveMail "&_
    "FROM tblUsers INNER JOIN tblUsers_imail ON tblUsers.userID = tblUsers_imail.sender "&_
   "WHERE Reciever="& UserID &" order by mailID desc "&sqlStr
  
	end if

vip=1 icke vip=0 i databasen i vip kolumnen