Seda Elektrik
  Ana Sayfa
 
Sizde faturanızı küçültün tasarruflu ampul kullanın;)


<% response.buffer = True %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Üye Girişi</title>
</head>
<!--#include file="baglanti.asp"-->
<body bgcolor="#F5F5F5">
<%
kullaniciadi = request.form("kullaniciadi")
sifre = request.form("sifre")
if sifre="" or sifre="" then
response.write "<font face=Verdana, Arial, Helvetica, sans-serif size=2> Lütfen kullanıcı adı ve şifrenizi girin. </font>"
response.end
else

Set uset = Server.CreateObject("ADODB.Recordset")
SQL = "select * from uyeler where kullaniciadi = '" & kullaniciadi & "'"
uset.open SQL,bag,1,3

if uset.eof then
response.write "<font face=Verdana, Arial, Helvetica, sans-serif size=2> Girmiş olduğunuz kullanıcı adı ve şifre ile ilgili bir kayıt bulunmamaktadır.</font>"
response.end
else

uset.movefirst
if uset("sifre") <> sifre then
response.write "<font face=Verdana, Arial, Helvetica, sans-serif size=2> Şifrenizi kontrol edip tekrar deneyiniz. </font>"
response.end
else

Response.cookies("mesajbox")("uid") = uset("uid")
Response.cookies("mesajbox")("kullaniciadi") = kullaniciadi
Response.cookies("mesajbox")("id") = session.sessionid
Response.Cookies("mesajbox").Expires = now() + 365

Session("uid") = uset("uid")
Session("kullaniciadi") = kullaniciadi
Session("id") = session.sessionid

if Request.ServerVariables("HTTP_REFERER") <> "" then
response.redirect Request.ServerVariables("HTTP_REFERER")
else


response.redirect "default.asp"
end if
uset.close
set uset = Nothing
end if
end if
end if
%>


</body>

</html>
 
  Bugün 1 ziyaretçi (1 klik) kişi burdaydı!  
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol