ppt课件-顾刚ch5_ASP_NET_2017

,动态网页设计初步,顾刚计算机教学实验中心gugang,动态网页设计讲授提纲,ASP.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,循环控制语句,动态网页概述,网页根据生成方式分为：动态网页和静态网页静态网页指网页内容预先只采用HTML语言编制而成，浏览时不发生任何变化，即不会因用户的选择点击等操作而改变内容动态网页指网页内容预先采用HTML+ASP+JSP等语言编制而成，浏览时内容会根据访问者的选择点击等操作而随机改变,静态网页的文件扩展名为htm或html动态网页的文件扩展名为asp、aspx、jsp等ASP是ActiveServerPage的缩写，意为“动态服务器页面”的简称动态网页技术可以实现：用户注册、用户登录、搜索查询、各种数据库管理等功能,动态网页概述,动态网页概述,用VBscript设计动态网页运行例子，测算今年生日过否？yourbirthday=inputbox(请输入你的生日(年-月-日)：,生日测算,1)document.write(今天的日期是：&date()&)document.write(你的生日为：&yourbirthday&)dimtoday,mydatetoday=date()mydate=CDate(yourbirthday)dimthisdaythisday=CStr(year(today)+-+CStr(month(mydate)+-+CStr(day(mydate)dimkk=CInt(today-CDate(thisday)ifk=0thenmsgbox(今天是你的生日，祝生日快乐！)endifdimtempifk0thentemp=你的生日已过了+CStr(k)+天！elsetemp=你的生日还有+CStr(-k)+天！endifmsgbox(temp)document.write(temp),ASP.NET是服务器端脚本编程的全新技术ASP.NET是一种在IIS中运行的程序IIS(InternetInformationServices)是微软的Internet服务器管理系统它允许人们用功能完善的编程语言在自己的页面上定义代码段VB.NET语言C#语言（CSharp）J#语言（JSharp）ASP.NET页面的扩展名是.aspx,ASP.NET概述,例5-1的实现方法：打开记事本输入下面内容：Hello,WebPageHello,WebPageHello,WebPage分别存储为：web1.html、web1.asp、web1.aspx将三个文件都发布到网站中“C:Inetpubwwwroot”打开浏览器浏览这三个文件，都是如下一样的页面,ASP.NET概述,ASP.NET概述,例5-2的实现方法：打开记事本输入下面内容：SubMyTest(x)Response.Write(x&)EndSub存储为li_5_2.aspx，然后发布到网站中运行,若右点击页面，再点击“查看源”,ASP.NET概述,可以将ASP.NET代码插入到自己的Web页源代码中，但需要对其进行标注区分ASP.NET代码与HTML代码就是看有无使用标签标注，即ASP.NET代码都是用标签进行标注的例如将例5-1与例5-2两内容合并，浏览器打开如下：,例5-1与例5-2合并后的文件后缀名只能是aspx为asp会报错；为html会出现如下页面,ASP.NET概述,ASP.NET概述,在例5-2中用标识符标注：将language属性设置成“VB”。该设置表明要用VB语言写代码将其runat属性设成server。该设置表明处理代码的目标主机是Web服务器如果不设置server属性，脚本默认在客户端执行，所以runat属性必须设置同时，使用“”标记，表明服务器端代码的开始和结束在ASP.NET中可以嵌入VBscript编写的代码，这些代码既可以在客户端执行，也可以在服务器端执行,Html、ASP.NET和VBscript混编的动态网页如下：SubMyTest(x)Response.Write(x&)EndSub)%forj=1to5document.write(j&)nextHello,WebPageHello,WebPageHello,WebPage,发布到网站中，浏览器地址为：/gu_l3.aspx出现如下页面,ASP.NET概述,ASP.NET概述,发布到桌面上，浏览器地址为：C:UsersGugangDesktopli_6_2_gu.aspx出现如下页面,动态网页设计讲授提纲,ASP.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,循环控制语句,采用VB.NET语言的程序框架例5-3：创建服务器端动态变化的网页,ASP.NET程序框架,采用VBscript语言程序框架如下：document.write(HellofromVBScript!),ASP.NET另一种程序框架,浏览器显示：HellofromVBScript!,VBscript程序框架如下：document.write(HellofromVBScript!)document.write()document.write(1+100)*100/2=&(1+100)*100/2)document.write(),VBscript程序框架,浏览器显示：HellofromVBScript!(1+100)*100/2=5050,VBscript程序框架如下：document.write(HellofromVBScript!)document.write()Msgbox(1+100)*100/2=&(1+100)*100/2),VBscript程序框架,浏览器显示：HellofromVBScript!,计算圆面积：输入半径，输出面积结果R=inputbox(请输入半径,半径,1)document.write(圆面积为：&3.14*R*R&),VBscript程序框架,加法器程序加法计算器subcalc()result.value=CInt(num1.value)+CInt(num2.value)endsub请输入一个整数  请输入一个整数  相加结果为  去掉CInt，变成字符串数据，+意味连接,VBscript程序框架,动态网页设计讲授提纲,ASP.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,循环控制语句,VBscript程序中有变量与常量常量指程序运行过程中永恒不变的量变量指程序运行过程中会发生改变的量常量书写整数常量：128，-34000，100001实数常量：3.14,-2.718字符串常量：”Unix”，”动态网页设计”,变量与表达式,变量与表达式,VB程序变量声明语句如下：Dim变量名1，变量名2，变量名n变量命名规则：字母开头，数字、字母、_任意组合，不超过255个字符常用的变量类型有：integer：整数类型，-32768至32767double：双精度浮点数类型，-1.710308至1.710308Date：日期类型，100年1月1日至9999年12月31日String：字符串类型，最大长度可为20亿个字符,变量与表达式,变量与表达式,三角形面积计算程序三角形面积计算subcalc()dima,b,c,s,areaa=CDbl(num1.value)b=CDbl(num2.value)c=CDbl(num3.value)s=(a+b+c)/2area=sqr(s*(s-a)*(s-b)*(s-c)result.value=areaendsub请输入三角形第一个边长  请输入三角形第二个边长  请输入三角形第三个边长  三角形面积结果为  ,变量与表达式,算术运算符+-*/(整除)(乘方)mod(求余数)23=88mod3=2关系运算符=like(字符串匹配)逻辑运算符andornot字符串连接符：&,变量与表达式,千位整数置逆，例1234，置逆后为4321m=inputbox(输入千位数,输入,1)document.write(你输入的数为&m&)a=m1000b=(mmod1000)100c=(mmod100)10d=mmod10document.write(逆序数为&d*1000+c*100+b*10+a),变量与表达式,系统提供的标准函数，直接使用日期时间函数如下表：,变量与表达式,数学函数如下表：,变量与表达式,类型转换函数如下表：,变量与表达式,字符串string子类型的函数如下表：,变量与表达式,其它函数如下表：,变量与表达式,动态网页设计讲授提纲,VB.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,循环控制语句,选择控制语句,一路选择分支语句格式：if条件表达式then语句序列endif,选择控制语句,根据三角形三边长计算面积（一路分支）,选择控制语句,三角形面积计算subcalc()dima,b,c,s,areaa=CDbl(num1.value)b=CDbl(num2.value)c=CDbl(num3.value)ifa+bcandb+caanda+cbthens=(a+b+c)/2area=sqr(s*(s-a)*(s-b)*(s-c)result.value=areaendifendsub请输入三角形第一个边长  请输入三角形第二个边长  请输入三角形第三个边长  三角形面积结果为  ,选择控制语句,二路选择分支语句格式：if条件表达式then语句序列else语句序列endif,根据三角形三边长计算面积（二路分支）,选择控制语句,三角形面积计算subcalc()dima,b,c,s,areaa=CDbl(num1.value)b=CDbl(num2.value)c=CDbl(num3.value)ifa+bcandb+caanda+cbthens=(a+b+c)/2area=sqr(s*(s-a)*(s-b)*(s-c)result.value=areaelseresult.value=“不能计算”endifendsub请输入三角形第一个边长  请输入三角形第二个边长  请输入三角形第三个边长  三角形面积结果为  ,选择控制语句,选择控制语句,多路选择分支语句格式：if条件表达式then语句序列elseif语句序列elseifelse语句序列endif,多路选择控制源程序,不同的分数段Dimscore,Msgscore=inputbox(请输入成绩)Ifscore=90thenMsg=优秀Elseifscore=80thenMsg=良Elseifscore=70thenMsg=中Elseifscore=60thenMsg=及格ElseMsg=不及格EndifMsgbox(你的成绩等级为：&Msg),functiongreeting()i=hour(time)ifi,多路选择控制语句再举例,多路选择分支语句格式：selectcase条件表达式case表达式值1语句序列1case表达式值2语句序列2case表达式值n语句序列ncaseelse语句序列endselect,多路选择控制语句,不同的等级分所的在数段Dimscore,msgscore=inputbox(请输入成绩的等级分)selectcasescorecaseAMsg=90caseBMsg=8089caseCMsg=7079caseDMsg=6069caseEMsg=,多路选择控制源程序,d=weekday(date)selectcasedcase1document.write(Monday!)case2document.write(Tuesday!)case3document.write(Wednesday!)case4document.write(Thursday!)case5document.write(Friday!)case6document.write(Saterday!)case7document.write(Sunday!)caseelsedocument.write(Errorweekday!)endselect本例演示selectcase语句。您会得到系统日期的周名翻译结果。,多路选择控制语句再举例,动态网页设计讲授提纲,VB.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,循环控制语句,在程序设计中，往往需要重复多次执行某一段程序（模块），这就是循环结构，根据设定的条件来确定一段程序（模块）重复执行的次数。,循环结构又分两种形式：,当型循环,直到型循环,循环控制语句,循环控制语句,当型循环控制语句格式：for循环变量=初值to终值(step步长)语句序列(循环体)next循环变量,s=0fori=1to100step2s=s+inextdocument.write(1-100之间的奇数之和为:&s&),计算1-100之间奇数之和,如何求1-100之间偶数的和？,s=1fori=1to4step1s=s*inextdocument.write(1*2*3*4=&s&),计算阶乘N!,使用梯形法计算定积分,使用梯形法计算定积分f(x)dx其中a=0,b=1,被积函数为sin(x)取积分区间等分数为1000,计算定积分dima,b双精度类型变量:积分上下限dimh双精度类型变量:积分步长dimsum双精度类型变量:存放最后为积分值dimn整型变量:积分区间等分数dimi整型变量:循环工作变量a=0.0b=1.0n=1000sum=0.0h=(b-a)/n计算小区间长度fori=1tonstep1循环计算公式中的和式sum=sum+(sin(a+i*h)+sin(a+(i+1)*h)*h/2.0nextMsgbox(sin(x)的定积分为：&sum),选择与循环控制语句,选择与循环控制语句,当型循环控制语句格式：dowhile条件表达式语句序列(循环体)loop,条件,成立,不成立,模块,新模块,i=1s=0dowhilei),例5-6ASP源程序,如何求1-100之间偶数的和？如何求1-100之间奇数的和？,i=1s=1dowhilei),计算阶乘k!,动态网页设计讲授提纲,VB.NET程序框架,动态网页概述,变量与表达式,选择控制语句,函数与过程控制,读写ACCESS数据库,循环控制语句,在VB程序设计中，常常采用模块化方法进行设计即将编程求解的问题分解成若干个子问题，每个子问题独立编写程序例如计算器程序模块如下：,函数与过程,在VB中将某一段程序独立出来的，然后通过调用来运行它例如VB系统提供了一系列标准函数，程序员可以直接使用(运行)这些函数抽取出来的程序段落写成两种形式过程函数过程与函数通常定义在head部分中，这样确保过程与函数在调用前已加载,函数与过程,过程定义的格式：sub过程名(参数表)语句序列endsub参数表列出了调用过程应该传递的参数，相邻两个参数之间用逗号分开如果没有参数传递，必须带有一对圆括号调用过程的两种格式：call过程名(参数表)过程名参数表,函数与过程,无参数过程定义与调用例子submySub()response.write(这是一段子程序。)endsub”)next%,例5-7ASPX源程序,函数与过程,三角形面积计算subcalc()dima,b,c,s,areaa=CDbl(num1.value)b=CDbl(num2.value)c=CDbl(num3.value)ifa+bcandb+caanda+cbthens=(a+b+c)/2area=sqr(s*(s-a)*(s-b)*(s-c)result.value=areaelseresult.value=“不能计算”endifendsub请输入三角形第一个边长  请输入三角形第二个边长  请输入三角形第三个边长  三角形面积结果为  ,函数与过程,有参数的过程定义与调用三角形面积计算subcalc(a)a=CDbl(a)b=CDbl(num2.value)c=CDbl(num3.value)ifa+bcandb+caanda+cbthens=(a+b+c)/2area=sqr(s*(s-a)*(s-b)*(s-c)result.value=areaelseresult.value=“不能计算”endifendsub请输入三角形第一个边长  请输入三角形第二个边长  请输入三角形第三个边长  三角形面积结果为  ,函数与过程,函数定义的格式：function过程名(参数表)语句序列endfunction参数表列出了调用函数应该传递的参数，相邻两个参数之间用逗号分开如果没有参数传递，必须带有一对圆括号调用函数一般是在表达式中,无参数函数的定义与使用例子functionmyFunction()myFunction=蓝色endfunctiondocument.write(我喜欢的颜色是：&myFunction()函数程序可返回结果。,函数与过程,有两个参数的函数定义与使用例子functionmyMax(x,y)ifxythenmyMax=xelsemyMax=yendifendfunction,例5-8ASPX源程序,如何实现任意输入两个数？,functionmyMax(x,y)ifxythenmyMax=xelsemyMax=yendifendfunctiona=inputbox(请输入第一个数：)b=inputbox(请输入第二个数：)document.write(两个数的最大值是：&myMax(a,b),例5-8源程序修改,functionmyMax(x,y)ifxythenmyMax=xelsemyMax=yendifendfunctionsubmycalc()result.value=myMax(num1.value,num2.value)endsub请输入第一个数： 请输入第二个数： 最大数为： ,例5-8源程序修改,设计过程与函数的好处程序复用简化问题结构清晰易于理解,函数与过程,编写ASP程序实现拼数游戏。输入两个只有二位十进制的整数，将这两个整数拼接成四位十进制数，两个数中较大的数放在高位上，较小的数放在低位上。再将拼接成的4位十进制整数加1后输出。例如：输入45和89，则输出整数8946。提示：参照PPT课件中加法器程序在加法程序中，将加法语句修改为二路选择语句a=Cint(num1.value)b=Cint(num2.value)Ifabthenresult.value=a*100+b+1Elseresult.value=b*100+a+1endif,实验题目