% dim sql dim sipno if request.form("tsipno")<>"" then sql="SELECT * FROM SIPARIS WHERE ID=" & request.form("tsipno") rs.open sql,baglanti,3,3 if rs.eof=false then sipno=rs.fields("ID") tarih=rs.fields("TARIH") urun=rs.fields("URUN") adet=rs.fields("ADET") tutar=rs.fields("TUTAR") havaleno=rs.fields("HAVALENO") adsoyad=rs.fields("ADSOYAD") adres=rs.fields("ADRES") pk=rs.fields("PK") il=rs.fields("IL") ilce=rs.fields("ILCE") tel=rs.fields("TEL") status=rs.fields("STATUS") eposta=rs.fields("EPOSTA") else status=3 end if rs.close set rs=nothing select case status case 0:durum="Havaleniz bekleniyor." case 1:durum="Havaleniz alındı. Ürün hazırlanıyor." case 2:durum="Kargoya verildi." case 3:durum="Bu numarayla kayıtlı sipariş yok." end select end if %>
|
|||||||||||||||||||
|
|||||||||||||||||||
|