ASPTurkiye.com Forum: Asp kodda Yardim.

implant

Aktif Konular

Üye Listesi

Arama

Yardım

Kayıt Ol

Giriş

ASP / ASP.NET
ASPTurkiye.com Forum : ASP / ASP.NET

Konu: Asp kodda Yardim.

Yazanlarda

Mesaj

<< Önceki Konu | Sonraki Konu >>

acidmax
Yeni Üye

Kayıt Tarihi: 15-Temmuz-2010
Ülke: Turkiye
Gönderilenler: 2

Gönderen: 15-Temmuz-2010 Saat 14:32 \| Kayıtlı IP

Arkadaşlar Merhaba.
Aşarıda resimlerle sorunmu anlattım.Kodları veriyorum.Nerelerde değişiklik yapmam gerekiyor.

Kodları :




<%

UyeNUMARASI=Session("Uyenumarasi")

Set Uyebilgi = adoCon.Execute ("SELECT * FROM tbl_users WHERE idno="&UyeNUMARASI&" AND Uyebanli=0;")
If Uyebilgi.EOF Then Response.Redirect("Login.asp")

KullanicinADISOYADI=Uyebilgi("AdSoyad")
kullanicibilgisi=Uyebilgi("username")
Uyebilgi.Close
Set Uyebilgi = NOTHING
%>
<%

isim = KullanicinADISOYADI
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("stok.mdb")

fatura_no = Request.QueryString("fatura_no")
set objRS = Server.CreateObject("ADODB.Recordset")
sql = "select * from kesilen_fatura where fatura_no='" & fatura_no & "'"
objRS.open sql,conn,1,3

%>

<body style="text-align: left">
<div align="center">
<table width="972" border="0" cellpadding="0" cellspacing="0" id="table1" height="97" bgcolor="#C0C0C0">
</body>
<tr>
<td colspan="8" >
<%
isim2 = kullanicibilgisi
Set baglanti = server.createobject("adodb.connection")
baglanti.open "Provider=Microsoft.Jet.oledb.4.0;Data Source=" & Server.MapPath("stok.mdb")
Set Rs = Server.CreateObject("ADODB.Recordset")
StrSql = "Select * from kesilenfat_detay where cikis_fatno='"& fatura_no&"' "
Rs.Open StrSql, baglanti, 1, 3
toplamkayit=rs.recordcount

Set Rs2 = Server.CreateObject("ADODB.Recordset")
StrSql2 = "Select * from kesilen_fatura where fatura_no='"&fatura_no&"' "
Rs2.Open StrSql2, baglanti, 1, 3
fis_no= rs2("fis_no")

Set Rs22 = Server.CreateObject("ADODB.Recordset")
sql = "Select * from siparisler where fisno="&fis_no&" "
Rs22.Open sql, baglanti, 1, 3

FullDate = Date()

Set rs3 = Server.CreateObject("ADODB.Recordset" )
strA="select sum(ara_toplam) as sayi1 FROM kesilenfat_detay WHERE cikis_fatno='" & fatura_no & "'"
rs3.Open strA, baglanti,1, 3

Set rs4 = Server.CreateObject("ADODB.Recordset" )
strB="select sum(iskonta_tutari) as sayi2 FROM kesilenfat_detay WHERE cikis_fatno='" & fatura_no & "'"
rs4.Open strB, conn,1, 3

Set rs6 = Server.CreateObject("ADODB.Recordset" )
strD="select sum(kdv_matragi) as sayi4 FROM kesilenfat_detay WHERE cikis_fatno='" & fatura_no & "'"
rs6.Open strD, conn,1, 3

Set rs7 = Server.CreateObject("ADODB.Recordset" )
strE="select sum(kdv_tutari) as sayi5 FROM kesilenfat_detay WHERE cikis_fatno='" & fatura_no & "'"
rs7.Open strE, conn,1, 3

Set rs8 = Server.CreateObject("ADODB.Recordset" )
strF="select sum(kdvli_fiyat) as sayi6 FROM kesilenfat_detay WHERE cikis_fatno='" & fatura_no & "'"
rs8.Open strF, conn,1, 3
%>
<FORM METHOD="POST" ACTION="cikisfat_rapor.asp?fatura_no=<%=(fatura_no)%>" >

