موصى به: تفسير استخدام وظيفة كائن regexp من ASP توفر كائنات regexp دعم تعبير منتظم بسيط. استخدام كائن regexp: ما يلي هو المحتوى المشار إليه: دالة regexptest (patrn ، strng) dim re
البرنامج النصي للتحقق من تسجيل الدخول إلى المستخدم ، chkpwd.asp
| ما يلي هو المحتوى المقتبس: <٪ '========= سجل تسجيل الدخول إلى المستخدم ======== إذا لم يتم تعريف الكائن الذي تم تمريره ، يتم تعريفه على أنه خطأ ، مما يشير إلى أنه لم يمر بالتحقق إذا isempty (جلسة (تم تمريرها)) ثم الجلسة (مرت) = خطأ إنهاء إذا "الجلسة (تم تمريرها) = خطأ ، مما يعني أن معلومات التحقق التي تم تمريرها من النموذج لم يتم تمريرها بعد. إذا الجلسة (مرت) = خطأ ثم اسم المستخدم = request.form (اسم المستخدم) userpwd = request.form (userPWD) إذا اسم المستخدم = ثم errmsg = نصيحة: الرجاء إدخال اسم المستخدم وكلمة المرور الخاصة بك آخر '================================================= == تعيين conn = server.createBject (adodb.connection) conn.ConnectionString = driver = {sql server} ؛ server = 192.168.1.3 ؛ uid = sa ؛ pwd = ؛ database = zcmrs Conn.Open '============================= قراءة بيانات المستخدم من سجل الجدول =============== ========== حدد كائن مجموعة السجلات تعيين rs = server.createBject (adodb.recordset) قم بتعيين ConnectionString من كائن الاتصال تعيين Rs.ActiveConnection = conn "تعيين نوع المؤشر Rs.CursorType = 3 مجموعة سجلات مفتوحة RS.Open حدد اسم المستخدم ، كلمة المرور من Erpuser حيث اسم المستخدم = '& username &' '================================================= == إذا rs.eof ثم errmsg = نصيحة: المستخدم غير موجود أو كلمة المرور خاطئة آخر إذا كان userpwd <> rs.fields (كلمة المرور) ثم ERRMSG = نصيحة: فشل تسجيل الدخول! آخر 'تسجيل الدخول بنجاح errmsg = الجلسة (مرت) = صواب الجلسة (اسم المستخدم) = RS.Fields (اسم المستخدم) "تحديد جلسة أذونات المستخدم (UserD) = Rs.Fields (UserD) إنهاء إذا إنهاء إذا إنهاء إذا إنهاء إذا بعد فشل تسجيل الدخول ، سيتم رسم نموذج تسجيل الدخول إذا لم يكن الجلسة (مرت) = صحيح إذن ٪> <html> <Head> <title> Unded Document </title> <نوع النمط = text/css> <!- .style1 {font-size: 12px ؛ font-weight: Bold ؛ Margin-Left: 120px ؛ Outline: double} -> </style> <نوع النمط = text/css> <!- .style2 {font-size: 12px ؛ font-weight: Bold ؛ Outline: double ؛ color:#ff333} -> </style> </head> <body leftmargin = 0 topmargin = 0 marginheight = 0 marginWidth = 0 bgColor =#000000> <div id = النمط الأصل = الارتفاع: 300 ؛ العرض: 450 ؛ على الطراز الحدود: صلبة ؛ لون الحدود: #fffff ؛ الهامش: 80 بكسل ؛ الهامش اليساري: 25 ٪ ؛ الهامش اليمين: 25 ٪ ؛ خلفية- اللون: #ffffff> <div id = denglu style = font-size: 12px ؛ font-weight: bold ؛ bolde-color:#0099ff ؛ text-align: center ؛ height: 40px ؛> <br> login system login </div> <form action = <٪ = request.servervariables (path_info) ٪> method = post name = myform id = myform> <p class = style1> اسم المستخدم: <input name = type type = text id = username size = 18 maxLength = 20> </p> <p class = style1> كلمة المرور: <input name = userPwd type = password id = userPwd size = 18 maxLength = 20> </p> <p align = center class = style2> <٪ = errmsg ٪> </p> <p> <نوع الإدخال = إرسال محاذاة = الاسم الأوسط = إرسال قيمة = تسجيل الدخول إلى النظام> <اسم الإدخال = نوع Rege = button align = middle onClick = 'register.asp' id = rege value = Record user> </p> </form> </div> </body> </html> <٪ '<p class = style1> رمز التحقق: <input name = checkCode type = text id = checkco |
مشاركة: ASP التعبير التعبير العادي يمكننا بسهولة التحقق من شرعية البيانات المختلفة عن طريق كائن "التعبير العادي". أولاً ، دعونا نفهم بالضبط كائن "التعبير العادي" لـ VBScript.
صفحتان في إجمالي الصفحة السابقة 12 الصفحة التالية