ASP+เข้าถึงรหัสเข้าสู่ระบบของผู้ใช้ซึ่ง
ชื่อฐานข้อมูล huiyuan.mdb
Puser213 ชื่อตาราง
รายชื่อผู้ใช้ Y_USERNAME, ฟิลด์รหัสผ่าน y_password
login.htm หน้า
<head>
<metahttp-equiv = content-typecontent = text/html;
<title> เข้าสู่ระบบ </title>
</head>
<body>
<p> </p>
<formName = form1Method = postAction = loginNew.asp>
<TableWidth = 200Border = 1Align = CenterCellPadding = 0CellSpacing = 0>
<tr>
<tdColSpan = 2> <valign = center> เข้าสู่ระบบ </div> </td>
</tr>
<tr>
<TdWidth = 57> <Divalign = Center> ชื่อผู้ใช้ </div> </td>
<tdWidth = 137Valign = top> <putName = userNameType = text
id = userNamesize = 25> </td>
</tr>
<tr>
<td> <divalign = center> รหัสผ่าน </div> </td>
<tdValign = top> <putName = passwordType = รหัสผ่าน
id = รหัสผ่าน = 25> </td>
</tr>
<tr>
<tdColSpan = 2> <divalign = center>
<inputType = submitName = submentValue = submit>
</div> </td>
</tr>
</table>
</form>
</body>
</html>
loginNew.asp หน้าเว็บ
-
Dimusername, รหัสผ่าน
username = request.form (ชื่อผู้ใช้)
รหัสผ่าน = request.form (รหัสผ่าน)
setRs = server.createObject (adoDb.oldset)
conn = dbq =+server.mappath (huiyuan.mdb)+;
driver = {MicrosoftAccessDriver (*. mdb)};
sql = select*frombuser213 wherey_username = '& username &'
Rs.opensql, Conn, 1,1
ifrs.eofthen
Response.write <Script> การแจ้งเตือน ('เข้าสู่ระบบเข้าสู่ระบบล้มเหลว "; history.back (); </script>
Response.end
อื่น
IFRS (y_password) <> รหัสผ่านแล้ว
Response.write <Script> การแจ้งเตือน ('เข้าสู่ระบบเข้าสู่ระบบล้มเหลว "; history.back (); </script>
Response.end
endif
เซสชัน (admin) = ชื่อผู้ใช้
Response.write <Script> การแจ้งเตือน ('ความสำเร็จในการเข้าสู่ระบบ');
จุดสิ้นสุด
-