ASPNET课程设计报告书Word文档下载推荐.docx

上传人:b****6 文档编号:18665773 上传时间:2022-12-31 格式:DOCX 页数:27 大小:301.85KB
下载 相关 举报
ASPNET课程设计报告书Word文档下载推荐.docx_第1页
第1页 / 共27页
ASPNET课程设计报告书Word文档下载推荐.docx_第2页
第2页 / 共27页
ASPNET课程设计报告书Word文档下载推荐.docx_第3页
第3页 / 共27页
ASPNET课程设计报告书Word文档下载推荐.docx_第4页
第4页 / 共27页
ASPNET课程设计报告书Word文档下载推荐.docx_第5页
第5页 / 共27页
点击查看更多>>
下载资源
资源描述

ASPNET课程设计报告书Word文档下载推荐.docx

《ASPNET课程设计报告书Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《ASPNET课程设计报告书Word文档下载推荐.docx(27页珍藏版)》请在冰豆网上搜索。

ASPNET课程设计报告书Word文档下载推荐.docx

13

5、注册页面·

17

6、发布信息页面·

19

7、聊天室页面·

21

七、课程设计小结·

23

一、课程设计的目的

通过利用A进行web应用程序的设计与开发,加深对web程序开发的基本知识的理解,掌握动态页面设计的基本方法和步骤,掌握程序调试的一般方法和技巧。

培养基本理论分析、解决实际问题的能力及锻炼写设计总结报告的能力。

二、课程设计的基本要求

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"

"

.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"

>

htmlxmlns="

.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="

sel

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 高中教育 > 语文

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1