郭昊ASP.docx

上传人:b****4 文档编号:26958617 上传时间:2023-06-24 格式:DOCX 页数:20 大小:561.55KB
下载 相关 举报
郭昊ASP.docx_第1页
第1页 / 共20页
郭昊ASP.docx_第2页
第2页 / 共20页
郭昊ASP.docx_第3页
第3页 / 共20页
郭昊ASP.docx_第4页
第4页 / 共20页
郭昊ASP.docx_第5页
第5页 / 共20页
点击查看更多>>
下载资源
资源描述

郭昊ASP.docx

《郭昊ASP.docx》由会员分享,可在线阅读,更多相关《郭昊ASP.docx(20页珍藏版)》请在冰豆网上搜索。

郭昊ASP.docx

郭昊ASP

ASP.NET课程设计

——简单网页构建

设计题目

简单网页构建(见教材P53实验三)

范例

参考内容见《Web应用程序设计技术——ASP.NET》

【示例2.5】

Page类用户的登录系统

【示例4.19】

Web服务器控件

日历控件calendar

【示例5.1】

数据验证控件

——RequireFieldValidator控件

用于强制用户对页面上的输入控件输入信息

【示例5.3】

数据验证控件

——CompareValidator控件

用于比较两个控件的值是否相等

【示例5.4】

数据验证控件

——RangeValidator控件

用于测试输入值是否在给定范围之内

【示例9.7】

文件操作

网站计数器记录用户访问次数

课设的目的及主要功能

(一)、目的

Ø通过本次课程设计,可以培养独立思考、综合应用所学相关知识的能力,更好的巩固《Web应用程序设计技术——ASP.NET》课程学习的内容;掌握工程软件设计的基本方法,强化上机动手编程能力,闯过理论与实践相结合的难关!

Ø通过《Web应用程序设计技术——ASP.NET》课程设计,使学生了解并掌握设计过程和技巧,掌握基本的分析问题和利用计算机求解问题的能力,为后续各门计算机课程的学习和毕业设计打下坚实的基础。

Ø让自己更进一步了解ASP.NET技术的应用与各个控件的功能。

Ø通过该课程设计,让我们对Web表单控件、数据验证控件和文件及文件夹控件的应用有了更深的了解。

Ø使读者对ASP.NET有了解,ASP.NET是微软公司推出的一种Internet编译技术,它采用效率高的、面向对象的方法来创建动态Web应用程序。

它是建立在通用语言上的程序构架。

(二)、功能

Ø设计一个由ASP编写的链接网页并由Dreamweaver设计的主页进行链接。

设计过程及详细描述

一.布局

1、由Dreamweaver编写网站主页

2、用户登录

3、新成员注册

4、查看时间日期

5、查看日历

6、网站计数器

二.代码及说明

1)主页(主页用html编写)

<%@PageLanguage="VB"ContentType="text/html"ResponseEncoding="utf-8"%>

无标题文档

--

body{

margin-left:

200px;

margin-top:

50px;

margin-right:

200px;

background-color:

#CCCCCC;

}

.STYLE2{font-size:

36px;

font-family:

"汉仪萝卜体繁";

color:

#373737;

}

.STYLE5{color:

#404040;font-family:

"汉仪萝卜体繁";}

a:

link{

color:

#999999;

}

a:

visited{

color:

#404040;

}

a:

active{

color:

#404040;

}

.STYLE6{font-family:

"汉仪萝卜体繁"}

.STYLE7{font-size:

36px}

.STYLE8{font-family:

"汉仪萝卜体繁";font-size:

36px;}

-->

查看时间日期

查看日历

联系我们

主页Website

Web应用程序设计技术——ASP.NET

友情链接

用户登录

09级计算机网络



新成员注册

关于我们

郭昊

网站计数器

关于我们|联系方式|合作伙伴|版权声明|帮助信息|网站地图

Copyright2010©SonyEricssonMobileCommunicationsAB.Allrightsreserved

2)用户登录

--源文件:

web页面简介\page.aspx-->

<%@RegisterTagPrefix="Acme"TagName="Login"Src="page.ascx"%>

登录演示

SubPage_Load(SenderAsObject,EAsEventArgs)

If(Page.IsPostBack)

MyLabel.Text&="用户名:

"&MyLogin.UserId&"
"

MyLabel.Text&="密码:

"&MyLogin.Password&"
"

EndIf

EndSub

10ptverdana">

登录

Loginid="MyLogin"UserId=""Password=""BackColor="beige"runat="server"/>

Labelid="MyLabel"runat="server"/>

※调用代码page

--源文件:

web页面简介\page.ascx-->

PublicBackColorAsString="white"

PublicPropertyUserIdAsString

Get

ReturnUserName.Text

EndGet

Set

UserName.Text=Value

EndSet

EndProperty

PublicPropertyPasswordAsString

Get

ReturnPass.Text

EndGet

Set

Pass.Text=Value

EndSet

EndProperty

<%=BackColor%>;font:

10ptverdana;border-width:

1;

border-style:

solid;border-color:

black;"cellspacing=15>

用户名:

TextBoxid="UserName"runat="server"/>

密码:

TextBoxid="Pass"TextMode="Password"runat="server"/>

ButtonText="提交"runat="server"/>

3)新成员注册

RequiredFieldValidator控件的使用

                    用户姓名:

TextBoxId="txtName"Runat="Server"/>

