DSO - DIỄN ĐÀN SINH VIÊN ĐÀ LẠT

Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.

DIỄN ĐÀN SINH VIÊN ĐẠI HỌC ĐÀ LẠT


2 posters

    giúp đỡ về code ASP

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


    Giới tính : Nam
    Tổng số bài gửi : 1730
    Tuổi : 34
    Cảm ơn : 209

    giúp đỡ về code ASP Empty giúp đỡ về code ASP

    Bài gửi by ngocducqtk32 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:
    giúp đỡ về code ASP 1
    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:
    giúp đỡ về code ASP 2
    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:
    giúp đỡ về code ASP 3
    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!
    babyilou1
    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

    giúp đỡ về code ASP Empty Re: giúp đỡ về code ASP

    Bài gửi by babyilou1 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ả.

      Hôm nay: 2024-11-15, 16:55