Xây Dựng trang đăng Kí (Access Database)
Tue Feb 26, 2013 5:12 pm
Registration là module cho phép một khách vãng lai đăng ký làm thành viên của website. Module này gồm một form đăng ký thành viên, 1 file asp xử lý form này, insert dữ liệu vào database. Ở database có một table tblUser chứa danh sách các thành viên của website
RegistrationForm.htm: trang này chứa form cho phép người dùng đăng ký.
RegistrationProcess.asp: trang này xử lý dữ liệu từ form trên, nếu hợp lệ thì insert dữ liệu vào database
Ngoài ra, để kết nối vào database chúng ta viết 1 file connection.asp chứa các hàm open và destroy connection rồi include file này vào các filem có nhu cầu truy cập database.
Trong Database chứa table : tblUser
Trang RegistrationForm.htm
Trang Connection.asp
Trang RegistrationProcess.asp
SinhvienIT
RegistrationForm.htm: trang này chứa form cho phép người dùng đăng ký.
RegistrationProcess.asp: trang này xử lý dữ liệu từ form trên, nếu hợp lệ thì insert dữ liệu vào database
Ngoài ra, để kết nối vào database chúng ta viết 1 file connection.asp chứa các hàm open và destroy connection rồi include file này vào các filem có nhu cầu truy cập database.
Trong Database chứa table : tblUser
Trang RegistrationForm.htm
- Code:
<html>
<head>
<title>Registration</title>
</head>
<body>
<form method="POST" action="RegistrationProcess.asp">
<p> Username: <input type="text" name="username“ ></p>
<p> Password: <input type=“password" name="password“ ></p>
<p> Confirm Password: <input type=“password" name="ConfirmPassword“
></p>
<p> Address: <input type="text" name="address"></p>
<p><input type="submit" value="Submit" name=“submit"></p>
</form>
</body>
</html>
Trang Connection.asp
- Code:
<%
dim conn
Sub openConn() ‘hàm mở connection tới DB
set conn=server.createobject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0; data
source="&server.mappath("myDB.mdb")&";"
conn.open connstr
End Sub
Sub destroyConn() ‘hàm đóng và hủy connection
conn.close
set conn=nothing
End Sub
%>
Trang RegistrationProcess.asp
- Code:
<!--#include file ="Connection.asp"-->
<%
username=request.form("username")
password=request.form("password")
confirmPassword=request.form("confirmPassword")
address=request.form("address")
‘ validate some information retrieved from submitted form
openConn
sql="insert into tblUser([username],[password],[address])
values('"&username&"','"&password&"','"&address&"')"
conn.execute sql
destroyConn
response.write "Successful Registration!"
%>
SinhvienIT
Permissions in this forum:
Bạn không có quyền trả lời bài viết