Bu kodu
      If strVtTuru <> "mySQL" Then SQL = SQL & " TOP 1"
      SQL = SQL & " haberID, baslik, tarih, editor FROM tblHaberler WHERE kategori = "& intKoseYazilari &" AND editor = "& kdMenu("UyeID") &" AND Durum = "& strDBTrue &" AND onay = "& strDBTrue &" ORDER BY tarih DESC"
      If strVtTuru = "mySQL" Then SQL = SQL & " LIMIT 1"

aşağıdaki ile değiştir.




      If strVtTuru <> "mySQL" Then SQL = SQL & " TOP 10"
      SQL = SQL & " haberID, baslik, tarih, editor FROM tblHaberler WHERE kategori = "& intKoseYazilari &" AND editor = "& kdMenu("UyeID") &" AND Durum = "& strDBTrue &" AND onay = "& strDBTrue &" ORDER BY tarih DESC"
      If strVtTuru = "mySQL" Then SQL = SQL & " LIMIT 10"