畢業(yè)設(shè)計(jì)-aspnet論壇系統(tǒng)bbs(參考版)
2024-12-07 20:15本頁面
【正文】 本次的畢業(yè)設(shè)計(jì)和論文使我對(duì)系統(tǒng)的建設(shè)有了深入的了解，而且也對(duì)網(wǎng)站建設(shè)軟件（ Dreamweaver MX）有了進(jìn)一步 的 認(rèn)識(shí)，也使我自己對(duì) 技術(shù) 數(shù)據(jù)庫管理軟件 有了一個(gè)層次的提高，但是在設(shè)計(jì)該系統(tǒng)時(shí)也有 很多對(duì)ASP 的不明白， 經(jīng)過不斷地查閱相關(guān)的資料和同學(xué)幫助才能完成。要用到的技術(shù)、方法與開發(fā)大型網(wǎng)站的相差無幾。由于時(shí)間關(guān)系，這個(gè) 網(wǎng)絡(luò)論壇 的 頁 面 不是很美觀，功能也設(shè)計(jì)的不是很多，還有很多不盡人意的地方。 經(jīng)過 反復(fù)的 測(cè)試，這些功能都能夠正確地運(yùn)行。 _ values(Topicid,title,content,userid,releasetime) cmdSql = New SqlCommand(strSql, conDataBase) (Topicid, TopicID) (title, ) (content, ) (userid, Session(userid)) (releasetime, ()) () strSql = update t_topic set f_replynum=f_replynum+1 where f_id=TopicID cmdSql = New SqlCommand(strSql, conDataBase) (TopicID, TopicID) () () DataGridBind() End If 后臺(tái) 功能的實(shí)現(xiàn)： 版塊管理 添加新版塊功能：先按增加鍵，然后彈出你要需要填寫的資料， Dim strBoardName, strComment As String Dim strSql As String If IsValid Then strBoardName = strComment = strSql = insert into t_board(f_boardname,f_ment,f_topium) values(BoardName,Comment,0) cmdSql = New SqlCommand(strSql, conDataBase) (BoardName, strBoardName) (Comment, strComment) () () () BindDataGrid() = False End If 刪除功能： Dim conTemp As SqlConnection Dim intBoardID As Integer intBoardID = () () cmdSql = New SqlCommand(select * from t_topic where f_boardid=BoardID, conDataBase) (Boardid, intBoardID) dtrRecords = () While () conTemp = New SqlConnection((dbconnstr)) () cmdSql = New SqlCommand(delete from t_reply where f_topicid=TopicID, conTemp) (Topicid, dtrRecords(f_id)) () () End While () cmdSql = New SqlCommand(delete from t_topic where f_boardid=BoardID, conDataBase) (Boardid, intBoardID) () cmdSql = New SqlCommand(delete from t_Board where f_id=BoardID, conDataBase) (Boardid, intBoardID) () () = 1 BindDataGrid() End Sub 主題管理： 功能實(shí)現(xiàn)： ： Dim intRecordID As Integer intRecordID = () () cmdSql = New SqlCommand(delete from t_reply where f_id=id, conDataBase) (id, intRecordID) () cmdSql = New SqlCommand(update t_topic set f_replynum=f_replynum1 where f_id=id, conDataBase) (id, TopicID) () () DataGridBind() ： Dim strTemp As String = BoardID = (BoardID) TopicID = (TopicID) = 1 = BoardID = 2 conDataBase = New SqlConnection((dbconnstr)) If Not IsPostBack Then () strSql = select * from t_topic,t_user where =topicid and = cmdSql = New SqlCommand(strSql, conDataBase) (topicid, TopicID) dtrRecords = () () = (images\{0}.gif, dtrRecords(f_imageid)) = dtrRecords(f_name) = dtrRecords(f_title) = dtrRecords(f_content) = dtrRecords(f_releasetime) () () DataGridBind() End If ：人員管理 功能實(shí)現(xiàn)： Dim conTemp As SqlConnection Dim intUserID As Integer intUserID = () () cmdSql = New SqlCommand(select * from t_reply where f_userid=UserID, conDataBase) (userid, intUserID) dtrRecords = () While () conTemp = New SqlConnection((dbconnstr)) () cmdSql = New SqlCommand(update t_topic set f_replynum=f_replynum1 where f_topicid=TopicID, conTemp) (Topicid, dtrRecords(f_topicid)) () () End While () cmdSql = New SqlCommand(select * from t_topic where f_userid=UserID, conDataBase) (userid, intUserID) dtrRecords = () While () conTemp = New SqlConnection((dbconnstr)) () cmdSql = New SqlCommand(update t_board set f_topium=f_topium1 where f_boardid=BoardID, conTemp) (Boardid, dtrRecords(f_Boardid)) () cmdSql = New SqlCom
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1