Merhabalar arkadaşlar veritabanımda KREDI ve PARA diye ayrı tablolarım var yanlız durum şu ki :
<!-- #include file=inc_ayar.asp -->
<% Set hitkaydet = Server.CreateObject("ADODB.RecordSet") Sorgu = "select * from HIT where TARIH='" & BTARIH & "'" hitkaydet.open Sorgu, Baglanti, 1, 3 if hitkaydet.EOF then hitkaydet.AddNew hitkaydet("TEKIL")=1 hitkaydet("COGUL")=1 hitkaydet("TARIH")=BTARIH hitkaydet.Update else if Session("sayac")="true" then hitkaydet("COGUL")=hitkaydet("COGUL")+1 else hitkaydet("TEKIL")=hitkaydet("TEKIL")+1 hitkaydet("COGUL")=hitkaydet("COGUL")+1 end if Session("sayac")="true" hitkaydet.Update end if hitkaydet.close Set hitkaydet=nothing %> <html>
<% set sendekazan = Server.CreateObject("ADODB.Recordset") Sorgu = "Select sum(uyekredi) as toplamkredi from KREDI WHERE uyeadi='"&session("uyeadi")&"'" set sendekazan = Baglanti.execute(Sorgu) toplamkredi=("uyekredi") %>
Sizin Hesabınızdaki Kredi : <%=sendekazan("toplamkredi")%>
</td> <td rowspan="5" class="sagorta"></td> </tr> <tr> <td height="30" align="left" valign="top" class="orta"> <% set sendekazan = Server.CreateObject("ADODB.Recordset") Sorgu = "Select sum(uyepara) as toplamkredi from PARA WHERE uyeadi='"&session("uyeadi")&"'" set sendekazan = Baglanti.execute(Sorgu) toplamkredi=("uyepara") %>
Sizin Hesabınızdaki Para : <%=sendekazan("toplamkredi")%>
<% Set hitkaydet = Server.CreateObject("ADODB.RecordSet") Sorgu = "select * from HIT where TARIH='" & BTARIH & "'" hitkaydet.open Sorgu, Baglanti, 1, 3 if hitkaydet.EOF then hitkaydet.AddNew hitkaydet("TEKIL")=1 hitkaydet("COGUL")=1 hitkaydet("TARIH")=BTARIH hitkaydet.Update else if Session("sayac")="true" then hitkaydet("COGUL")=hitkaydet("COGUL")+1 else hitkaydet("TEKIL")=hitkaydet("TEKIL")+1 hitkaydet("COGUL")=hitkaydet("COGUL")+1 end if Session("sayac")="true" hitkaydet.Update end if hitkaydet.close Set hitkaydet=nothing %> <html>
<% set sendekazan = Server.CreateObject("ADODB.Recordset") Sorgu = "Select sum(uyekredi) as toplamkredi from KREDI WHERE uyeadi='"&session("uyeadi")&"'" set sendekazan = Baglanti.execute(Sorgu) toplamkredi=("uyekredi") %>
Sizin Hesabınızdaki Kredi : <%=sendekazan("toplamkredi")%>
</td> <td rowspan="5" class="sagorta"></td> </tr> <tr> <td height="30" align="left" valign="top" class="orta"> <% set sendekazan = Server.CreateObject("ADODB.Recordset") Sorgu = "Select sum(uyepara) as toplamkredi from PARA WHERE uyeadi='"&session("uyeadi")&"'" set sendekazan = Baglanti.execute(Sorgu) toplamkredi=("uyepara") %>
Sizin Hesabınızdaki Para : <%=sendekazan("toplamkredi")%>