<table width="991" border="0" cellpadding="2" cellspacing="1" bgcolor="#cacbcd" style="font-family:Tahoma; font-size:11px; " id="table3" height="274">
<tr>
<td align="center" bgcolor="#C0C0C0" class="linestyle4" colspan="17"><%=(fatura_no)%>  'lu Kesilen Fatura Detayı</td>
</tr>
<tr>
<td width="985" height="19" align="center" bgcolor="#C0C0C0" class="linestyle4" colspan="17"><table border="1" width="100%" cellspacing="0" cellpadding="0" bordercolor="#CACBCD">
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">Müşteri Adı / Soyadı :</td>
<td width="44%" colspan="3" style="border-style: solid; border-width: 1px"> <%=rs2("musteri_adi")%>&nbsp ;<%=rs2("musteri_soyadi")%></a>< /td>
<td width="20%" style="border-style: solid; border-width: 1px">Fatura Tarihi :</td>
<td width="15%" style="border-style: solid; border-width: 1px"> <%=rs2("fatura_tarihi")%> </a></td>
</tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">Müşteri Adresi :</td>
<td width="44%" colspan="3" style="border-style: solid; border-width: 1px"> <%=rs2("adresi")%></a></td>
<td width="20%" style="border-style: solid; border-width: 1px">Fatura No :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=(fatura_no)%></td>
</tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">İlçe :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("ilce")%></td>
<td width="14%" style="border-left-style: solid; border-left-width: 1px; border-right-style: solid; border-right-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">Ara Toplam :</td>
<td width="14%" style="border-left-style: solid; border-left-width: 1px; border-right-style: solid; border-right-width: 1px; border-bottom-style: solid; border-bottom-width: 1px"><%=formatnumber(rs2("ara_toplam"))%></f ont></td>
</td>
<td width="20%" style="border-style: solid; border-width: 1px">Teslim
Eden :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("teslim_eden")%>&l t;/font></td></tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">İl :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("il")%></ td>
<td width="14%" style="border-style: solid; border-width: 1px">İskonta Tutarı :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=formatnumber(rs2("iskonta_tutari "))%></td>
<td width="20%" style="border-style: solid; border-width: 1px">Teslim
Alan :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("teslim_alan")%></td>
</tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">Telefon :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("telefon")%> </td>
<td width="14%" align="right" style="border-style: solid; border-width: 1px">KDV. Matrahı :</td>
<td width="14%" style="border-style: solid; border-width: 1px"><%=formatnumber(rs2("kdv_matrah"))%></f ont></td>
<td width="34%" style="border-style: solid; border-width: 1px" colspan="2" rowspan="3">
Fatura&l t;b> İle İlgili Notlar</td>
</tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">
T.C. Kimlik No :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=rs2("tckimlik_no")%></td>
<td width="14%" align="right" style="border-style: solid; border-width: 1px">KDV. Tutarı :</td>
<td width="14%" style="border-style: solid; border-width: 1px"><%=formatnumber(rs2("kdv_tutari"))%></f ont></td>
</tr>
<tr>
<td width="21%" align="right" style="border-style: solid; border-width: 1px">Sipariş Fişi Numarası :</td>
<td width="15%" style="border-style: solid; border-width: 1px"> <%=rs22("fistarihi")%></font& gt;/<%=rs2("fis_no")%></td> ;
<td width="14%" align="right" style="border-style: solid; border-width: 1px">Genel Toplam :</td>
<td width="14%" style="border-style: solid; border-width: 1px"> <%=formatnumber(rs2("geneltopl am"))%></td>
</tr>
<tr>
<td width="99%" align="right" style="border-style: solid; border-width: 1px" colspan="6">

