Hoşgeldiniz, Ziyaretçi.Lütfen giriş yapın veya kayıt olun.
E-posta adresinize aktivasyon iletisi gelmediyse lütfen buraya tıklayın.
Kasım 15, 2018, 04:57:25 ÖS


FORUM ŞU AN İÇİN (ÖZEL BÖLÜMLER HARİÇ) TÜM ZİYARETÇİLERE AÇIKTIR.
EMEĞE SAYGI AÇISINDAN ALINTILARIN MUTLAKA KAYNAK GÖSTERİLMESİ RİCA OLUNUR.


Ana Sayfa Ana Sayfa Yardım Ara Giriş Yap Kayıt
+  Hay-NS Yazılım
|-+  WEB TABANLI DİLLER
| |-+  ASP Makaleler
| | |-+  Formdan girilen bilgiye göre tablede doğrulama ve yönlendirme
0 Üye ve 1 Ziyaretçi konuyu incelemekte. « önceki sonraki »
Sayfa: [1] Aşağı git Bu Konuyu Gönder Yazdır
Gönderen Konu: Formdan girilen bilgiye göre tablede doğrulama ve yönlendirme  (Okunma Sayısı 6173 defa)
turkoder
Adnan YILDIZ
Administrator
Onbaşı
*****

Rep Puanı: +0/-0
Çevrimdışı Çevrimdışı

Mesaj Sayısı: 218



WWW
« : Ekim 09, 2006, 07:10:51 ÖS »

1. FORMDA GİRİLEN BİLGİYE GÖRE DOĞRULAMA VE YÖNLENDİRME;

Kod:
<%
'//////////////////////////////////////////////////////////////////////////////////////////////////
'// formdan gelen bilgileri alalım
'//////////////////////////////////////////////////////////////////////////////////////////////////
kullanici= Trim(request.form("kullanici"))
sifre=request.form("sifre")
if Len(kullaci)= 0 Then
response.write "<center>Lütfen <a href=""javascript:history.back(1)"">geri</a> gidip Öğrenci No Giriniz!!</center>"
response.end
 
end if
'////////////////////////////////////////
'VERİTABANIMIZI AÇALIM
'//////////////////////////////////////
Dim baglan,yol
yol=server.mappath("db/veritabani.mdb")
Set baglan=Server.CreateObject("ADODB.Connection")
baglan.open " Data Source = "& yol &";Provider=Microsoft.Jet.OLEDB.4.0"

'//////////////////////////////////////////////////////////////////////////////////////////////////
'// RECORDSET TANIMLAYALIM
'//////////////////////////////////////////////////////////////////////////////////////////////////

sqls="select DISTINCT STUR,OGNO,STARIH,SINAVNO from SINAVLAR where OGNO="&kullanici
set kayits=server.createobject("adodb.recordset")
SQL=sqls
kayits.open SQL, baglan, 1, 3

'//////////////////////////////////////////////////////////////////////////////////////////////////
'// aranan OGNO  varsa ilgili sayfaya yönlendireceğiz.
'//////////////////////////////////////////////////////////////////////////////////////////////////

if not kayits.eof then
session("ogrencimi")="evet"
 ogno=kayits("OGNO")
 
kayits.close
set kayits=Nothing
baglan.close
%>
 <%Response.Redirect "sinav_liste.asp?ogno="&ogno&""%>

'//////////////////////////////////////////////////////////////////////////////////////////////////
Eğer yoksa uyarı mesajlarımızı yazıyoruz.
'//////////////////////////////////////////////////////////////////////////////////////////////////

<%
else
response.write "<center>Hatalı Öğrenci No veya Sınav Bilgileriniz Girilmemiş <br>Veya Yetkili Değilsiniz. <br> Lütfen <a href=""javascript:history.back(1)"">geri</a> gidip tekrar deneyiniz"
kayits.close
set kayits=Nothing
baglan.close
  end if %>
Logged
Sayfa: [1] Yukarı git Bu Konuyu Gönder Yazdır 
« önceki sonraki »
Gitmek istediğiniz yer:  


Kullanıcı adınızı, parolanızı ve aktif kalma süresini giriniz

MySQL Kullanıyor PHP Kullanıyor Powered by SMF 1.1.8 | SMF © 2006-2008, Simple Machines LLC XHTML 1.0 Uyumlu! CSS Uyumlu!
Bu Sayfa 0.029 Saniyede 18 Sorgu ile Oluşturuldu