ASPNET课程设计文档格式.docx
《ASPNET课程设计文档格式.docx》由会员分享，可在线阅读，更多相关《ASPNET课程设计文档格式.docx（27页珍藏版）》请在冰豆网上搜索。
二、课程设计的基本要求
1.本课程设计要求学生用A技术开发一个动态网站，利用B/S结构，能将客户端的用户请求提交给服务器端的程序处理。
服务器端程序能完成数据的插入、删除、更新以及将用户请求的查询数据返回客户端。
2.课程设计结束后，每位同学独立提交一份web课程设计报告，内容包括总体设计和算法分析，主要流程，测试数据及测试过程，遇到的问题及解决方法等
3.界面截图里要有代表性的数据。
三、课程设计的内容
题目：
基于Web的房屋出租信息发布系统
功能要求：
1.用户管理功能，包括：
用户注册，登录认证，修改个人信息；
2.房屋出租信息发布：
注册用户登录后可发布，查询，修改，删除自己发布的房屋出租信息；
3.房屋信息查询：
游客可按房屋类型，所处街道或出租价格查询相应的房屋出租信息。
4.简易论坛或聊天室
四、流程图
五、数据库
SQLServer中数据库里建立了三张表，分别是User表（用户信息表）、Fw表（房屋出租信息表）和chat表（聊天记录表）。
1.User表中字段：
id,pwd,name,sex
2.Fw表中字段：
id,编号,类型,街道，价格
3.chat表中字段：
id,stext,stime
六、页面代码
1、登陆页面
前端代码：
<
%@PageLanguage="
VB"
AutoEventWireup="
false"
CodeFile="
ulogin.aspx.vb"
Inherits="
_Default"
%>
!
DOCTYPEhtmlPUBLIC"
-//W3C//DTDXHTML1.0Transitional//EN"
"
http:
//www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"
>
htmlxmlns="
//www.w3.org/1999/xhtml"
headrunat="
server"
<
title>
/title>
/head>
body>
center>
h1>
房屋出租系统<
/h1>
formid="
form1"
runat="
asp:
LabelID="
Label1"
Text="
用户名：
"
/asp:
Label>
TextBoxID="
idtext"
TextBox>
br/>
Label2"
密 码：
pwdtext"
textmode="
password"
ButtonID="
youke"
游客 "
/>
login"
登录 "
uzc"
注册 "
/form>
/center>
/body>
/html>
后台代码：
ImportsSystem.Data.SqlClient
ImportsSystem.Data
PartialClass_Default
InheritsSystem.Web.UI.Page
ProtectedSublogin_Click（senderAsObject,eAsEventArgs）Handleslogin.Click
DimidAsString=idtext.Text.Trim（）
DimpwdAsString=pwdtext.Text.Trim（）
DimconnAsNewSqlConnection（"
server=.;
database=fwcz;
uid=sa;
pwd=91569;
）
DimsqltextAsString="
select*from[User]whereid='
+id+"
'
andpwd='
+pwd+"
Try
conn.Open（）
DimsqlcomAsSqlCommand=NewSqlCommand（sqltext,conn）
Ifsqlcom.ExecuteScalar（）<
NothingThen
Session.Add（"
login_name"
id）
conn.Close（）
Response.Redirect（"
user.aspx"
Else
Response.Write（"
script>
alert（'
账号密码错误！
）<
/script>
EndIf
Ifconn.State=ConnectionState.OpenThen
CatchexAsException
EndTry
EndSub
ProtectedSubuzc_Click（senderAsObject,eAsEventArgs）Handlesuzc.Click
uzc.aspx"
ProtectedSubyouke_Click（senderAsObject,eAsEventArgs）Handlesyouke.Click
"
guest"
main.aspx"
EndClass
2、用户中心页面
user.aspx.vb"
user"
DOCTYPEhtml>
metahttp-equiv="
Content-Type"
content="
text/html;
charset=utf-8"
/>
h2>
用户中心<
/h2>
请重新登陆！
ForeColor="
#0033CC"
br/>
Label"
根据编号：
TextBox1"
Button5"
删除"
style="
height:
21px"
Button>
Button2"
首页 "
Button3"
发布 "
Button1"
个人信息"
Button4"
聊天室"
PartialClassuser
ProtectedSubPage_Load（senderAsObject,eAsEventArgs）HandlesMe.Load
If（Session（"
）<
Nothing）Then
DimidAsString=Session（"
）.ToString（）
Label1.Text=id+"
欢迎您！
您的发布如下：
select*from[Fw]whereid='
DimsqlcmdAsSqlCommand=NewSqlCommand（sqltext,conn）
DimobjectreaderAsSqlDataReader
DimiAsInteger
DimfwAsString
objectreader=sqlcmd.ExecuteReader（）
fw="
tableborder=2>
fw+="
tr>
Fori=0Toobjectreader.FieldCount-1
td>
+objectreader.GetName（i）+"
/td>
Next
/tr>
Whileobjectreader.Read（）
+CStr（objectreader.GetValue（i））+"
EndWhile
/table>
Label2.Text=fw
Else:
用户过期，请重新登陆！
）;
window.location.href='
ulogin.aspx'
ProtectedSubButton1_Click（senderAsObject,eAsEventArgs）HandlesButton1.Click
userinfo.aspx"
ProtectedSubButton2_Click（senderAsObject,eAsEventArgs）HandlesButton2.Click
ProtectedSubButton3_Click（senderAsObject,eAsEventArgs）HandlesButton3.Click
fatie.aspx"
ProtectedSubButton4_Click（senderAsObject,eAsEventArgs）HandlesButton4.Click
chat.aspx"
ProtectedSubButton5_Click（senderAsObject,eAsEventArgs）HandlesButton5.Click
DimnAsString=TextBox1.Text.Trim（）
DELETEFROM[Fw]WHEREid='
and编号='
+n+"
sqlcom.ExecuteNonQuery（）
删除成功！
user.aspx'
3、个人信息页面
userinfo.aspx.vb"
userinfo"
您的个人信息<
Label10"
Label11"
Label6"
姓名：
Label7"
Label8"
性别：
Label9"
信息完善与修改<
姓 名：
性 别：
DropDownListID="
DropDownList1"
ListItemValue="
男"
ListItem>
女"
DropDownList>
更新 "
修改密码<
Label3"
原密码：
oldpwd"
Label4"
新密码：
newpwd1"
Label5"
newpwd2"
修改 "
PartialClassuserinfo
DimsAsString=DropDownList1.Text
update[User]setname='
sex='
+s+"
whereid='
更新成功！
Label11.Text=id
Dimsqltext1AsString="
selectnamefrom[User]whereid='
+ID+"
Dimsqltext2AsString="
selectsexfrom[User]whereid='
Dimsqlcom1AsSqlCommand=NewSqlCommand（sqltext1,conn）
Dimsqlcom2AsSqlCommand=NewSqlCommand（sqltext2,conn）
升级会员 