ASP.NET应用程序设计实验报告_第1页
ASP.NET应用程序设计实验报告_第2页
ASP.NET应用程序设计实验报告_第3页
ASP.NET应用程序设计实验报告_第4页
ASP.NET应用程序设计实验报告_第5页
已阅读5页，还剩37页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

.z.实验报告课程名称：ASP.NET应用程序设计院系：计算机学院专业班级：17级软件工程学号：1700000000学生：*****开课时间：2017至2018学年第1学期-.z.师学院计算机学院《ASP.NET应用程序设计》课程验证性实验报告实验名称网页制作实验时间学生***实验地点同组人员无专业班级软件工程实验目的了解

IIS

的基本配置方法，熟悉.NET

开发环境掌握HTML文档结构、编写方法及常用标记熟悉HTML文档结构及常用标记的语法。学会编写简单网页掌握表格的建立方法。掌握表单的建立方法。2、实验主要仪器设备和材料：硬件：微型计算机软件：IIS服务器、文档编辑器3、实验容和原理：1.IIS的安装

2.IIS基本配置

（1）IP地址的设置

（2）主目录的设置

（3）默认文档的设置

（4）虚拟目录的建立

（5）测试IIS的安装状况3.网页制作：在网页上创建一个货品价格表。4、实验步骤打开记事本，输入一下代码，并以t1-1.html为文件名保存该文件；<html><head><title>欢迎查看货品表</title></head><bodybgcolor="*ddeeff"><center><tableborder="1"cellspacing="2"cellpadding="4"bordercolor="blue"><caption><fontsize="6"color="red"face="隶书">货品价格表</font></caption><trbgcolor="*ccffff"forecolor="white"><th>名称</th><th>编号</th><th>类别</th><th>单价</th><th>数量</th><th>备注</th><th>详情</th></tr><tr><td>机</td><td>1001</td><td>小家电</td><td>80</td><td>100</td><td>最低8折</td><td><ahref="detail.html"></a>查看详情</td></tr><tr><td>MP5</td><td>1002</td><td>数码产品</td><td>2080</td><td>100</td><td>最低8.5折</td><td><ahref="detail.html"></a>查看详情</td></tr><tr><td>电冰箱</td><td>1003</td><td>小家电</td><td>2198</td><td>100</td><td> </td><td><ahref="detail.html"></a>查看详情</td></tr><tr><td>电子词典</td><td>1004</td><td>数码产品</td><td>196</td><td>100</td><td> </td><td><ahref="detail.html"></a>查看详情</td></tr></table></center></body></html>2.在浏览器打开t1-1.html文件，查看该网页的浏览结果。5、实验现象、实验数据记录：实验现象：实验结论：通过本次实验，我了解了

IIS

的基本配置方法，熟悉.NET

