Asp 程序设计
作业集 一、vbscript 程序设计 1、按照复印中心收费规定,对于前 100 张复印收费每张为 0.5 元,以后每张为 0.3 元。编写 程序,要求输入复印张数,然后显示总价格。输入复印张数在主程序中使用 inputbox 函数, 显示结果在主程序中使用 msgbox 函数。计算过程使用 function 函数实现。 2、输入圆的半径计算圆的面积。输入数据在主程序中使用 inputbox 函数,显示结果在主程 序中使用 msgbox 函数。判断过程使用 sub 函数实现。 3、输入秒数,把它转换为用小时、分、秒表示。例如,输入 7278 秒,则输出 2 小时 1 分 18 秒。输入秒数在主
程序中使用 inputbox 函数,显示结果在主程序中使用 msgbox 函数。计 算过程使用 function 函数实现。 4、求等差数列 2,5,8,?,3n-1 的前 n 项和。使用 inputbox 函数接受输入的正整数,使 用 msgbox 函数显示结果。如当输入的数是 2 时显示 等差数列 2,5,8 ?,3n-1 的前 2 项和是 7。要求使用 for 循环和 do 循环两种方式完成。 以下是 for 循环代码: 以下是 while 循环代码: 6、定义一个 function 过程,其作用是求一个正整数的阶乘,在主程序中求 1!+2!+3!+...+n!,n 使用 inputbox 函数接收用户输入的值,结果用 msgbox 显示。 代码:
2
7、for 循环程序
设计。输入一个 1~100 之间的任意
整数,在屏幕上以每行 10 个为单位显示* 号。如:输入 23,则显示: ********** ********** *** 使用 inputbox 函数输入整数,使用 document.write 函数在页面上显示*号,回车符的显示方 法是 document.write “
” 上机调试该程序并将调试好的程序写在书面上。 。 二、ADO 程序设计 1、数据库 db1.mdb 中学生信息表的内容如下:
在页面上显示该表中的数据。 方法一即显示声明 recordeset 对象: <% Set conn = Server.CreateObject("ADODB.Connection") strProvider= "driver={Microsoft Access Driver (*.mdb)};dbq=" &; Server.MapPath("db1.mdb") conn.Open strProvider set rs=server.createobject("