Forum
Bildirimler
Hepsini Temizle
Yazılım Genel
2
Yazılar
2
Üyeler
0
Reactions
453
Görüntüleme
Konu başlatıcı
arkadaşlar aşağıdaki if else döngüsüne yeni bir döngü daha ekleyebilirmiyiz ben uğraştım yapamadım yardımcı olurmusunuz ?
<%
grup = request.QueryString("grup")
telefon = request.QueryString("telefon")
unite = request.QueryString("unite")
Set Baglanti = Server.CreateObject("aDodb.connection")
Baglanti.Open = "DRIVER={microsoft access driver (*.mdb)}; DBQ=" & Server.MapPath("../db/db")
Set Rs = Server.CreateObject("aDodb.recordSet")
If telefon = "" and unite = "" Then
Sor = "Select * From dal Where grup='"&grup&"' and telefon <> 'yapıldı' order by id desc "
Elseif telefon = "" and unite <> "" then
sor = "Select * from dal where grup='"&grup&"' AND adres ='"&unite&"' and telefon <> 'yapıldı' order by id desc"
Elseif telefon <> "" and unite = "" Then
Sor = "Select * From dal Where grup='"&grup&"' AND telefon = '" & telefon & "' order by id desc"
Else
Sor = "Select * From dal Where grup='"&grup&"' AND telefon = '" & telefon & "' AND adres ='"&unite&"' order by id desc"
END IF
Rs.Open Sor, Baglanti,1,3
adet=Rs.RecordCount
%>
Gönderildi : 23/02/2012 12:28
Merhaba,
Eğer kastınız yeni bir kriter eklemek ise, "Else" ifadesinden önce "Elseif ... Then" eklemeniz gerekir.
Gönderildi : 23/02/2012 16:47