+ Yanıtla
Toplam 6 sonuçtan 1 ile 6 arası olanlar

Konu Başlığı: If ... Then arasında sql sorgusu doğrulatmak

  1. #1

    If ... Then arasında sql sorgusu doğrulatmak

    Merhaba,

    Kodları olabildiğince azalttım ki öğrenmek istediğim şeyi anlatabileyim:

    Kod:
    uyeAdi = request.form("kullAdi")
    
    if not IsEmpty(Request.form("btnUyeOl")) Then
    	If request.form("kullAdi")="" Or request.form("sifre") = "" Or (#####) Then
    		If request.form("kullAdi")="" Then response.write "<p>Üye Adınızı giriniz</p>"
    		If request.form("sifre")="" Then response.write "<p>Şifrenizi giriniz</p>"
    
    		uyeKullKontrol(uyeAdi)
    
    	Else
    		response.write "Başarıyla Kayıt Oldunuz"
    	End If
    End If
    
    
    Function uyeKullKontrol(kullAdimiz)
    	Set uye = bag.execute("SELECT kullAdi FROM tbl_uye WHERE kullAdi='"&kullAdimiz&"' ")
    		Response.Write("<p>Bu üye adı kullanılmaktadır</p>")
    	Set uye = Nothing
    End Function
    

    Şimdi yukarıda koyu ile belirttiğim (#####) işaretinin yerine formdan gelen üye adının veritabanında varlık yokluk kontrolünü getirmek istiyorum, bunu nasıl yapabilirim?

  2. #2

    Re: If ... Then arasında sql sorgusu doğrulatmak

    ---

    yanlış anladım pardon.!
    Mesaj _efendy_ tarafından 02.11.2008 (16:41) yeniden düzenlendi.

  3. #3

    Re: If ... Then arasında sql sorgusu doğrulatmak

    Siz üye girişi sandınız sanırım, şifreyi kontrol ettirmeye gerek yok. Bu ve bunun gibi birçok fonksiyon şekli denedim
    (kullKontrol(uyeAdi)=true, kullKontrol(uyeAdi,true) gibi) -tabi bunu yukarda belirtmemem benim hatam- ancak fonksiyonu her türlü atlıyor, işleme almıyor.

    Bir de execute metodunda close yapmışsınız buna gerek yok belirtmek istedim.

    Fonksiyon kullanmadan şu şekilde oluyor, fakat benim öğrenmek istediğim bunun harici bir yöntemin yapılıp yapılamayacağı:

    Kod:
    uyeAdi = strDuzelt(request.form("kullAdi"))
    
    Set uye = bag.execute("SELECT kullAdi FROM tbl_uye WHERE kullAdi='"&uyeAdi&"' ")
    	If Not uye.eof Then userExID=True
    Set uye = Nothing
    
    
    if not IsEmpty(Request.form("btnUyeOl")) Then
    	If request.form("kullAdi")="" Or request.form("sifre") = "" Or userExID=True Then
    		If request.form("kullAdi")="" Then response.write "<p>Üye Adınızı giriniz</p>"
    		If request.form("sifre")="" Then response.write "<p>Şifrenizi giriniz</p>"
    
    		Call uyeKullKontrol(uyeAdi)
    
    	Else
    		response.write "Başarıyla Kayıt Oldunuz"
    	End If
    End If
    
    Function uyeKullKontrol(kullAdimiz)
    	Set uye = bag.execute("SELECT kullAdi FROM tbl_uye WHERE kullAdi='"&kullAdimiz&"' ")
    		Response.Write("<p>Bu üye adı kullanılmaktadır</p>")
    	Set uye = Nothing
    End Function
    

  4. #4

    Re: If ... Then arasında sql sorgusu doğrulatmak

    amacın fonksiyon yazarak halletmek mi?

  5. #5

    Re: If ... Then arasında sql sorgusu doğrulatmak

    Evet ama nasıl bir fonksiyon işte sorun orada

    Şuan işimi görüyorum ama dediğim gibi bunu bir fonksiyonla yapsaydık nasıl yapmamız gerekirdi, bunu if then arasında nasıl okutabilirdik bunu öğrenmek niyetindeyim.

  6. #6

    Re: If ... Then arasında sql sorgusu doğrulatmak

    Kod:
    <%
    Function kullanici_dogrula(kullanici)
    	Set uye = bag.execute("SELECT kullAdi FROM tbl_uye WHERE kullAdi='"&kullanici&"' ")
    		If Not uye.eof Then
    			kullanici_dogrula=true
    		else
    			kullanici_dogrula=false
    		end if
    	Set uye = Nothing
    End Function
    %>
    
    Kod:
    If request.form("kullAdi")="" Or request.form("sifre") = "" Or kullanici_dogrula(Uyeadi)=false Then
    

    bi sorun çıkmaması lazım.
    Mesaj _efendy_ tarafından 03.11.2008 (12:32) yeniden düzenlendi.

+ Yanıtla

Bu konu başlığı için etiketler

Mesaj Seçenekleri

  • Yeni başlık açamazsınız
  • Cevap yazabilirsiniz
  • Dosya ekleyemezsiniz
  • Mesajlarınızı değiştiremezsiniz