<textarea disabled rows="3" name="txtnotlar" cols="119"><%=rs2("not")%></textarea></td& gt;
</tr>
</table>
</td>
</tr>
<tr height="31">
 <td width="48" height="19" align="center" bgcolor="#CACBCD" class="linestyle4" style="border-style: solid; border-width: 1px">Marka</td>
 <td width="94" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">Ürün Kodu</td>
 <td width="161" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">Kategori</td>
 <td width="83" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">
 Seri No</td>
 <td width="37" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">Miktarı</td>
 <td width="27" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">Birim</td>
 <td width="41" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px"> Birim Fiyatı</td>
 <td width="34" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">
 Para Birimi</td>
 <td width="42" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">Ara Toplam</td>
 <td width="39" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">
 İskonta Oranı</td>
 <td width="47" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">
 İskonta Tutarı</td>
 <td width="39" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px"> KDV Matrahı</td>
 <td width="38" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px"> KDV Oranı</td>
 <td width="44" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">
 KDV Tutarı</td>
 <td width="39" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" style="border-style: solid; border-width: 1px">KDV.li Fiyatı</td>
 <td width="84" align="center" bgcolor="#CACBCD" class="linestyle4" height="19" colspan="2" style="border-style: solid; border-width: 1px">İşlemler</td>
</tr>
<% i=0 : Do While Not rs.EOF %>
<% If i Mod 2=0 Then TrRenk="#F1F1F1" Else TrRenk="#FFFFFF" %>
<tr>
<td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="left" style="border-top-style: solid; border-top-width: 1px">
<table border="0" width="100%" id="table5">
</table>
 <%=rs("marka")%></td&g t;
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="left" width="96" style="border-top-style: solid; border-top-width: 1px"><%=rs("urunkodu")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="163" style="border-top-style: solid; border-top-width: 1px"><%=rs("kategori")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="85" style="border-top-style: solid; border-top-width: 1px"><%=rs("serino")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="39" style="border-top-style: solid; border-top-width: 1px"> <%=rs("miktar")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="29" style="border-top-style: solid; border-top-width: 1px"> <%=rs("birim")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="43" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("birim_fiyat"))%> </td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="36" style="border-top-style: solid; border-top-width: 1px"> <%=rs("kur")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="44" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("ara_toplam"))%>& lt;/td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="41" style="border-top-style: solid; border-top-width: 1px"> <%=rs("iskonta_orani")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="49" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("iskonta_tutari"))%& gt;</td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="41" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("kdv_matragi"))%> </td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="center" width="40" style="border-top-style: solid; border-top-width: 1px"> <%=rs("kdv_orani")%></td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="46" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("kdv_tutari"))%>& lt;/td>
 <td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="41" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("kdvli_fiyat"))%> </td>
 <td height="29" bgcolor="#FFFFFF" class="linestyle4" align="center" width="59" style="border-top-style: solid; border-top-width: 1px"><table border="0" width="59" id="table6">
<tr><%If rs2("kapat")=0 Then%>
<td onMouseOver="bgColor='#009933'" onMouseOut="bgColor='#FFFFFF'" align="center" width="51" style="border-style: solid; border-width: 1px">
<a href="cikisfat_urun_duzenle.asp?fatura_no=<%=(fatura_no)% >&id=<%=rs("id")%>">Düzenle</a&g t;</td>
<%Else%><%End If%></tr>
</table>
</td>
<td height="29" bgcolor="#FFFFFF" class="linestyle4" align="center" width="22" style="border-top-style: solid; border-top-width: 1px">
<table border="0" width="22" id="table15">

<tr>
<td onMouseOver="bgColor='#ff0000'" onMouseOut="bgColor='#FFFFFF'" align="center" width="14" style="border-style: solid; border-width: 1px">
<a href="cikisfat_urun_kayitsil.asp?fatura_no=<%=(fatura_no) %>&id=<%=rs("id")%>&urunkodu=<%=rs("urun kodu")%>&fisno=<%=rs2("fis_no")%>">Sil</a>&l t;/font></td>
</tr>
</table>
</td>
</tr>
</td>
</tr><% i=i+1 : rs.MoveNext : Loop %>
</table>
</tr>
<tr>
<td align="center" bgcolor="#C0C0C0" width="991" height="21" colspan="8" >
Yazı İle Yalnız:<input name="txtyazi_ile" size="102" style="border: 1px solid #C0C0C0; font-family:Verdana; " value="<%=rs2("yazi_ile")%>">
<tr>
 <body style="text-align: left">
<td bgcolor="#C0C0C0" width="101" height="21" >
<table align="left" border="0" width="101" id="table17">
<tr>

<td onMouseOver="bgColor='#FFF2F2'" onMouseOut="bgColor='#cacbcd'" align="left" width="93" style="border-style: solid; border-width: 1px" height="9">


