• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Làm chương trình có CSDL ở web

Các bài viết hướng dẫn và tham khảo chung, không thuộc ngôn ngữ nào

Điều hành viên: vietluyen

Hình đại diện của người dùng
Sweet Love
Thành viên tích cực
Thành viên tích cực
Bài viết: 159
Ngày tham gia: T.Bảy 06/06/2009 1:37 pm
Đến từ: Xuân Dương - Triệu Trung - Triệu Phong - Quảng Trị
Liên hệ:

Làm chương trình có CSDL ở web

Gửi bàigửi bởi Sweet Love » T.Năm 05/08/2010 8:00 am

Tên bài viết: Làm chương trình có CSDL ở web
Tác giả: Sưu tầm
Cấp độ bài viết: Chưa đánh giá
Tóm tắt: Làm chương trình có CSDL ở web. Yêu cầu: Có hiểu biết về ASP, VBScript và Visual Basic 6.


Ý tưởng: Sử dụng trang web ASP để thực hiện
I. Thiết kế trang ASP
1. Login.ASP
  1. <%
  2. Set Conn =  Server.CreateObject("ADODB.Connection")
  3. Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db\db.mdb") & ";Persist Security Info=False;"
  4. UN = Request("UN")
  5. PW = Request("PW")
  6. strSQL = "SELECT * FROM tblUser WHERE ID = '" & UN & "' AND PW = '" & PW & "'"
  7. Set rs = Conn.Execute(strSQL)
  8. %>
  9. <html>
  10. <head>
  11. <Title><%If rs.EOF Then%>
  12. Error Login
  13. <%Else%>
  14. Login Successfully
  15. <%End If%>
  16. </head>
  17. </html>
  18.  

Sau đó đưa trang này lên Host. Ở đây ta sử dụng Host ảo (Internet Information Service) của Windows để Test.
Đưa đĩa WinXP vào để cài (Trong Add/Remove Programs --> Windows Compoments)
Xong chép file vào C:\Inetpub\wwwroot\
Tạo CSDL db.mdb (Thiết kế tblUser gồm 2 trường ID và PW) chép vào C:\Inetpub\wwwroot\db\
==> Xong phần Server
2. Thiết kế Form login (VB)
Text1: txtID
Text2: txtPW
Button1: cmdLogin
WebBrowse1: w (Sử dụng Microsoft Internet Controls gì đó)
  1. Private Sub cmdLogin_Click()
  2. If Len(txtID) And Len(txtPW) Then W.Navigate "http://localhost/login.asp?UN=" & txtID.Text & "&PW=" & txtPW.Text
  3. End Sub
  4.  
  5. Private W_OnTitleChange(Byval Text As String)
  6. If Instr(1, Text, "Successfully") Then
  7. Msgbox "Bạn đã đăng nhập thành công"
  8. ElseIf InStr(1, Text, "Error") Then
  9. Msgbox "Tài khoản hoặc mật khẩu không đúng"
  10. End If
  11. End Sub
  12.  

==> Xong phần Form.
Bây giờ bạn Test thử xem nào.


Nguyễn Xuân Khánh
Lớp 11B1 trường THPT Nguyễn Huệ thị xã Quảng Trị

lachinhan
Thành viên chính thức
Thành viên chính thức
Bài viết: 24
Ngày tham gia: T.Năm 16/10/2008 1:18 pm
Has thanked: 3 time

Re: Làm chương trình có CSDL ở web

Gửi bàigửi bởi lachinhan » T.Năm 05/08/2010 10:27 am

Test cái gì đây ??? có src code thì tốt. Host sd host free cũng dc mà

MrB
Thành viên tích cực
Thành viên tích cực
Bài viết: 158
Ngày tham gia: T.Tư 26/03/2008 7:03 pm
Been thanked: 1 time

Re: Làm chương trình có CSDL ở web

Gửi bàigửi bởi MrB » T.Năm 05/08/2010 11:27 am

Vẫn chưa hiểu mục đích của cái này lắm.
Tại sao bạn phải tạo trang asp khi mdb hỗ trợ remote access?
Với lại khi truyền password nên dùng phương thức POST, ko nên dùng GET

Hình đại diện của người dùng
andylam1992
Thành viên danh dự
Thành viên danh dự
Bài viết: 380
Ngày tham gia: T.Hai 06/04/2009 12:57 pm
Đến từ: TP.HCM Q5
Has thanked: 2 time
Been thanked: 4 time
Liên hệ:

Re: Làm chương trình có CSDL ở web

Gửi bàigửi bởi andylam1992 » T.Năm 05/08/2010 8:51 pm

làm bằng ngôn ngữ gì thế? Ai lại để luôn nguyên cái sqlstring vào trang login, để người ta hack à. Không khả thi lắm.Nhưng bạn cũng có thể viết tiếp để xem khúc sau có cải thiện và có ứng dụng gì cho mọi người.

不相信未作牺牲竟先可拥有
只相信是靠双手找到我欲求
Cần - Kiệm- Liêm(liêm kiết) - Nghĩa - Chí - Tín

Hình đại diện của người dùng
Sweet Love
Thành viên tích cực
Thành viên tích cực
Bài viết: 159
Ngày tham gia: T.Bảy 06/06/2009 1:37 pm
Đến từ: Xuân Dương - Triệu Trung - Triệu Phong - Quảng Trị
Liên hệ:

Re: Làm chương trình có CSDL ở web

Gửi bàigửi bởi Sweet Love » CN 08/08/2010 8:31 am

Thì mình nói phải có hiểu biết về ASP rồi mà.
Bạn không biết ASP nên mới nói như vậy.
Hơn nữa đây mới chỉ là ý tưởng thôi, ai muốn phát triển hơn thì phải nghiên cứu hơn nữa chứ.
Nguyễn Xuân Khánh
Lớp 11B1 trường THPT Nguyễn Huệ thị xã Quảng Trị


Quay về “Bài viết hướng dẫn”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.0 khách