giúp đỡ về code ASP

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down

giúp đỡ về code ASP

Bài gửi by ngocducqtk32 on 2010-04-20, 17:53

Chào các
bạn! Mình mới học lập trình web, mình đang thiết kết 1 trang web để cho
người dùng xem tin tức, mình thiết kết bảng (Table) dùng để lưu trữ tin
tức hàng ngày của mình như sau:
BAIVIET(ID,tieude,NDTomtat,NDChitiet,Tacgia,Ngayviet) trong đó ID là
khóa và mình cũng viết được trang web như sau:

nhìn cũng khá đẹp đúng không các bạn, nhưng mình muốn cải tiến trang
web của mình theo giống như trang web bên dưới đây:

mình muốn mỗi bài nó có 2 hoặc 3 tin con nằm bên dưới nó ví dụ trong
trang web trên thì tin đầu tiên là:"Dự đoán kết quả MC-MU...." xong bên
dưới nó có hai tin nữa là:
Công bố kết quả dự đoán trận RM - Bẩc.
Công bố kết quả dự đoán trận MU-Chease.
khi nhấp vào nút xem thêm bên phải mỗi tin đó thì hiện ra toàn bộ các
tin túc giống như thế này:

Còn khi nhấp vào từng tin con bên dưới thì nó sẽ mở ra nội dung của
tin đó.
Mong các bạn giúp dùm mình, vì mình đang rất muốn học cách viết như
thế. mong các bạn HD mình thiết kế CSDL để lưu trữ tin và các lập trình
để được kết quả như trên.
còn đây là code của mình viết để tạo trang như hình 1:
<%Session.Codepage=65001%>

<%
StrSQL="Select * from Baiviet ORDER BY Mabaiviet DESC"
rs.cursorLocation=3
rs.Pagesize=10
rs.open strSQL,oConn,0,1

if request("ViewPage")<>"" then
Session("CurrentPage")=cint(request("ViewPage"))
else
Session("CurrentPage")=cint(Session("CurrentPage"))+Request("Page")
end if
if cint(session("CurrentPage"))<1 then
session("CurrentPage")=1
end if
if cint(session("CurrentPage"))>rs.pagecount then
session("CurrentPage")=rs.pagecount
end if

if not rs.eof then
rs.absolutePage=session("CurrentPage")
end if
%>






Tin tức




style="border-collapse:collapse" bordercolor="#00FF00">






<%
while not rs.eof and rs.absolutePage=session("CurrentPage")
%>










<%
rs.movenext
wend
%>





height="1">size="7"> 
TIN TỨC

                 &nbs

p;              NEWS

>


       Trang

<%=Session("CurrentPage")%>/<%=rs.pagecount%>


Bài

viết 
         
Quản lý bài
viết



href=NDChitiet.asp?IDBaiviet=<%=rs.fields("Mabaiviet")%>
target="_blank">
color="#0000FF"><%=rs.fields("Tieude")%>



<% if rs("File")<>"" then%>
"
width="112" height="109" hspace="3" alt="" vspace="1">
<%else%>
hspace="3" alt="" vspace="1">
<%end if%>
colspan="2"><%=rs.fields("NDTomTat")%>



href=NDChitiet.asp?IDBaiviet=<%=rs.fields("Mabaiviet")%>
target="_blank">Chi tiết...


<%if cint(session("CurrentPage"))>1 then%>
[You must be registered and logged in to see this link.]
<%end if%>

<%
if (cint(session("CurrentPage"))+2)<=rs.pagecount
then
for i=cint(session("CurrentPage")) to
cint(session("CurrentPage"))+2
'response.write " "
%>
>
<%=i%>

<%
next
else
for i=cint(session("CurrentPage")) to rs.pagecount
'response.write " ; "
%>
>
<%=i%>

<%
next
end if
%>
  ...
bordercolor="#CCFF00">
<%if cint(session("CurrentPage"))
[You must be registered and logged in to see this link.]
<%
end if
rs.close
%>


Rất mong các bạn giúp đỡ, cám ơn!
Chào trân trọng!

ngocducqtk32
Quản trị viên
Quản trị viên

Giới tính: Nam
Tổng số bài gửi: 1732
Tuổi: 21
Cảm ơn: 204

http://shockhang.com

Về Đầu Trang Go down

Re: giúp đỡ về code ASP

Bài gửi by babyilou1 on 2010-09-07, 02:28

Để làm như vật bạn chỉ cần viết 2 cái User Control.
1 cái User Control dùng để lấy các tin mới nhất(có thể lấy 1 hay nhiều tin)
cái thứ 2 là các bài viết liên quan chèn vào dưới cái trên
Chỉ vậy thôi chứ CSDL cũng không cần phải thiết kế gi phức tạp cả.

babyilou1
Lao công tạp vụ
Lao công tạp vụ

Giới tính: Nam
Tổng số bài gửi: 12
Cảm ơn: 6

http://raovatdl.com, http://dauviet.com

Về Đầu Trang Go down

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang

- Similar topics

Permissions in this forum:
Bạn không có quyền trả lời bài viết