Şimdi Ara

ASP>> urunler.girtarihi = '&YearStr&MonthStr&DayStr&'

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
9
Cevap
0
Favori
593
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • Merhaba,

    kullanmış olduğum call center programı üzerine geliştirmeler yapıyorum. Dün yazmış olduğumuz bir kod bugün çalışmıyor."tüm elemanlar birbirlerinin satışlarını satış ekranın görsün"
    Yazdığımız kod aşşağıda ki gibi, dün istediğimiz şekilde tüm elemanların satışlarını sql'den çekiyor ve sıralıyordum. Ancak bu sabah satış girildiğinde göremiyorum..
    Atladığımız bir nokta var ama neresi yardımcı olacak arkadaş varsa sevinirim..



     
    <%
    tablo.close
    YearStr = Year(Date())

    addLeadingZeroMonth = Month(Date())
    if addLeadingZeroMonth < 10 then
    addLeadingZeroMonth = "0" & addLeadingZeroMonth & ""
    end if

    MonthStr = addLeadingZeroMonth

    addLeadingZeroDay = Day(Date())
    if addLeadingZeroDay < 10 then
    addLeadingZeroDay = "0" & addLeadingZeroDay & ""
    end if

    DayStr = addLeadingZeroDay

    sql="select giris.kul, count (urunler.id) as satis from urunler , giris Where urunler.elemanid = giris.id and urunler.girtarihi = "&YearStr&MonthStr&DayStr&" AND urunler.kontrol = 4 GROUP BY giris.kul"
    sql=sql&" ORDER BY count (urunler.id) desc "
    tablo.open sql,bag,1,3

    If tablo.EOF Then
    Response.Write "Satis Bulunamadı"
    Else
    response.write "<table>"
    response.write "<tr><td>Agent</td><td>Satis</td></tr>"
    Do While Not tablo.EOF
    response.write "<tr>"
    response.write "<font size=10 face=verdana><b>"
    Response.Write "<td>" & tablo("kul") & "</td>"
    Response.Write "<td><b>" & tablo("satis") & "</b></td>"
    response.write "</tr>"
    tablo.MoveNext()
    Loop
    response.write "</table></fieldset>"
    End If



    %>







  • başına sıfır eklemen sıkıntı yaratıyor olabilir ;) bugun aylardan 10 oldu muhtemelen onla ilgilidir.
  • maalesef.. zaten 10dan küçükse önüne 0 koy dediğim için bişey değişmedi.
  • quote:

    Orijinalden alıntı: illetius

    Merhaba,

    kullanmış olduğum call center programı üzerine geliştirmeler yapıyorum. Dün yazmış olduğumuz bir kod bugün çalışmıyor."tüm elemanlar birbirlerinin satışlarını satış ekranın görsün"
    Yazdığımız kod aşşağıda ki gibi, dün istediğimiz şekilde tüm elemanların satışlarını sql'den çekiyor ve sıralıyordum. Ancak bu sabah satış girildiğinde göremiyorum..
    Atladığımız bir nokta var ama neresi yardımcı olacak arkadaş varsa sevinirim..



     
    <%
    tablo.close
    YearStr = Year(Date())

    addLeadingZeroMonth = Month(Date())
    if addLeadingZeroMonth < 10 then
    addLeadingZeroMonth = "0" & addLeadingZeroMonth & ""
    end if

    MonthStr = addLeadingZeroMonth

    addLeadingZeroDay = Day(Date())
    if addLeadingZeroDay < 10 then
    addLeadingZeroDay = "0" & addLeadingZeroDay & ""
    end if

    DayStr = addLeadingZeroDay

    sql="select giris.kul, count (urunler.id) as satis from urunler , giris Where urunler.elemanid = giris.id and urunler.girtarihi = "&YearStr&MonthStr&DayStr&" AND urunler.kontrol = 4 GROUP BY giris.kul"
    sql=sql&" ORDER BY count (urunler.id) desc "
    tablo.open sql,bag,1,3

    If tablo.EOF Then
    Response.Write "Satis Bulunamadı"
    Else
    response.write "<table>"
    response.write "<tr><td>Agent</td><td>Satis</td></tr>"
    Do While Not tablo.EOF
    response.write "<tr>"
    response.write "<font size=10 face=verdana><b>"
    Response.Write "<td>" & tablo("kul") & "</td>"
    Response.Write "<td><b>" & tablo("satis") & "</b></td>"
    response.write "</tr>"
    tablo.MoveNext()
    Loop
    response.write "</table></fieldset>"
    End If



    %>


    Merhabalar,

    Problem yapılan önceki satışların görünmemesi ise o gün kayıt var mı onu kontrol edin. Şayet önceki kayıtlardan kastınız bugün değilse yani anlık tarihten küçük olanlar ise ya sorgudaki tarih kontrolündeki "=" işaretini "<" işareti ile değiştirin yada o tarih kontrolünü kaldırın.

    İyi çalışmalar




  • Merhaba, cevabınız için çok teşekkür ederim ancak sorun vermiş olduğum kodda değilmiş. O kodu kaldırdığım halde sistemin farklı yerlerinde ay ile ilgili sıkıntı yaşandığını gördüm. veritabanına baktığımda ise giristarihi kısmını 201401001 olarak gördüm. Yani ay 10dan küçük olmadığı halde sistem yinede bir sıfır atmış. bağlantı kurduğum dosyada yazılım şu şekilde olmasına rağmen aynı hata devam ediyor.


     
    <%
    SQL="select * from urunler"
    tablo.open SQL,bag,1,3
    for i=1 to tablo.recordcount
    if tablo("kontroltarihi")<>#00:00:00# then
    yil=year(tablo("kontroltarihi"))
    if ayy<10 then
    ay=0&month(tablo("kontroltarihi"))
    else
    ay=month(tablo("kontroltarihi"))
    end if
    gunn=day(tablo("kontroltarihi"))
    if gunn<10 then
    gun=0&day(tablo("kontroltarihi"))
    else
    gun=day(tablo("kontroltarihi"))
    end if
    topla=yil&ay&gun%><%=topla%><br /><%
    tablo("kontroltar")=topla
    end if
    tablo.movenext
    next
    tablo.close
    %>




  • Sıfır eklemenizi anlamadım zaten kendisi o şekilde getiriyordur.?

    Edit: Yada tarihi parçalamak yerine neden tümünü alıp daha sonra formatını değiştirmiyorsunuzki? Yaptıgınız kullanımı ilkkez goruyorum

    http://msdn.microsoft.com/en-us/library/8kb3ddd4(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1



    < Bu mesaj bu kişi tarafından değiştirildi interboyz -- 2 Ekim 2014; 14:36:57 >
  • Maalesef yazılımı başka bi şahıs yapmış ve hayatımda ilk defa bu kadar karışık bi sistem gördüğüm için müdahele edemiyorum oturmuş sistemi bozmamak için
  • Yapay Zeka’dan İlgili Konular
    Daha Fazla Göster
  • Sorun çözülmüştür herkese teşekkür ederim..


    Kodu yazan arkadaş
    ayy=month(request.form("kontroltarihi"))
    demediği için her ayın başına otomatik 0 atılmış.


    Altta ki şekli verdim ve sorunum düzeldi..

    <% 
    yil=year(request.form("kontroltarihi"))
    ayy=month(request.form("kontroltarihi"))
    if ayy<10 then
    ay=0&month(request.form("kontroltarihi"))
    else
    ay=month(request.form("kontroltarihi"))
    end if
    gunn=day(request.form("kontroltarihi"))
    if gunn<10 then
    gun=0&day(request.form("kontroltarihi"))
    else
    gun=day(request.form("kontroltarihi"))
    end if
    topla=yil&ay&gun
    SQL="select * from urunler where id="&request.querystring("kontrol")
    tablo.open SQL,bag,1,3
    tablo("not")=request.form("not")
    tablo("pnot")=request.form("pnot")
    tablo("kontroltar")=topla
    if request.form("kontrol")=2 and request.form("pkontrol")=2 then
    tablo("kontroltarihi")=#00.00.0000#
    else
    tablo("kontroltarihi")=request.form("kontroltarihi")
    end if
    if request.form("kontrol")<>"" then
    tablo("kontrol")=request.form("kontrol")
    end if
    if request.form("pkontrol")<>"" then
    tablo("pkontrol")=request.form("pkontrol")
    end if
    tablo.update
    response.redirect "paneldefault.asp?gunluk="&request.querystring("geri")
    bag.close
    set bag=nothing
    else
    response.redirect "admin.asp"
    end if
    %>




  • Ziyaret etmenizi öneririm

    En iyi Hosting &
  • 
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.