Asp kayıt döndürme? - Sayfa 2

30-08-2010, 16:15:34

#10

bLueStarr

denom adlı üyeden alıntı: mesajı görüntüle

arkadaslik tablosunda üyeye ait birden fazla kayıt varmı?

ARKADASLIK MDB

Arkadaslik tablosu

Alıntı

ID - Ekleyen - Eklenen - Durum
1-------9--------10------T
2-------10-------9-------T

Şeklinde kayıt yaptırıyorum..

30-08-2010, 16:20:49

#11

denom

ekleyen 9 no'lu üyenin ve eklenenin başka kayıtlarıda varmı

ID - Ekleyen - Eklenen - Durum
1-------9--------10------T
2-------10-------9-------T
3-------9--------12------T
4-------12-------10------T

30-08-2010, 16:47:43

#12

bLueStarr

denom adlı üyeden alıntı: mesajı görüntüle

ekleyen 9 no'lu üyenin ve eklenenin başka kayıtlarıda varmı

ID - Ekleyen - Eklenen - Durum
1-------9--------10------T
2-------10-------9-------T
3-------9--------12------T
4-------12-------10------T

Evet var,

9 id'li 11 id ile de arkadaş olabiiyor..

dolayısıyla

Alıntı

9 - 11
11 - 9

olmuş oluyor..

30-08-2010, 17:37:55

#13

denom

ID - Ekleyen - Eklenen - Durum
1-------9--------10------T
2-------10-------9-------T
3-------9--------12------T
4-------12-------10------T

bu durumda 9 id olan ekleyen üyenin eklediği 10 ve 12 no'lu üyeler haricindekileri görüntülemeye çalışıyorsun değil mi ?

30-08-2010, 17:43:04

#14

bLueStarr

denom adlı üyeden alıntı: mesajı görüntüle

ID - Ekleyen - Eklenen - Durum
1-------9--------10------T
2-------10-------9-------T
3-------9--------12------T
4-------12-------10------T

bu durumda 9 id olan ekleyen üyenin eklediği 10 ve 12 no'lu üyeler haricindekileri görüntülemeye çalışıyorsun değil mi ?

Evet 9 idli üyenin 2. veritabanının uyeler listesinde arkadaşı olmayan idleri listeletmek istiyorum..

9 idli üyenin arkadaslik mdb'sinin arkadaslik tablosundan arkadas listesini şu şekilde çekiyorum..

Alıntı

Set bir =Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * from arkadaslik where ekleyen="&session("id")&" and onay=""T"""
bir.Open strSQL,baglanti2,1,3
for i = 1 to bir.recordcount

fakat 2. recordsette eletip listeletecek döngüyü kuramıyorum..

30-08-2010, 19:10:31

#15

denom

<%
Set bir =Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * from arkadaslik where ekleyen="&session("id")&" and onay=""T"""
bir.Open strSQL,baglanti2,1,3
for i = 1 to bir.recordcount
gelingari = bir("eklenen")
set iki = baglanti.execute("SELECT * FROM uyeler where id <> "&gelingari&" order by id desc")

where not iki.eof
response.write iki("id")&"<br>"

iki.movenext()
wend

bir.movenext
next

%>

30-08-2010, 19:35:30

#16

bLueStarr

denom adlı üyeden alıntı: mesajı görüntüle

<%
Set bir =Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * from arkadaslik where ekleyen="&session("id")&" and onay=""T"""
bir.Open strSQL,baglanti2,1,3
for i = 1 to bir.recordcount
gelingari = bir("eklenen")
set iki = baglanti.execute("SELECT * FROM uyeler where id <> "&gelingari&" order by id desc")

where not iki.eof
response.write iki("id")&"<br>"

iki.movenext()
wend

bir.movenext
next

%>

olmadı.. bir recordsetindeki kayıtları iki recordset kere tekrarlattı yine..

30-08-2010, 20:19:18

#17

denom

<%
Set bir =Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * from arkadaslik where ekleyen="&session("id")&" and onay=""T"""
bir.Open strSQL,baglanti2,1,3
for i = 1 to bir.recordcount
gelingari = bir("eklenen")
set iki = baglanti.execute("SELECT * FROM uyeler where id <> "&gelingari&" order by id desc")

response.write iki("id")&"<br>"

bir.movenext
next

%>

30-08-2010, 20:31:47

#18

bLueStarr

denom adlı üyeden alıntı: mesajı görüntüle

<%
Set bir =Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * from arkadaslik where ekleyen="&session("id")&" and onay=""T"""
bir.Open strSQL,baglanti2,1,3
for i = 1 to bir.recordcount
gelingari = bir("eklenen")
set iki = baglanti.execute("SELECT * FROM uyeler where id <> "&gelingari&" order by id desc")

response.write iki("id")&"<br>"

bir.movenext
next

%>

Teşekkür ederim uğraştığın için.. Buda baglanti veritabanındaki son kayıtı iki recordset kere tekrarlattı..

Alıntı

281
281
281
281
281
... vb.

9 ile 281 arkadaş zaten, yani çıkmaması gerekiyor..