Hướng dẫn thiết kế : Thiết kế Forum nhanh chóng và đơn giản phần 2

Chia sẻ: Szfasf Fadsfs | Ngày: | Loại File: PDF | Số trang:8

Thêm vào BST

Báo xấu

121
lượt xem 15
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Bài 3: Chào mừng 1. Mở file ha_language_file_inc.asp a.1. Tìm dòng code Const strTxtFemale = "Nữ" a.2. Thêm xuống dưới Const strTxtWelcomeHA = "Chào mừng bạn đến với Cộng đồng ASP Việt Nam" Const strTxtWelcomeDetail1 = "Nếu là lần đầu tiên bạn duyệt Diễn đàn này, hãy click chuột vào" Const strTxtWelcomeDetail2 = "để hướng dẫn.

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: Hướng dẫn thiết kế : Thiết kế Forum nhanh chóng và đơn giản phần 2

Bài 3: Chào mừng 1. Mở file ha_language_file_inc.asp a.1. Tìm dòng code Const strTxtFemale = "Nữ" a.2. Thêm xuống d ưới Const strTxtWelcomeHA = "Chào mừng bạn đến với Cộng đồng ASP Việt Nam" Const strTxtWelcomeDetail1 = "Nếu là lần đầu tiên bạn duyệt Diễn đàn này, hãy click chuột vào" Const strTxtWelcomeDetail2 = "để xem hướng dẫn. Bạn nên" Const strTxtWelcomeDetail3 = "trước khi gửi bài. Để xem các bài viết, hãy chọn các Diễn đàn mà bạn muốn ở bên dưới. " 2. Mở file default.asp a.1. Tìm dòng code vbCrLf & " ") End If %> a.2. Thêm xuống d ưới + +
Bài 4: Thành viên tích cực – thành viên mới – chủ đề mới – bài viết mới 1. Mở file ha_language_file_inc.asp a.1. Tìm dòng code Const strTxtWelcomeDetail3 = "trước khi gửi bài. Để xem các bài viết, hãy chọn các Diễn đàn mà bạn muốn ở bên dưới. " a.2. Thêm xuống d ưới Const strTxtBestMember = "Thành viên tích cực" Const strTxtNewMember = "Thành viên mới" Const strTxtLastNewTopic = "Chủ đề mới" Const strTxtLastNewPost = "Bài viết mới" Const strTxtNoMember = "Không có Thành viên nào cả" Const strTxtNoTopic = "Không có Chủ đề nào cả" Const strTxtNoPost = "Không có Bài viết nào cả"
2. Mở file default.asp a.1. Tìm dòng code 'Clean up Call closeDatabase() a.2. Thay thế bằng 'Clean up 'Call closeDatabase() b.1. Tìm dòng code %> b.2. Thêm lên trên 'Clean up Set rsCommon = Nothing Call closeDatabase() c.1. Tìm dòng code c.2. Thêm xuống d ưới
+ + + + + + + +
Response.Write(vbCrLf & " " & strTxtNoMember) end if 'Clean up rsCommon.close %>
end if 'Clean up rsCommon.close %>
rsCommon.close %>
end if 'Clean up rsCommon.close %>