RequiredFieldValidatorId="RFValid1"

ControlToValidate="txtName"Runat="Server">(*不可缺少)

RequiredFieldValidator>

                    用户称妮:

TextBoxId="txtid"Runat="Server"/>

RequiredFieldValidatorId="RFValid2"

ControlToValidate="txtid"Runat="Server">(*不可缺少)

RequiredFieldValidator>


                    请输入密码:

TextBoxId="txtPsw"TextMode="Password"runat="server"/>

RequiredFieldValidatorId="RFValid3"

ControlToValidate="txtPsw"Runat="Server">(*不可缺少)

RequiredFieldValidator>



                    请再次输入密码:

TextBoxId="txtConfirm"TextMode="Password"runat="server"/>

RequiredFieldValidatorId="RFValid4"

ControlToValidate="txtConfirm"Runat="Server">(*不可缺少)

RequiredFieldValidator>

CompareValidatorId="CValid1"runat="server"

ControlToValidate="txtConfirm"Type="String"

ControlToCompare="txtPsw"

Operator="Equal">

(所输入的密码不一致,请重新输入!

CompareValidator>

                    

                    电子邮件地址:

TextBoxId="txtE_mail"Runat="Server"/>

RequiredFieldValidatorId="RFValid0"

ControlToValidate="txtE_mail"Runat="Server">(*不可缺少)

RequiredFieldValidator>

RegularExpressionValidatorId="REValid5"Runat="Server"

ControlToValidate="txtE_mail"

ValidationExpression="[A-Za-z0-9_\-\.]{1,}@[A-Za-z0-9_\-\.]{3,}">

(请输入电子邮件地址)

RegularExpressionValidator>

                    家庭地址:

TextBoxId="txtAddr"Size=40Runat="Server"/>

RequiredFieldValidatorId="RFValid6"

ControlToValidate="txtAddr"Runat="Server">(*不可缺少)

RequiredFieldValidator>

RegularExpressionValidatorId="REValid7"Runat="Server"

ControlToValidate="txtAddr"

ValidationExpression=".{1,}[区,市]{1}.{1,}路[0-9]{1,}号[0-9]{1,}幢[0-9]{1,}室">

(请输入地址,如:

杭州市解放路834号15幢601室)

RegularExpressionValidator>

                            

ButtonId="Button1"Text="提交"

OnClick="Button1_Click"Runat="Server"/>


LabelId="Label1"Runat="Server"/>

LabelId="Label2"Runat="Server"/>

LabelId="Label3"Runat="Server"/>

SubButton1_Click(senderAsObject,eAsEventArgs)

IfPage.IsValidThen

DimResultAsString

Result="用户姓名:

"&txtName.Text&"
"

Result=Result&"用户称妮:

"&txtid.Text&"
"

Label1.Text=Result

Result="密码:

"&txtPsw.Text&"
"

Label2.Text=Result

Result="电子邮件:

"&txtE_mail.Text&"
"

Result=Result&"家庭地址:

"&txtAddr.Text&"
"

Label3.Text=Result

EndIf

EndSub

4)查看时间日期

<%@PageLanguage="VB"ContentType="text/html"ResponseEncoding="utf-8"%>

DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN""http:

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

//www.w3.org/1999/xhtml">

无标题文档

--

body{

margin-left:

200px;

margin-top:

50px;

margin-right:

200px;

}

.STYLE1{

font-size:

x-large;

font-weight:

bold;

font-style:

italic;

}

-->

您好,当前日期/时间为

--#BeginDateformat:

Ch2m-->2010年12月29日20:

55

--#EndDate-->

5)查看日历

Calendar控件的使用

CalendarId="Calendar1"SelectionMode="DayWeekMonth"

BackColor="LightBlue"ForeColor="Red"

BorderWidth=3BorderStyle="Solid"BorderColor="Red"

TitleStyle-BackColor="DarkBlue"ShowGridLines=True

                                                                                                                                NextPrevFormat="ShortMonth"

                                                                SelectMonthText="月"

                                SelectWeekText="周"

Runat="Server"/>

ButtonId="Button1"Text="改成图形符号"

OnClick="Button1_Click"Runat="Server"/>


SubButton1_Click(SenderAsObject,eAsEventArgs)

IfStrComp(Button1.Text,"改成图形符号")=0Then

'将链接符号改成图形符号

 Calendar1.NextMonthText=""

Calendar1.PrevMonthText=""

Calendar1.SelectWeekText=""

Calendar1.SelectMonthText=""

Button1.Text="改成字符符号"

Else

'将链接符号改成字符符号

 Calendar1.NextMonthText=">"

Calendar1.PrevMonthText="<"

Calendar1.SelectMonthText=">>"

Calendar1.SelectWeekText=">"

Button1.Text="改成图形符号"

EndIf

EndSub

6)网站计数器

<%@ImportNamespace="System.IO"%>

SubPage_Load(SenderAsObject,EAsEventArgs)

Dimvisit_NumberAsLong'定义计数器变量

Dimmy_fileAsString=Server.Mappath("counter.txt")'定义文件路径变量

DimCOUN_WAsStreamWriter'声明StreamWriter对象变量

DimCOUN_RAsStreamReader'声明StreamReader对象变量

IfFile.Exists(my_file)=FalseThen

'如果该文件不存在,就建立文件,并写入1。

COUN_W=NewStre

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

当前位置:首页 > 高等教育 > 农学

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

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