السلام عليكم
اذا امكن كيف اسوي صفحة باسورد بسيطه لموقع عن طريق asp
مثل هذا
http://www.gpyw.gov.sa/Ver1/_1/log.asp
السلام عليكم
اذا امكن كيف اسوي صفحة باسورد بسيطه لموقع عن طريق asp
مثل هذا
http://www.gpyw.gov.sa/Ver1/_1/log.asp
__________________
بلاك روز لخدمات التصميم в ℓ á c κ - я ò ş ε
مدونة هديل HadeeL
قال رسول الله صلى الله عليه وسلم: { من قال سبحان الله وبحمده في يوم مئة مرة حطت خطاياه وإن كانت مثل زبد البحر } [متفق عليه].
صفحتين
صفحة التأكد من الباسوورد وهذي طريقتها سهله ان كان الباسورد خطأ لا توجه وأن كان صحيح خزن الماحيه في السيشن
الصفحه الأخرى تعتمد على فحص السيشن أن كانت قيمته صحيحه تفتح الصفحه وأن كانت خاطئه يعاد توجيهيه لصفحة الباسوورد
__________________
Eng.Fedail
Computer and Electronics Engineer
السلام عليكم ...
اختي الكريمة الموضوع بسيط و جميل ... و لغة asp جميلة من حيث تبسيط الامور
نقوم اولا بانشاء صفحة ادخال كلمة المرور و ارسالها الى صفحة التحقق ... يتم ارسال القيم عبر فورم
<%
'' هنا يتم طباعة الخطأ في حال ادخال باسورد خاطئ
if Session errorpas = true then
response.write " please enter a valid password"
end if
%>
<form name=formPassword method=post action="pass2.asp">
<tr><td>User Name </td><td>
<input name="user" size=20 maxlength=31></td></tr>
<tr><td>Password:</td><td>
<input type=password name=pass1 size=20 maxlength=31></td></tr>
<tr><td></td><td><input type=submit value="Enter" ></td></tr>
</form>
و ثانيا ننشئ صفحة التحقق :
<%
'' هنا تم تعريف البيانات القادمة من الفورم
usernameo = Request.Form("user")
password =Request.Form("pass1")
'' هنا تم تعريف القيم المتغيرة التي سيتم استخدامها
Dim CConn, sql, rs, ps, username
'' هنا تم انشاء الربط مع قاعدة البيانات
set CConn = server.createobject("adodb.connection")
constr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("test.mdb")& ";"
CConn.open constr
'' هنا سيتم التأكد من البيانات و اجراء تنفيذ للجملة الشرطية
If Session( "continue" ) = True Then
sql = "SELECT * from table where username ='" &username & "'"
Set rs = Server.CreateObject( "ADODB.Recordset" )
rs.Open sql, CConn
rs.MoveFirst()
While Not rs.EOF
If password <> rs( "password" ) Then
Session errorpas = true
response.redirect "pass1.asp"
else
response.redirect "home.asp"
end if
%>
__________________
help.central@hotmail.com