<a href="kesilen_fatura.asp?baslangic=<%=Date()-30%>& bitis=<%=Date()%>"" style="text-decoration: none">
Listeye Geri Dön</a></td> </a>
</tr>
</table>

</body>
<td bgcolor="#C0C0C0" width="154" height="21" >
<table border="0" width="154" id="table21">
<tr>
<%If rs2("kapat")=0 Then%><td onMouseOver="bgColor='#FFF2F2'" onMouseOut="bgColor='#cacbcd'" align="center" width="146" style="border-style: solid; border-width: 1px" height="9">
<a href="yeni_cikis_fatduzenle.asp?fatura_no=<%=(fatura_no)% >">Fatura
Üst Bilgisi Düzenle</a></td >
<%Else%><%End If%></a>
</tr>
</table>
</td>
<td width="131" bordercolor="#CACBCD" height="21">
<table border="0" width="131" id="table19">
<tr>
<%If rs2("kapat")=0 Then%><td onMouseOver="bgColor='#FFF2F2'" onMouseOut="bgColor='#cacbcd'" align="center" width="123" style="border-style: solid; border-width: 1px" height="9">
<a target="_blank" href="yazi_ile.asp?fatura_no=<%=(fatura_no)%>">Faturayı Kaydet</a></td& gt;
<%Else%><%End If%></a>
</tr>
</table>
<td bgcolor="#C0C0C0" width="67" height="21" >
<table border="0" width="90" id="table16">
</table>
 <td bgcolor="#C0C0C0" width="60" height="21" ><%If rs2("kapat")=1 Then%>
 <INPUT TYPE=submit NAME="Submit" VALUE="Yazdır"><td bgcolor="#C0C0C0" width="59" height="21" >
 
 <a href="javascript:history.back(-1)">Geri</a></fon t><td bgcolor="#C0C0C0" width="326" height="21" >
 <%Else%><%End If%><td bgcolor="#C0C0C0" width="107" height="21" >
<table align="right" border="0" width="107" id="table18">
<tr>
<td onMouseOver="bgColor='#FFF2F2'" onMouseOut="bgColor='#cacbcd'" align="left" width="99" style="border-style: solid; border-width: 1px" height="9">

<a href="Logout.asp" style="text-decoration: none">Sistem Çıkış</a></td></span&g t;</a>
</tr>
</table></div>

Düzenleyen acidmax 15-Temmuz-2010 Saat 14:33

Yukarı Dön

Mehmet Zahid
Yeni Üye

Kayıt Tarihi: 23-Temmuz-2010
Ülke: Türkiye
Gönderilenler: 8

Gönderen: 23-Temmuz-2010 Saat 17:12 \| Kayıtlı IP

<td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="41" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("kdvli_fiyat"))%> </td>

satırını

<td height="29" bgcolor="<%=TrRenk%>" class="linestyle4" align="right" width="41" style="border-top-style: solid; border-top-width: 1px"> <%=formatnumber(rs("kdvli_fiyat")*cInt( rs("miktar")))%> </td>

Yukarı Dön

acidmax
Yeni Üye

Kayıt Tarihi: 15-Temmuz-2010
Ülke: Turkiye
Gönderilenler: 2

Gönderen: 25-Temmuz-2010 Saat 13:41 \| Kayıtlı IP

Hocam öncelikle çok teşekkür ederim,tarif üzerine yazdım istedigim gibi oldu fakat bir tane daha ekleme yapmam gereken yer var aşarıda resimde anlattım onuda.Yardımın için teşekkürler.Kodlar yukarıdakilerle aynı

Yukarı Dön

Eğer Bu Konuya Cevap Yazmak İstiyorsanız İlk Önce Giriş
Eğer Kayıtlı Bir Kullanıcı Değilseniz İlk Önce Kayıt Olmalısınız

Yazıcı Sürümü

Kapalı Foruma Yeni Konu Gönderme
Kapalı Forumdaki Konulara Cevap Yazma
Kapalı Forumda Cevapları Silme
Kapalı Forumdaki Cevapları Düzenleme
Kapalı Forumda Anket Açma
Açık Forumda Anketlerde Oy Kullanma