Arkadaşlar Merhaba
üye silinirken üyeye ait veritabanında birden fazla tablodan verileri silmeyi yapamadım, kodlamada aşağıdaki gibi, bu konuda yardım edebilirmisiniz, Teşekkürler.

<%
Set uyem=db.Execute("SELECT * FROM uye WHERE id="& id)
Set prod=db.Execute("SELECT * FROM ilan WHERE kmn='"& uyem("id") &"'")
Do While Not prod.Eof
For i=1 To 10
If Not prod("resim"&i)="" Then
Set rssil = CreateObject("Scripting.FileSystemObject")
rssil.DeleteFile Server.MapPath("../image/" & prod("resim"&i))
End If
Next

Set vtr=db.Execute("SELECT * FROM vitrin")
Do While Not vtr.Eof
If Not vtr("ilan_no")=id Then
db.Execute("DELETE * FROM vitrin WHERE ilan_no="& prod("id"))
End If
vtr.MoveNext : Loop
db.Execute("DELETE * FROM ilan WHERE id="& prod("id"))
prod.MoveNext:Loop
db.Execute("DELETE FROM uye WHERE id="& id)
%><script>
alert('Üye ve bu üyenin Tüm ilanları başarılı Bir şekilde sistemden silinmiştir...!!');
window.open('index.asp?page=uye','_self');</script>