แนะนำ: ตีความการใช้ฟังก์ชันวัตถุ regexp ของ ASP วัตถุ Regexp ให้การสนับสนุนการแสดงออกปกติอย่างง่าย การใช้งานของวัตถุ Regexp: ต่อไปนี้เป็นเนื้อหาอ้างอิง: ฟังก์ชั่น regexptest (Patrn, strng) dim re
สคริปต์การตรวจสอบการเข้าสู่ระบบของผู้ใช้, chkpwd.asp
| ต่อไปนี้เป็นเนื้อหาที่ยกมา: - '========= สคริปต์การตรวจสอบการเข้าสู่ระบบของผู้ใช้ ========= 'หากวัตถุที่ผ่านไม่ได้ถูกกำหนดไว้จะถูกกำหนดให้เป็นเท็จแสดงว่าไม่ได้ผ่านการตรวจสอบ ถ้า isempty (เซสชัน (ผ่าน)) จากนั้น เซสชัน (ผ่าน) = เท็จ สิ้นสุดถ้า 'เซสชัน (ผ่าน) = เท็จซึ่งหมายความว่าข้อมูลการตรวจสอบที่ส่งผ่านจากแบบฟอร์มยังไม่ผ่าน ถ้าเซสชัน (ผ่าน) = เท็จแล้ว username = request.form (ชื่อผู้ใช้) userpwd = request.form (userpwd) ถ้าชื่อผู้ใช้ = จากนั้น errmsg = เคล็ดลับ: โปรดป้อนชื่อผู้ใช้และรหัสผ่านของคุณ อื่น - SET Conn = Server.CreateObject (ADODB.Connection) conn.ConnectionString = driver = {SQL Server}; Server = 192.168.1.3; uid = Sa; pwd =; database = zcmrs conn.open '============================== อ่านข้อมูลผู้ใช้จากบันทึกตาราง ================ ========== 'กำหนดวัตถุบันทึกชุด ตั้งค่า rs = server.createObject (adodb.recordset) 'ตั้งค่าการเชื่อมต่อของวัตถุการเชื่อมต่อ ตั้งค่า rs.activeConnection = conn 'ชุดเคอร์เซอร์ Rs.Cursortype = 3 'ชุดบันทึกเปิด Rs.Open เลือกชื่อผู้ใช้รหัสผ่านจาก ERPUSER ที่ชื่อผู้ใช้ = '& ชื่อผู้ใช้ &' - ถ้า RS.EOF แล้ว errmsg = เคล็ดลับ: ผู้ใช้ไม่มีอยู่หรือรหัสผ่านไม่ถูกต้อง อื่น ถ้า userpwd <> rs.fields (รหัสผ่าน) แล้ว ERRMSG = เคล็ดลับ: การเข้าสู่ระบบล้มเหลว! เข้าสู่ระบบได้สำเร็จ errmsg = เซสชัน (ผ่าน) = จริง เซสชัน (ชื่อผู้ใช้) = Rs.Fields (ชื่อผู้ใช้) 'ระบุเซสชันการอนุญาตผู้ใช้ (USERID) = RS.Fields (USERID) สิ้นสุดถ้า สิ้นสุดถ้า สิ้นสุดถ้า สิ้นสุดถ้า 'หลังจากเข้าสู่ระบบล้มเหลวแบบฟอร์มการเข้าสู่ระบบจะถูกวาด ถ้าไม่ใช่เซสชัน (ผ่าน) = จริงแล้ว - <html> <head> <title> เอกสารชื่อ UNT </title> <style type = text/css> - .STYLE1 {FONT-SIZE: 12PX; FONT-WEIGH - </style> <style type = text/css> - .STYLE2 {FONT-SIZE: 12PX; FONT-WEIGH - </style> </head> <body leftmargin = 0 topMargin = 0 marginHeight = 0 marginWidth = 0 bgColor =#000000> <div id = สไตล์แม่ = ความสูง: 300; ความกว้าง: 450; สไตล์ชายแดน: ของแข็ง; สีชายแดน: #FFFFF; อัตรากำไรขั้นต้น: 80px; ระยะขอบซ้าย: 25%; สี: #ffffff> <div id = denglu style = font-size: 12px; font-weight: bold; พื้นหลัง-สี:#0099ff; text-allign: center; ความสูง: 40px;> <br> ระบบ ERP เข้าสู่ระบบ </div> <form action = <%= request.ServerVariables (path_info)%> method = post name = myform id = myform> <p class = style1> ชื่อผู้ใช้: <อินพุตชื่อ = ชื่อผู้ใช้ = ข้อความข้อความ = ชื่อผู้ใช้ = 18 maxLength = 20> </p> <p class = style1> รหัสผ่าน: <ชื่ออินพุต = userpwd type = รหัสผ่าน ID = userpwd size = 18 maxLength = 20> </p> <p allign = center class = style2> <%= errmsg%> </p> <p> <ประเภทอินพุต = ส่ง Align = ชื่อกลาง = ส่งค่า = เข้าสู่ระบบไปยังระบบ> <ชื่ออินพุต = rege type = button allign = middle onclick = location = 'register.asp' id = rege value = register user> register> </p> </form> </div> </body> </html> - '<p class = style1> รหัสการตรวจสอบ: <ชื่ออินพุต = checkCode type = text id = checkco |
แบ่งปัน: ASP การเรียนรู้การแสดงออกปกติ เราสามารถตรวจสอบความถูกต้องตามกฎหมายของข้อมูลต่าง ๆ ได้อย่างง่ายดายโดยวัตถุ "นิพจน์ทั่วไป" ก่อนอื่นมาทำความเข้าใจว่าวัตถุ "นิพจน์ทั่วไป" ของ VBScript คืออะไร
2 หน้ารวมหน้าก่อนหน้า 12 หน้าถัดไป