tailieunhanh - Code lập trình - Bài 13

Tài liệu tham khảo code lập trình về Bạn có gửi bài/không gửi bài theo từng Chủ đề và sắp xếp bài | Bài 13 Bạn có gửi bài không gửi bài theo từng Chủ đề Tác giả Phan Hồng Phúc phucorcl@ 1. Tạo file trong thư mục inlcudes có nội dung Dim rsParticipated if lngLoggedInUserID 2 then checks to see if it s a guest -- i m not sure exactly how to check if no user is logged in set rsParticipated 1 select top 1 from tblThread where lngTopicID AND lngLoggedInUserlD adoCon if NOT then a thread was found authored by them and they are not a guest img src . forum_images mod border 0 alt . strTxtYouHavePost . Whatever u need to indicate to the user that he she has participated in the forum else img src . forum_images mod border 0 alt . strTxtYouHaveNot . Whatever u need to indicate to the user that he she has participated in the forum end if rsParticipated. close set rsParticipated Nothing end if 1. Mo file . Tìm dòng code If blnAdmin OR blnModerator Then a href javascript winOpener TID IngTopicID strQsSID2 admin 1 1 480 265 img src . strlmagePath align absmiddle border 0 alt . strTxtTopicAdmin . a _ . Thêm xuống dưới vbCrLf -- include file includes -- vbCrLf 2. Mở file . Tìm dòng code If blnAdmin OR blnModerator Then a href javascript winOpener TID lngTopicID strQsSID2 admin 1 1 480 265 img src . strImagePath align absmiddle border 0 alt . strTxtTopicAdmin . a _ . Thêm xuống dưới vbCrLf -- include file includes -- vbCrLf 3. Mở file