<%
set conn = server.CreateObject ("ADODB.Connection")
set rs = server.CreateObject ("ADODB.Recordset")
set rscins = server.CreateObject ("ADODB.Recordset")
conn.Open "driver={microsoft access driver (*.mdb)}; dbq=" & server.mappath("db/Data.mdb")
sql="SELECT F.ACIKLAMA, (SELECT TOP 1 ALIS FROM _ALTIN_ASFIYAT WHERE ACIKLAMA=F.ACIKLAMA ORDER BY ID DESC) AS ALIS, (SELECT TOP 1 SATIS FROM _ALTIN_ASFIYAT WHERE ACIKLAMA=F.ACIKLAMA ORDER BY ID DESC) AS SATIS FROM _ALTIN_ASFIYAT F "
sql=sql+"WHERE F.KART_TIPI=2 GROUP BY F.ACIKLAMA,F.SIRALAMA ORDER BY F.SIRALAMA "
set rs1=conn.Execute(sql)
%>
İNCESU KUYUMCULUK
FİYATLAR |
ALIŞ |
SATIŞ |
<% do while not rs1.eof %>
| <%=rs1("ACIKLAMA")%> |
<%=rs1("ALIS")%> |
<%=rs1("SATIS")%> |
<% rs1.movenext
loop
%>