Asp Yardım
-
şimdi ben şöyle bir olay yapıcam aspde
bitena form olcak sadece tek birde buton ornek birde /kontrol.asp
ad soyad= form
buton
ad soyada ad ve soyad yazıldımı bak butonuna tıklandımı o formdaki ad soyad dogruysa yane veri tabanında kayıtlısa /kontrol.asp?id=adsoyadı bir sayfaya yonelndirilcek ve o ad soyaddaki tum bilgileri sayfaya dokucem net anlatamamısımdır kesin aklım co karışık
-
ayni sayfaya koy asp olsun
<%
if request.querystring("islem")="bak" then
isim = "yazacak isim"
soyisim = "yazacak soy isim"
a = request.form("ad")
b = request.form("soyad")if a = isim and b = soyisim then
response.write "giriş onaylandı"
else
response.write "onaylanmadı"
end if
else
%><form action="?islem=bak" method="post">
<font size=-1>adınız</font><input type="text" name="ad"><br><font size=-1>Soy Adınız</font><input type="text" name="soyad"><p><input type="submit" value="Yolla baba">
</form><%end if%>
---- :D buda php için olsun -----
<?php
if ($_GET['islem']=="bak"){
$isim = "e" ;
$soyisim = "c" ;
$a = $_POST['ad'] ;
$b = $_POST['soyad'] ;
if ($isim == $a and $soyisim == $b){echo "oldu lan kabulümdür";}else{echo "olmadı baba";}}
else{?>
<form action="?islem=bak" method="post">
<font size=-1>adınız</font><input type="text" name="ad"><br><font size=-1>Soy Adınız</font><input type="text" name="soyad"><p><input type="submit" value="Yolla baba">
</form>
<?php } ?>
nie yazdınla zumsuk pehepe sini diyecek olan varsa söyliyim php ye başladımda ondan :D artistik patinaj olsun hemde klodları hatırlayayıom -
zumsuk hacı veritabanında kontrol edip listeletmek istiyo arkadaş sanırım
hocam form'daki textboxların name kısmını isim ve soyisim olarak ayarla..
form action= kontrol.asp olsun, yani butona tıklayınca kontrol.asp'ye gidilecek..
--------------------- kontrol.asp -----------------------------------
'hocam öncelikle formdan gelen zararlı kelimelere karşı önlem alalım<%
Function Temizle(strVeri)
If strVeri = "" Then Exit Function
strVeri = Replace(strVeri, "<", "<")
strVeri = Replace(strVeri, ">", ">")
strVeri = Replace(strVeri, "[", "[")
strVeri = Replace(strVeri, "]", "]")
strVeri = Replace(strVeri, """", "", 1, -1, 1)
strVeri = Replace(strVeri, "=", "=", 1, -1, 1)
strVeri = Replace(strVeri, "'", "''", 1, -1, 1)
strVeri = Replace(strVeri, "select", "select", 1, -1, 1)
strVeri = Replace(strVeri, "join", "join", 1, -1, 1)
strVeri = Replace(strVeri, "union", "union", 1, -1, 1)
strVeri = Replace(strVeri, "where", "where", 1, -1, 1)
strVeri = Replace(strVeri, "insert", "insert", 1, -1, 1)
strVeri = Replace(strVeri, "delete", "delete", 1, -1, 1)
strVeri = Replace(strVeri, "update", "update", 1, -1, 1)
strVeri = Replace(strVeri, "like", "like", 1, -1, 1)
strVeri = Replace(strVeri, "drop", "drop", 1, -1, 1)
strVeri = Replace(strVeri, "create", "create", 1, -1, 1)
strVeri = Replace(strVeri, "modify", "modify", 1, -1, 1)
strVeri = Replace(strVeri, "rename", "rename", 1, -1, 1)
strVeri = Replace(strVeri, "alter", "alter", 1, -1, 1)
strVeri = Replace(strVeri, "cast", "cast", 1, -1, 1)
Temizle = strVeri
End Function
%>
isim = Temizle(request.form("isim"))
soyisim = Temizle(request.form("soyisim"))
'veritabanına bağlan access ya da sql server hangisiyse..
'veritabanına bağlandıktan sonra(db adıyla bağlandığını düşünüyorum)
set rs = db.execute("select * from tablon where adi='"& isim &"' and soyadi='"& soyisim &"'")
if rs.eof or rs.bof then
response.write "böyle bi kayıt yok"
response.end
end if
isim = <%=rs("adi")%>
soyisim = <%=rs("soyadi")%>
telefonu = <%=rs("tel")%>
.
.
.
bu şekilde listelersin -
:S göremeidm hoca :D ondna öyle verdim gerçi hala veritabanıyla ilgili bir yer göremedim ama..
-
arkinfes bunu yazdı:
-----------------------------ad soyada ad ve soyad yazıldımı bak butonuna tıklandımı o formdaki ad soyad dogruysa yane veri tabanında kayıtlısa /kontrol.asp?id=adsoyadı bir sayfaya yonelndirilcek ve o ad soyaddaki tum bilgileri sayfaya dokucem net anlatamamısımdır kesin aklım co karışık
-----------------------------
"yane"sini atlamışsın :D -
bu siteye ve müridlerine hastayım :D 5 dk da cevab hazır super ya vallaha baska bi foruma acsan 1 haftada gelir cevab :D