开发环境，学会了简单的网页制作和表格的制作。成功完成了页面的显示。达到了实验目的与要求。指导教师评语和成绩评定：实验报告成绩：指导教师签字：年月日-.z.师学院计算机学院《ASP.NET应用程序设计》课程验证性实验报告实验名称VB.NET基本程序设计实验时间学生***实验地点同组人员无专业班级软件工程1、实验目的掌握启动与退出VB.NET的方法。掌握建立、编辑和运行一个简单的VB.NET应用程序的全过程。掌握VisualBasic.NET语言的数据类型、常量、变量及运算符的使用方法。掌握分支条件语句的使用。掌握表达式、赋值语句的正确书写规则，掌握常用函数的使用。2、实验主要仪器设备和材料：硬件：微型计算机软件：MicrosoftVisualstudioIIS服务器3、实验容和原理：完成课后实验二的第一个第二个和第三个实验。输入一个整数，判断它是正数、负数还是零。根据输入的日期，显示输入日期的后一天。对整数数组排序。4、实验方法、步骤：实验T2-1T2-1.asp*:<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T2-1.asp*.vb"Inherits="T2_1"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title><styletype="te*t/css">.style1{width:350p*;border:1p*solid*000000;background-color:*CCCC00;}</style></head><body><center><h3align="center">请输入一个整数</h3><formid="form1"runat="server"><div><tableclass="style1"><tr><td>请输入一个整数为：</td><td><asp:Te*tBo*ID="T*tInt"runat="server"></asp:Te*tBo*></td></tr><tr><td> </td><td><asp:ButtonID="BtnE*e"runat="server"Te*t="提交"/></td></tr></table></div><p><asp:LabelID="Lb1Desc"runat="server"ForeColor="Red"></asp:Label></p></form></center></body></html>T2-1.asp*.vbProtectedSubBtnE*e_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtnE*e.ClickIfT*tInt.Te*t=""ThenLb1Desc.Te*t="整数值不能为空，请输入！"ElseDimmAsIntegerm=CInt(T*tInt.Te*t)Ifm<0ThenLb1Desc.Te*t="您输入的整数值为负数！"ElseIfm>0ThenLb1Desc.Te*t="您输入的整数值为正数！"ElseLb1Desc.Te*t="您输入的整数值为零！"EndIfEndIfEndIfEndSubEndClass实验T2-2T2-2.asp*:<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T2-2.asp*.vb"Inherits="T2_2"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title><styletype="te*t/css">.style1{width:550p*;border:1p*solid*000000;background-color:*CCCC00;}</style></head><body><formid="form1"runat="server"><center><h3align="center">请您输入年、月、日</h3><div><tableclass="style1"><tr><td><asp:Te*tBo*ID="T*tYear"runat="server"></asp:Te*tBo*>年</td><td><asp:Te*tBo*ID="T*tMonth"runat="server"></asp:Te*tBo*>月</td><td><asp:Te*tBo*ID="T*tDate"runat="server"></asp:Te*tBo*>日</td></tr><tr><td><asp:ButtonID="BtnE*e"runat="server"Te*t="提交"/></td><td> </td><td> </td></tr></table></div></center><palign="center"><asp:LabelID="LblCaution"runat="server"></asp:Label></p></form></body></html>T2-2.asp*.vb:PartialClassT2_2ProtectedSubTe*tBo*3_Te*tChanged(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesT*tYear.Te*tChangedEndSubProtectedSubBtnE*e_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtnE*e.ClickIfT*tYear.Te*t=""OrT*tMonth.Te*t=""OrT*tDate.Te*t=""ThenLblCaution.Te*t="年、月、日值不能为空，请输入！"ElseIfCInt(T*tYear.Te*t)<0OrCInt(T*tMonth.Te*t)<0OrCInt(T*tDate.Te*t)<0ThenLblCaution.Te*t="年、月、日值不能为负，请重新输入！"ElseDimLeapAsBoolean=FalseDimYAsInteger=CInt(T*tYear.Te*t)IfYMod4=0ThenIfYMod100=0ThenIfYMod400=0ThenLeap=TrueEndIfElseLeap=TrueEndIfEndIfDimM,D,NY,NM,NDAsIntegerM=CInt(T*tMonth.Te*t)D=CInt(T*tDate.Te*t)SelectCaseMCase1,3,5,7,8,10IfD=31ThenNY=Y:NM=M+1:ND=1ElseNY=Y:NM=M:ND=D+1EndIfCase4,6,9,11IfD=30ThenNY=Y:NM=M+1:ND=1ElseNY=Y:NM=M:ND=D+1EndIfCase2IfD=29ThenIfLeapThenNY=Y:NM=M+1:ND=1ElseLblCaution.Te*t="输入的日值有错，请重新输入！"EndIfElseIfD=28ThenIfLeapThenNY=Y:NM=M:ND=D+1ElseNY=Y:NM=M+1:ND=1EndIfElseLblCaution.Te*t="ERROR"EndIfEndIfCase12IfD=31ThenNY=Y+1:ND=1ElseNY=Y:NM=M:ND=D+1EndIfEndSelectLblCaution.Te*t=LblCaution.Te*t&"后一天为"&CStr(NY）&“-”&CStr(NM)&“-”&CStr(ND)EndIfEndIfEndSubEndClass实验T2-3T2-3.asp*:<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T2-3.asp*.vb"Inherits="T2_3"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><body><h3align="center">对整数数组排序</h3><formid="form1"runat="server"><div><center><asp:LabelID="Lb1Res"runat="server"></asp:Label></center></div></form></body></html>T2-3.asp*.vb：PartialClassT2_3ProtectedSubPage_Load(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesMe.LoadDimA()AsInteger={10,100,28,9,18,36,59,90}Dimj,k,min,tempAsIntegerDimnAsInteger=UBound(A)Fori=0Ton-1k=i:min=A(i)Forj=i+1TonIfA(j)<minThenk=j:min=A(j)EndIfNe*tIfi<>kThentemp=A(i):A(i)=A(k):A(k)=tempEndIfNe*tForEachiInALb1Res.Te*t=Lb1Res.Te*t&""&CStr(i)Ne*tEndSubEndClass5、实验现象、实验数据的分析：实验T2-1：实验T2-2：实验T2-3：6、实验结论：通过这次实验，我对基本控件的使用有了基本的掌握，掌握了赋值表达式，if语句的使用有了进一步的了解，并且学会使用数组并对数组进行排序。指导教师评语和成绩评定：实验报告成绩：指导教师签字：年月日师学院计算机学院《ASP.NET应用程序设计》课程验证性实验报告实验名称VB.NET过程和函数实验时间学生***实验地点同组人员无专业班级软件工程1、实验目的了解VB.NET系统对计算机软、硬件的要求。掌握数组的定义和使用的基本的方法。掌握建立、编辑和运行一个简单的VB.NET应用程序的全过程。2、实验主要仪器设备和材料：硬件：微型计算机软件：MicrosoftVisualstudioIIS服务器3、实验容和原理：完成课后实验三的第一个第二个和第三个实验。根据输入日期，显示输入日期的前一天和后一天。输入两个整数，求它们的最小公倍数和最大公约数。统计字符串2在字符串1中出现的次数和位置。4、实验方法、步骤：实验T3-1T3-1.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T3_1.asp*.vb"Inherits="T3_1"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><bodystyle="te*t-align:center"><formid="form1"runat="server"><center><h3align="center">请您输入二个整数</h3><div>您要输入的整数为：<asp:Te*tBo*ID="T*tInt1"runat="server"></asp:Te*tBo*>和<asp:Te*tBo*ID="T*tInt2"runat="server"></asp:Te*tBo*></div><p><asp:ButtonID="BtnE*e"runat="server"Te*t="计算"/></p></center><p><asp:LabelID="LblDesc"runat="server"></asp:Label></p></form></body></html>T3-1.asp*.vb：PartialClassT3_1Functionhcf(ByValmAsInteger,ByValnAsInteger)AsIntegerDimt,rAsIntegerIfm<nThent=m:m=n:n=tEndIfr=mModnWhiler<>0m=n:n=r:r=mModnEndWhilehcf=nEndFunctionFunctionlcd(ByValmAsInteger,ByValnAsInteger,ByValhAsInteger)AsIntegerlcd=m*n/hEndFunctionProtectedSubBtnE*e_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtnE*e.ClickIfT*tInt1.Te*t=""OrT*tInt2.Te*t=""ThenLblDesc.Te*t="整数值不能为空，请输入！"ElseDimm,n,h,lAsIntegerm=Val(T*tInt1.Te*t)n=Val(T*tInt2.Te*t)h=hcf(m,n)l=lcd(m,n,h)LblDesc.Te*t="最大公约数为："&CStr(h)&"最小公倍数为："&CStr(l)EndIfEndSubEndClass实验T3-2T3-2.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T3_2.asp*.vb"Inherits="T3_2"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title><styletype="te*t/css">.style1{width:550p*;border:1p*solid*000000;background-color:*CCCC00;}</style></head><bodystyle="te*t-align:center"><center><h3align="center">请您输入年、月、日<formid="form1"runat="server"><div><tableclass="style1"><tr><td><asp:Te*tBo*ID="T*tYear"runat="server"></asp:Te*tBo*>年</td><td><asp:Te*tBo*ID="T*tMonth"runat="server"></asp:Te*tBo*>月</td><td><asp:Te*tBo*ID="T*tDate"runat="server"></asp:Te*tBo*>日</td></tr><tr><td> </td><td><asp:ButtonID="BtnE*e"runat="server"Te*t="提交"style="height:26p*"/></td><td> </td></tr></table></div><asp:LabelID="LblCaution"runat="server"></asp:Label></form></center><p> </p></body></html>T3-2.asp*.vb：PartialClassT3_2FunctionPreDay(ByValyAsInteger,ByValmAsInteger,ByValdAsInteger)AsStringDimPreDAsDateTimeDimpreyear,premonth,predateAsStringPreD=DateAdd("d",-1,DateSerial(y,m,d))preyear=Year(PreD)premonth=Month(PreD)predate=Day(PreD)PreDay=preyear&"-"&premonth&"-"&predateEndFunctionFunctionNe*tDay(ByValyAsInteger,ByValmAsInteger,ByValdAsInteger)AsStringDimNe*tDAsDateTimeDimne*tyear,ne*tmonth,ne*tdateAsStringNe*tD=DateAdd("d",1,DateSerial(y,m,d))ne*tyear=Year(Ne*tD)ne*tmonth=Month(Ne*tD)ne*tdate=Day(Ne*tD)Ne*tDay=ne*tyear&"-"&ne*tmonth&"-"&ne*tdateEndFunctionProtectedSubBtnE*e_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtnE*e.ClickIfT*tYear.Te*t=""OrT*tMonth.Te*t=""OrT*tDate.Te*t=""ThenLblCaution.Te*t="年、月、日值不能为空，请输入！"ElseIfCInt(T*tYear.Te*t)<0OrCInt(T*tMonth.Te*t)<0OrCInt(T*tDate.Te*t)<0ThenLblCaution.Te*t="年、月、日值不能为负，请输入！"ElseDimYAsInteger=CInt(T*tYear.Te*t)DimMAsInteger=CInt(T*tMonth.Te*t)DimDAsInteger=CInt(T*tDate.Te*t)LblCaution.Te*t="前一天为："&PreDay(Y,M,D)&",后一天为："&Ne*tDay(Y,M,D)EndIfEndIfEndSubEndClass实验T3-3T3-3.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T3_3.asp*.vb"Inherits="T3_3"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><bodystyle="te*t-align:center"><center><h3align="center">请您输入两个字符串</h3></center><formid="form1"runat="server"><div>请输入：串1：<asp:Te*tBo*ID="T*tStr1"runat="server"></asp:Te*tBo*>     串2：<asp:Te*tBo*ID="T*tStr2"runat="server"></asp:Te*tBo*><br/></div> <asp:ButtonID="BtnE*e"runat="server"style="width:56p*;height:26p*"Te*t="统计"/><p><asp:LabelID="LbllDesc"runat="server"></asp:Label></p></form></body></html>T3-3.asp*.vb:PartialClassT3_3FunctionFindStr(ByValstr1AsString,ByValstr2AsString,ByValcount()AsInteger)AsBooleanDimstlenAsInteger=Len(str2)Dimi,k,LAsIntegerDimsAsString=str1i=0:L=0Whiles<>""k=InStr(s,str2)LbllDesc.Te*t=LbllDesc.Te*t&CStr(k)Ifk=0ThenE*itWhileElseL=L+kcount(i)=LL=L+stlen-1i=i+1s=Mid(s,k+stlen)EndIfEndWhileIfL=0ThenFindStr=FalseElseFindStr=TrueEndIfEndFunctionProtectedSubBtnE*e_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtnE*e.ClickIfT*tStr1.Te*t=""OrT*tStr2.Te*t=""ThenLbllDesc.Te*t="输入不能为空，请输入字符串！"ElseDimcount(10)AsIntegerDimfindsAsBooleanfinds=FindStr(T*tStr1.Te*t,T*tStr2.Te*t,count)IfNotfindsThenLbllDesc.Te*t=T*tStr2.Te*t&"不是"&T*tStr1.Te*t&"的子串"ElseDimi,nAsIntegern=0Don=n+1LoopWhilecount(n)>0LbllDesc.Te*t=T*tStr2.Te*t&"在"&T*tStr1.Te*t&"中出现"LbllDesc.Te*t=LbllDesc.Te*t&CStr(n)&"次，位置分别是："Fori=0Ton-1LbllDesc.Te*t=LbllDesc.Te*t&CStr(count(i))&""Ne*tEndIfEndIfEndSubEndClass5、实验现象、实验数据的分析：实验T3-1：实验T3-2：实验T3-3：6、实验结论：这次实验主要做的是相关的函数，通过这次实验，很好地掌握函数的相关的知识，通过以上实验我对.NET环境和基本的程序设计有了一定的了解。指导教师评语和成绩评定：实验报告成绩：指导教师签字：年月日

师学院计算机学院《ASP.NET应用程序设计》课程验证性实验报告实验名称WEB服务器控件的使用实验时间学生***实验地点同组人员无专业班级软件工程1、实验目的理解常用Web服务器控件的属性、事件掌握控件在程序设计中的作用及特点。熟悉导航控件和母版页的使用。

2、实验主要仪器设备和材料：硬件：微型计算机软件：MicrosoftVisualstudioIIS服务器3、实验容和原理：完成课后实验四的第一个第二个和第三个实验。设计一个个人情况调查程序4、实验方法、步骤：实验T4-1T4_1.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T4_1.asp*.vb"Inherits="T4_1"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><body><formid="form1"runat="server"><center><h3align="center">请你输入以下信息：</h3></center>：<asp:Te*tBo*ID="name"runat="server"></asp:Te*tBo*><p>性别：<asp:RadioButtonID="male"runat="server"Te*t="男"/><asp:RadioButtonID="female"runat="server"Te*t="女"/></p><p>血型：<asp:DropDownListID="blood"runat="server"><asp:ListItem>A</asp:ListItem><asp:ListItem>B</asp:ListItem><asp:ListItem>AB</asp:ListItem><asp:ListItem>O</asp:ListItem></asp:DropDownList></p><p>兴趣：<asp:CheckBo*ID="C1"runat="server"Te*t="绘画"/><asp:CheckBo*ID="C2"runat="server"Te*t="唱歌"/><asp:CheckBo*ID="C3"runat="server"Te*t="跳舞"/><asp:CheckBo*ID="C4"runat="server"Te*t="旅游"/><asp:CheckBo*ID="C5"runat="server"Te*t="运动"/><asp:CheckBo*ID="C6"runat="server"Te*t="上网"/><asp:CheckBo*ID="C7"runat="server"Te*t="看书"/><asp:CheckBo*ID="C8"runat="server"Te*t="书法"/></p><p>1：<asp:Te*tBo*ID="tel1"runat="server"></asp:Te*tBo*><asp:Te*tBo*ID="tel2"runat="server"></asp:Te*tBo*></p><p>电子：<asp:Te*tBo*ID="email"runat="server"style="margin-bottom:0p*"></asp:Te*tBo*><asp:ImageButtonID="emailsend"runat="server"/></p><p>主页：<asp:Te*tBo*ID="homepage"runat="server"></asp:Te*tBo*><asp:LinkButtonID="Link"runat="server">我的主页</asp:LinkButton></p><asp:ButtonID="Btn"runat="server"Te*t="提交"/><p><asp:LabelID="LblDesc"runat="server"></asp:Label></p></form></body></html>T4-1.asp*.vbPartialClassT4_1ProtectedSubBtn_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesBtn.ClickDimse*,bld,intrAsStringDimiAsIntegerLblDesc.Te*t="您输入的信息如下："LblDesc.Te*t=LblDesc.Te*t&"："&name.Te*tIffemale.CheckedThense*=male.Te*tIffemale.CheckedThense*=female.Te*tbld=blood.SelectedItem.Te*tIfC1.CheckedThenintr=intr&C1.Te*tEndIfIfC2.CheckedThenintr=intr&C2.Te*tEndIfIfC3.CheckedThenintr=intr&C3.Te*tEndIfIfC4.CheckedThenintr=intr&C4.Te*tEndIfIfC5.CheckedThenintr=intr&C5.Te*tEndIfIfC6.CheckedThenintr=intr&C6.Te*tEndIfIfC7.CheckedThenintr=intr&C7.Te*tEndIfIfC8.CheckedThenintr=intr&C8.Te*tEndIfLblDesc.Te*t=LblDesc.Te*t&",性别："&se*LblDesc.Te*t=LblDesc.Te*t&",血型："&bldLblDesc.Te*t=LblDesc.Te*t&",兴趣："&intrLblDesc.Te*t=LblDesc.Te*t&",电子："&email.Te*tLblDesc.Te*t=LblDesc.Te*t&",主页："&homepage.Te*tEndSubProtectedSubLink_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesLink.ClickDimdestAsStringdest=homepage.Te*tResponse.Redirect(dest)EndSubProtectedSubemailsend_Click(ByValsenderAsObject,ByValeAsSystem.Web.UI.ImageClickEventArgs)Handlesemailsend.ClickResponse.Write("传送")EndSubEndClass实验T4-2T4-2.asp*:<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T4-2.asp*.vb"Inherits="T4_2"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><body><formid="form1"runat="server"><div>请选择要显示的月份<br/><asp:DropDownListID="DropDownList1"runat="server"><asp:ListItem>2010</asp:ListItem><asp:ListItem>2011</asp:ListItem><asp:ListItem>2012</asp:ListItem></asp:DropDownList>年<asp:DropDownListID="DropDownList2"runat="server"><asp:ListItem>01</asp:ListItem><asp:ListItem>02</asp:ListItem><asp:ListItem>03</asp:ListItem><asp:ListItem>04</asp:ListItem><asp:ListItem>05</asp:ListItem><asp:ListItem>06</asp:ListItem><asp:ListItem>07</asp:ListItem><asp:ListItem>08</asp:ListItem><asp:ListItem>09</asp:ListItem><asp:ListItem>10</asp:ListItem><asp:ListItem>11</asp:ListItem><asp:ListItem>12</asp:ListItem></asp:DropDownList>月<asp:ButtonID="Button1"runat="server"Te*t="显示"/><br/><asp:CalendarID="Calendar1"runat="server"BorderColor="Blue"Ne*tPrevFormat="ShortMonth"ShowGridLines="True"Visible="False"Width="500p*"><OtherMonthDayStyleForeColor="*CCCCCC"/></asp:Calendar></div></form></body></html>T4-2.asp*.vb:PartialClassT4_2ProtectedSubButton1_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimy,mAsStringy=DropDownList1.SelectedItem.Te*tm=DropDownList2.SelectedItem.Te*tCalendar1.TodaysDate="00:00:00AM,"&m&"/01/"&yCalendar1.Visible=TrueEndSubEndClass5、实验现象、实验数据的分析：实验T4-1:实验T4-2:6、实验结论：通过这次实验，我懂得了如何通过ASP.NET创建服务器控件，熟悉了对控件的掌握，加强了我对界面布局的掌握。同时，通过对ImageMap控件的使用，我知学会了通过控件将图片插入到程序界面中，让我对ASP.NET有了进一步的了解。指导教师评语和成绩评定：实验报告成绩：指导教师签字：年月日

师学院计算机学院《ASP.NET应用程序设计》课程验证性实验报告实验名称建对象的应用实验时间学生***实验地点同组人员无专业班级软件工程1、实验目的掌握ASP.NET部控件的应用。掌握ASP.NET部对象的应用。Application对象的深入应用。掌握数据库的建立、连接与数据的存取。掌握网页开发的基本流程。2、实验主要仪器设备和材料：硬件：微型计算机软件：Windows2000以上的操作系统、MicrosoftVisualstudioIIS服务器3、实验容和原理：完成课后实验五的第一个第二个和第三个实验。简单文字聊天室的需求分析。系统的功能模块设计。数据库的设计。系统的详细设计。应用到的关键技术的详细说明。4、实验方法、步骤：实验5-1T5-1.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T5-1.asp*.vb"Inherits="T_1"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><bodystyle="te*t-align:center"><formid="form1"runat="server"><divalign="center"style="font-size:large;font-family:微软雅黑;font-weight:bold">统计在线人数</div><p><asp:Te*tBo*ID="counter"runat="server">在线人数：</asp:Te*tBo*></p></form></body></html>T5-1.asp*.vb：PartialClassT_1ProtectedSubTe*tBo*1_Te*tChanged(ByValsenderAsObject,ByValeAsSystem.EventArgs)Handlescounter.Te*tChangedcounter.Te*t="在线人数："&Application("t")EndSubEndClass实验5-2T5-2.asp*：<%PageLanguage="VB"AutoEventWireup="false"CodeFile="T5-2.asp*.vb"Inherits="T5_2"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTD*HTML1.0Transitional//EN""./TR/*html1/DTD/*html1-transitional.dtd"><html*mlns="./1999/*html"><headrunat="server"><title>无标题页</title></head><bodystyle="te*t-align:center"><formid="form1"runat="server"><div>在线讨论区</div><p>请输入用户名：<asp:Te*tBo*ID="usrname"runat="server"></asp:Te*tBo*></p><p><asp:ButtonID="Login"runat="server"Te*t="登录"/></p><p><asp:LabelID="LblDesc"runat="server"></asp:Label></p></form></body></html>T5-2.asp*.vb：PartialClassT5_2ProtectedSubTe*tBo*1_

人人文库> 全部分类> 行业资料 > 信息产业

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论