merhabalar
kayııt proses sayfamda hata aldığım yerdeki kodu aşağıda verdim
kontrol döngüleri arasında verdiğim yerde form dan gelen frmlogin ve ve frmemail döngülerinin db de var olup olmadığını kontrol için yapmayı düşündüm var ise hata vermesi yok ise kaydı tamamlamasını istiyorum.
sorunum şurda kontrolu yapıyor fakat eğer frmlogin e veya frmemail e girilen bilgiler db de var ise belirttiğim hata mesajı göstermeyip kayıt yap olarak belirttiğim yerdeki kodu ekrana yazdırıyor. bunu düzeltmem için yardımlarınıza ihtiyacım ve
ve frmlogin e lcase ekleyerek küçük harf olarak kontrol yapıyorum. lcase ve ucase i birlikte nasıl kontrol edebilirim.
lcase ve ucase için ayrı ayrı mı kontrol oluşturmam gerekiyor.
acil olarak yardımlarınızı bekliyorum.

<%
                           
/////////kontrol döngüleri                
            Call openConn
            Set rsCheckUser = objConn.Execute("SELECT straccountid FROM tb_user WHERE straccountid Like '" & LCase(Request.Form("frmLogin")) & "'")
                If NOT rsCheckUser.EOF Then
                        Response.Write "<center><b>Kullanici Adi Kullanimda<br>Login Name Already Using<b></center>"
                End If
            Set rsCheckUser = objConn.Execute("SELECT count(1) FROM tb_user where strEmail Like '" & LCase(Request.Form("frmEmail")) & "'")
                If Cint(rsCheckUser(0)) > 1 Then
                        Response.write "<center><b>E-Posta Adresi Kullanimda<br>E-Mail Adress Already Using<b></center>"
                End If
            Set rsCheckUser = Nothing
            Call closeConn
//////kontrol döngüleri
                            
//////kayıt yap        
            Call openConn
                objConn.Execute("INSERT INTO tb_user (straccountid, strPasswd, strEmail, msn, sehir, gizlisoru, cevap, strAuthority, idays, strSocNo, ip) VALUES ('" & Request.Form("frmLogin") & "', '" & Request.Form("frmPassword") & "', '" & Request.Form("frmmsn") & "', '" & Request.Form("frmsehir") & "', '" & Request.Form("frmgizli") & "', '" & Request.Form("frmcevap") & "', '" & Request.Form("frmEmail") & "',  2, 6, 1,'" & replace(replace(getIp(), "[", ""), "]", "") & "')")        
            Call closeConn
///kayıt yap            
                
            Response.Write "kayıt başarılı filandı falandı"
.........................