% On Error Resume Next %> <% genelHata=0 smtpHata=0 sql="select * from smtp;" set veriler=mysql_baglanti.execute(sql) if not veriler.eof then if len(veriler("smtp"))<5 or len(veriler("sifre"))<5 then smtpHata=1 genelHata=genelHata+1 end if if cckEmail(veriler("sistemMail"))=false then smtpHata=1 genelHata=genelHata+1 end if if cckEmail(veriler("mail"))=false then smtpHata=1 genelHata=genelHata+1 end if else smtpHata=1 genelHata=genelHata+1 end if sql="select count(id) from gelenMesajlar where alici='"&session("memberMail")&"' and okundu=0;" set veriler=mysql_baglanti.execute(sql) okunmamis=veriler(0) if okunmamis>0 then genelHata=genelHata+1 end if %>