الصفحة الرئيسية>دروس برمجة الشبكات>البرنامج التعليمي لـ ASP

برنامج التحقق من صفحة تسجيل الدخول إلى ASP

الكاتب：Eve Cole وقت التحديث：2025-04-27 10:32:01

موصى به: تعليمي المبتدئين: عرض ADO
الطريقة الأكثر شيوعًا لعرض البيانات من مجموعة سجلات هي عرض البيانات في جدول HTML. إظهار أسماء الحقل وقيم الحقل لدينا قاعدة بيانات مسماة NorthWind ، ونريد عرض البيانات في جدول العملاء (تذكر حفظ هذا الملف باستخدام .asp كملحق): htmlbody set conn = server.createBject (

البرنامج النصي للتحقق من تسجيل الدخول إلى المستخدم ، chkpwd.asp

  1.  <٪
  2.  '========= سجل تسجيل الدخول إلى المستخدم ========
  3.  إذا لم يتم تعريف الكائن الذي تم تمريره ، يتم تعريفه على أنه خطأ ، مما يشير إلى أنه لم يمر بالتحقق
  4.  ifisempty (الجلسة (مرت)) ثم
  5.  الجلسة (مرت) = خطأ
  6.  Endif
  8.  "الجلسة (تم تمريرها) = خطأ ، مما يعني أن معلومات التحقق التي تم تمريرها من النموذج لم يتم تمريرها بعد.
  9.  ifSession (مرت) = falsethen
  10.  اسم المستخدم = request.form (اسم المستخدم)
  11.  userpwd = request.form (userPWD)
  13.  ifusername = ثم
  14.  errmsg = نصيحة: الرجاء إدخال اسم المستخدم وكلمة المرور الخاصة بك
  15.  آخر
  16.  '==================================================
  17.  setConn = server.createObject (adodb.connection)
  18.  conn.ConnectionString = driver = {sqlserver} ؛ server = 192.168.1.3 ؛ uid = sa ؛ pwd = ؛ database = zcmrs
  19.  Conn.Open
  20.  '============================= قراءة بيانات المستخدم من سجل الجدول ==========================
  21.  حدد كائن مجموعة السجلات
  22.  setRs = server.createBject (adodb.recordset)
  23.  قم بتعيين ConnectionString من كائن الاتصال
  24.  setRs.ActiveConnection = conn
  25.  "تعيين نوع المؤشر
  26.  Rs.CursorType = 3
  27.  مجموعة سجلات مفتوحة
  28.  rs.openselectusername ، passwordfromerpuser whereusername = '& username &'
  29.  '==================================================
  30.  ifrs.eoftthen
  31.  errmsg = نصيحة: المستخدم غير موجود أو كلمة المرور خاطئة
  32.  آخر
  33.  IFUSERPWD <> rs.fields (كلمة المرور) ثم
  34.  errmsg = نصيحة: فشل تسجيل الدخول! خطأ كلمة المرور؟
  35.  else'login بنجاح
  36.  errmsg =
  37.  الجلسة (مرت) = صواب
  38.  الجلسة (اسم المستخدم) = RS.Fields (اسم المستخدم)
  39.  "تحديد جلسة أذونات المستخدم (UserD) = Rs.Fields (UserD)
  40.  Endif
  41.  Endif
  42.  Endif
  43.  Endif
  44.  بعد فشل تسجيل الدخول ، سيتم رسم نموذج تسجيل الدخول
  45.  ifnotsession (مرت) = truethen
  46.  ٪>
  48.  <html>
  49.  <Head> <title> Design Home_dwww.cn </itlem>
  50.  <Tyletype = text/css>
  51.  <!-
  52.  .style1 {font-size: 12px ؛ font-weight: Bold ؛ Margin-Left: 120px ؛ Outline: double}
  53.  ->
  54.  </style>
  55.  <Tyletype = text/css>
  56.  <!-
  57.  .style2 {font-size: 12px ؛ font-weight: Bold ؛ Outline: double ؛ color:#ff333}
  58.  ->
  59.  </style>
  60.  </head>
  62.  <BodyLeftMargin = 0TopMargin = 0MarginHeight = 0MarginWidth = 0bgColor =#000000>
  63.  <divid = parentStyle = الارتفاع: 300 ؛ العرض: 450 ؛ على الطراز الحدود: الصلبة ؛ اللون الحدودي: #fffff ؛ الهامش: 80px ؛ الهامش اليساري: 25 ٪ ؛ الهامش اليمين: 25 ٪ ؛ الخلفية اللون: #fffff>
  65.  <divid = denglustyle = font-size: 12px ؛ font-weight: bold ؛ probred ؛ background-color:#0099ff ؛ text-align: center ؛ height: 40px ؛> <br> eRP system login </div>
  66.  <formaction = <٪ = request.servervariables (path_info) ٪> method = postName = myFormId = myForm>
  67.  <pclass = style1> اسم المستخدم: <inputName = usernametype = textId = usernamesize = 18MaxLength = 20>
  68.  </p>
  69.  <pclass = style1> كلمة المرور: <inputName = userPwDType = passwordId = userPwDsize = 18MaxLength = 20>
  70.  </p>
  71.  <palign = centerClass = style2> <٪ = errmsg ٪> </p>
  72.  <p>
  73.  <inputType = submitalIng = middlename = submitValue = login system>
  74.  <inputName = regetype = buttonalign = middleonclick = location = 'register.asp'id = regevalue = register user>
  75.  </p>
  76.  </form>
  77.  </div>
  79.  </body>
  81.  </html>
  82.  <٪
  83.  '<pclass = style1> رمز التحقق: <inputName = checkCodeType = textId = checkCodesize = 6MaxLength = 4>
  84.  '<imgstyle = margin-right: 40pxalt = src = common/getCode.asp> </p>
  85.  استجابة
  86.  Endif
  87.  ٪>

صفحة لزيارة ERP.asp

  1.  <!-#includefile = chkpwd.asp->
  2.  <body>
  3.  <vistyle = 'font-size: 12px ؛ font-weight: BOLD ؛ الحدود: 1pxsolid#001 ؛ الحشو: 4px ؛ الخلفية: #ffccff ؛ الهامش -وب: 0 ؛
  4.  <٪
  5.  ifsession (مرت) = truethen
  6.  الرد. write (جلسة (اسم المستخدم))
  7.  Endif
  8.  ٪> <hhref = logout.asp> الخروج من النظام </a>
  9.  </div>
  10.  </body>

في كل مرة تقوم فيها بفتح ERP.asp ، تقوم أولاً بتنفيذ chkpwd.asp () ، والتي يمكن أن تمنع المستخدمين غير المصرح لهم بشكل فعال من الوصول إلى صفحة الويب المحددة.

خروج نظام logout.asp

  1.  <body>
  2.  <٪
  3.  الجلسة (مرت) = خطأ
  4.  الجلسة (اسم المستخدم) =
  5.  استجابة.
  6.  ٪>
  7.  </body>

إرسال النموذج باستخدام الصور

  1.  <formName = form1method = postAction =>
  2.  <tdalign = right> <pecttType = ImageMethod = submitName = submitsrc = image/loginin.gifwidth = 70height = 21alt = submit> </td>
  3.  </form>

مشاركة: تعليمي المبتدئين: ADO إضافة سجلات
يمكننا استخدام إدراج SQL في الأمر لإضافة سجلات إلى الجداول في قاعدة البيانات. إضافة سجلات إلى الجداول في قاعدة البيانات ، نريد إضافة سجل جديد إلى جدول العملاء في قاعدة بيانات NorthWind. نحتاج أولاً إلى إنشاء نموذج يحتوي على الحقول التي نريد تحديد البيانات: htmlbodyform method = post action = dem

مقالات ذات صلة