ASP编程题
ASP编程题及答案
编程一1．请编写代码，在页面上显示如下图形。
注意：只要写出主要代码即可*******************************************************答案：<%Dim I,JFor I=10 To 1 Step -1For J=1 To IResponse.Write "*"NextResponse.Write "<br>"Next%>2．利用Recodset对象也可以插入记录，现在针对图1所示的数据表，利用插入一条记录：其中网站名称为“搜狐”，网站地址为“”，网站简介为“门户网站”，提交日期为当天。
注意：只给出主要代码即可，程序的开头部分已经给出。
<%Dim db, strConnstrConn="Dbq=" & Server.Mappath("address.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"Set db=Server.CreateObject("ADODB.Connection")答：<%Dim db, strConnstrConn="Dbq=" & Server.Mappath("address.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"Set db=Server.CreateObject("ADODB.Connection")'建立Recordset对象Set rs=Server.CreateObject("ADODB.Recordset")strSql ="Select * From link"rs.Open strSql,db,0,2'添加记录rs.AddNewrs("name")= "搜狐"rs("url")=""rs("intro")="门户网站"rs("submit_date")=Date()rs.Update%>3．针对图1，现在有两个文件add_form.asp和add.asp，这两个文件用来向表中添加记录，add_form.asp已经给出，请你完成add.asp。
ASP及网页制作试题及答案
一、选择题（每题2分，共40分）1、下面哪门语言不是被浏览器执行的。
A )HTML B) Javas cript C)VB script D)ASP2、执行a=”6”语句后，a是型。
A )字符串型B) 日期型C)数值型D)布尔型3、下列哪一个变量名称是正确的。
A)111 B)ab_1 C)_sum D)a?b4、相对JSP和PHP，是ASP优点的是。
A)全面支持面向对象程序设计B)执行效率高C)简单容易D)多平台支持5、下列哪一个函数可以将数值转换为字符串。
A)Cdate B) Cint C)Cstr D)CDb16、请判断下面程序运行完毕后a的值。
<%a=3a=a+5%>A)0 B)3 C)5 D)87、请问Int(3.45)和Int(-3.45)的值分别是。
A)4、-4 B) 3、-4 C)Cstr D)CDb18、程序继续执行调用Sub过程的语句之后的语句，可以立即从Sub过程中退出的语句是A)</Sub> B) </Sub> C)Exit Sub D)Loop9、下面不是Global.asa文件可用来存放是事件。
A)Application_OnEnd B) Application_OnStartC)Session_OnEnd D) Sever_OnStar10、left(“”,4)的值为。
A)”asp” B) “.net” C)”asp.” D)”aspn”11、下面程序执行完毕，页面上显示内容。
<%=”祖国”=”您好”%>A) 祖国B) 祖国您好C) 祖国（换行）您好D)以上都不对12、下列标记中，可以在网页中插入图片。
A)<img>标记B) <Br>标记C) <H3>标记D) <SCR>标记13、在VBScript中，注解前使用。
A) // B) /*…*/ C) … D) ”14、Application对象的默认有效期为分钟。
ASP代码编写多项选择题
2．试编写一个test1.htm页面，在页面中输出1个多项选择题，题目内容自拟，每个题目均有A、B、C和D四个选项，当用户单击“交卷”按钮时，提交答案给test1.asp页面，test1.asp页面获得表单所提交的数据后，将数据直接输出给客户端，以显示用户对各题所作出的选择。
Text1.html<html><body><form method="post" action="http://localhost/text1.asp"><p>选择题：请问你最爱看的哪部动漫？<hr></p><input name="interest" type=checkbox value="火影忍者">A火影忍者<br><input name="interest" type=checkbox value="地狱少女">B:地狱少女<br><input name="interest" type=checkbox value="网球王子">C:网球王子<br><input name="interest" type=checkbox value="水果篮子">D:水果篮子<br><input name="interest" type=checkbox value="吸血鬼骑士">E:吸血鬼骑士<br><input name="interest" type=checkbox value="蜡笔小新">F:蜡笔小新<br><input name="interest" type=checkbox value="海贼王">G:海贼王<br><input name="interest" type=checkbox value="校园迷糊大王">H:校园迷糊大王<br><input name="interest" type=checkbox value="彩云国物语">I:彩云国物语<br><input name="interest" type=checkbox value="银魂">J:银魂<br><input name="interest" type=checkbox value="千里千寻">K:千里千寻<br><input name="interest" type=checkbox value="死神">L:死神<p><input type="submit" value="提交"><input type="reset" value="取消"></p></form></body></html>Text1.asp<html><body><%dim count1count1=request.form("interest").count%>根据您的回答，你的选择是：<%response.write count1%><%dim iresponse.write"<hr><br>"for i=1 to count1response.write request.form("interest")(i)&"<br>"next%></body></html>。
ASP复习试题及答案
一、选择题1、下列属于中文简体字符集的是（ B ）A gbkB gb2312C big5D utf-82、以下哪个是vbscript 代码中用来注释的语句（ A ）A、’B、!C、 <!-- -->D、<-->3、下面哪个函数是用来将字符串中的大写字母转换为小写字母（ A ）A、ucase( )B、lcase( )C、 dcase( )D、left( )4、若要求VBScript的变量在使用前必须事先定义，则应使用（ C ）语句来设置。
A. Request B public C. Dim D. Option Explicit5、配置IIS时，设置站点的主目录的位置，下面说法正确的是（ D ）。
A 只能在本机的c:\inetpub\wwwroot文件夹。
B 只能在本机操作系统所在磁盘的文件夹。
C 只能在本机非操作系统所在磁盘的文件夹。
D 以上全都是错的。
6、关于ASP，下列说法正确的是（ C ）A 开发ASP网页所使用的脚本语言只能采用VBScript。
B 网页中的ASP代码同html标记符一样，必须用分隔符”<”和”>”将其括起来。
C ASP网页，运行时在客户端无法查看到真实的ASP源代码。
D 以上全都错误。
7、ASP脚本编程使用的语言是( C )A、DelphiB、VBC、VBScriptD、C＃8、下列哪一种设置能使表格显示边框（ B ）A 在<td>中添加 border属性B 在<table>中添加border属性C 在<tr>中添加 border属性D 以上全都可以9、用于从客户端获取信息的ASP内置对象是（ B ）A ResponseB RequestC SessionD Application10、下列Response对象的用法错误的是（ A ）A <% （输出到浏览器信息） %>B <% = "输出到浏览器信息" %>C <% %>D 以上全都正确11、QueryString获取方法、Form 获取方法获取的数据子类型分别是:（ C ）A 数字、字符串B 字符串、数字C 字符串、字符串D 必须根据具体值而定12、下面程序段执行完毕，我们在浏览器中看到的内容是什么（ A ）<%%>A 新浪C 下划线D 该句有错，什么也不显13、关于Session对象的属性，下列说法正确的是（ C ）A Session的有效期时长默认为90秒，且不能修改。
ASP习题
Next
A) 10 B) 11 C) 12 D) 13
21.设A="abcdefghijklm"，下面( C )的函数值为"jklm"。
A、Mid(A,10,14) B、Ringht(A,4) C、Mid(A,10,4) D、Left(A,10,4)
32、表达式X1>X是( D )
A、算术表达式 B、非法表达式 C、字符表达式 D、关系表达式
33、设a=2,b=3,c=4,d=5,表达式a>b AND c<=d OR 2*a>c的值是( B )
A、True B、False C、-1 D、1
35.在对数据库记录进行分页显示时，不需用到的是Recordset的哪个属性？(D )
10、若要将字符串进行编码，使它不会被浏览器解释为HTML语法，可以使用哪个方法？( B )
A.HTMLEncodeing B.URLEncode C.MapEncode D.ASPEncode
11、若要找出父目录的实际路径，可以使用下列哪种语法？( A )
A.Server.MapPath("/") B.Server.MapPath("./")
22.可获得当前系统时间的函数是( B )
A、Date() B、Time() C、IsDate() D、Year( )
23.以下可以作为VB变量名的是( B )
A、SIN B、CO1 C、COS(X) D、X(-1)
10.除非调用子程序，否则子程序不会自动执行。(T )
1Hale Waihona Puke .函数与子程序的不同之处在于子程序不能传入参数。(F )
ASP复习题和答案
一、单项选择题1.Visual 2005是一个功能强大的集成开发平台，针对不同需求，提供了多个版本，（ A ）是为大型软件开发团队提供的。
P5A. Visual Studio Team SystemB. StandardC. ExpressD. Professional2.表格中的行标记是（A ）。
P24A. <tr>B. <td>C. <th>D. <tb>3.在的内置对象中，（ B ）对象只能在一个页面的往返过程中传递。
P47A. CookieB. ViewStateC. SessionD. Application4.以下不是动态网站的特性的是（C ）。
P2A. 交互性B. 通过数据库进行架构C. 内容稳定D. 在服务器端运行5.表格中的单元格标记是（B ）。
P24A. <tr>B. <td>C. <th>D. <tb>6.（A ）用于回应客户端浏览器，告诉浏览器回应内存的报头、服务器端的状态信息以及输出指定的内容。
P36A. responseB. ViewStateC. SessionD. Application7.一个新 Web网站包含名为（A）的子文件夹和两个初始文件。
P34A. App_DataB. Default.C. App_CodeD. Bin8.Visual 2005是一个功能强大的集成开发平台，针对不同需求，提供了多个版本，（A ）是微软免费为初学者提供的。
P5A. ExpressB. StandardC. Visual Studio Team SystemD. Professional9.表格标记中（A ）属性设置单元格中的数据与表格边线之间的间距，以像素为单位。
P24A. cellpaddingB. borderC. cellspacingD. margin10.Visual Studio 2005是一个功能强大的集成开发平台，针对不同需求，提供了多个版本，（C ）是轻量级、易于使用和上手的工具，适用于编程爱好者，初学者和学生。
ASP复习试题及答案
一、选择题1、下列属于中文简体字符集的是（ B ）A gbkB gb2312C big5D utf-82、以下哪个是vbscript 代码中用来注释的语句（ A ）A、’B、!C、 <!-- -->D、<-->3、下面哪个函数是用来将字符串中的大写字母转换为小写字母（ A ）A、ucase( )B、lcase( )C、 dcase( )D、left( )4、若要求VBScript的变量在使用前必须事先定义，则应使用（ C ）语句来设置。
A. Request B public C. Dim D. Option Explicit5、配置IIS时，设置站点的主目录的位置，下面说法正确的是（ D ）。
A 只能在本机的c:\inetpub\wwwroot文件夹。
B 只能在本机操作系统所在磁盘的文件夹。
C 只能在本机非操作系统所在磁盘的文件夹。
D 以上全都是错的。
6、关于ASP，下列说法正确的是（ C ）A 开发ASP网页所使用的脚本语言只能采用VBScript。
B 网页中的ASP代码同html标记符一样，必须用分隔符”<”和”>”将其括起来。
C ASP网页，运行时在客户端无法查看到真实的ASP源代码。
D 以上全都错误。
7、ASP脚本编程使用的语言是( C )A、DelphiB、VBC、VBScriptD、C＃8、下列哪一种设置能使表格显示边框（ B ）A 在<td>中添加 border属性B 在<table>中添加border属性C 在<tr>中添加 border属性D 以上全都可以9、用于从客户端获取信息的ASP内置对象是（ B ）A ResponseB RequestC SessionD Application10、下列Response对象的用法错误的是（ A ）A <% Response.Write（输出到浏览器信息） %>B <% = "输出到浏览器信息" %>C <% Response.End %>D 以上全都正确11、QueryString获取方法、Form 获取方法获取的数据子类型分别是:（ C ）A 数字、字符串B 字符串、数字C 字符串、字符串D 必须根据具体值而定12、下面程序段执行完毕，我们在浏览器中看到的内容是什么？（ A ）<%%>A 新浪C 下划线D 该句有错，什么也不显13、关于Session对象的属性，下列说法正确的是（ C ）A Session的有效期时长默认为90秒，且不能修改。
ASP试题及答案
ASP模拟试卷（一）一、选择题（每小题2分，共40分）1．请判断下列语句执行完毕后，a、b、c的值<%a="1" + 1b="1" + "1"c="1" & "1"%>(A) "11","11","11" (B) 2,"11","11" (C) "11",2,"11" (D) "11","11",2 2．执行完语句a="2"，a的类型为(A) 数值型(B) 字符串型(C) 布尔型(D) 日期型3．执行完如下语句后，a的值为：<%Dim aa=3a=a+1%>(A) 0 (B) 1 (C) 3 (D) 44．执行完如下语句后，Sum的值为：<%Dim a(5),SumSum=0For I=0 To 5a(I)=ISum=Sum+a(I)Next%>(A) 0 (B) 5 (C) 15 (D) 205．执行完a=5 Mod 3 语句后，a的值为：(A) 0 (B) 2 (C) 3 (D) 56．执行完a=5>3 And "a"<"c" 语句后，a的值为：(A) True (B) False (C) 1 (D) 07．下面a=Trim(" vbscript") & Rtrim(" good") 语句后，a的值：(A) " vbscript good"(B) "vbscript good"(C) " vbscriptgood"(D) "vbscriptgood"8．下面哪个函数可以返回当前的日期和时间：(A) Now (B) Date (C) Time (D) DateTime9．对于利用Dim a(4,5) 语句定义的二维数组，Ubound(a,1)将返回(A) 0 (B) 4 (C) 5 (D) 610．对于Request对象，如果省略获取方法，如Request(“user_name”)，将按什么顺序依次检查是否有信息传入：（A）Form、QueryString、Cookies、Server Variables、ClientCertificate（B）QueryString、Form、Cookies、Server Variables、ClientCertificate（C）Cookies、QueryString、Form、Server Variables、ClientCertificate（D）Form、QueryString、Cookies、Server Variables、ClientCertificate11．下面哪条语句可以返回访问者的IP地址(A) Request.ServerVariables("REMOTE_ADDR")(B) Request.ServerVariables("REMOTE_IP")(C) Request.ClientCertificate("REMOTE_ADDR ")(D) Request.ClientCertificate ("REMOTE_IP ")12．执行完如下语句后，页面上显示的内容为：<%Response.Write "A"Response.EndResponse.Write "B"%>C(A) A (B) AB (C) AC (D) ABC13．请问下面程序段执行完毕，页面上显示内容是什么：<%Response.Write “<a href=''>新浪</a>”%>(A) 新浪(B) <a href=''>新浪</a>(C) 新浪（超链接）(D) 该句有错，无法正常输出14．Session对象的默认有效期为多少分钟？(A) 10 (B) 15 (C) 20 (D) 应用程序从启动到结束15．请问下面程序段执行完毕，页面上显示内容是什么：<%Response.Write Server.HTMLEncode(“<a href=''>新浪</a>”)%>(A) 新浪(B) <a href=''>新浪</a>(C) 新浪（超链接）(D) 该句有错，无法正常输出16．当使用事务处理时，假如要提交事务处理，应该利用如下方法：(A) BeginTrans (B) EndTrans(C) CommitTrans (D) RollBackTrans17．如果刚打开了一个含有1条记录的记录集，那么Bof的值为(A) 1 (B) True (C) False (D) NULL18．使用W3 Jmail组件发送E-mail时，附件必须位于(A) 客户端(B) 服务器端(C) 服务器端和客户端(D) 服务器端或客户端19．对于文件上传组件，如果希望获取上传文件的大小，应该怎样用？(A) Upload.Files("upfile").Size(B) Upload.Form("upfile").Size(C) Request.Files("upfile").Size(D) Request.Form("upfile").Size20．对于如下的文件超链接组件中使用的超链接数据文件，文件路径和说明之间应该用（）隔开。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1,求以下表达式的值，写出你想到的一种实现方法：1-2+3-4+……+m.此处m需要手动输入，使用C#语言编写2.实现一记数器功能，如给出0~9所对应的图片分别为0.gif~9.gif，写出程序的主要代码（注：记数存放在counter.txt文件中）简单的ASP计数器counter.asp代码及注释：<%CountFile=Server.MapPath("counter.txt")Set FileObject=Server.CreateObject("Scripting.FileSystemObject")Set Out=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE)counter=Out.ReadLine//读取计数器文件中的值Out.Close//关闭文件SET FileObject=Server.CreateObject("Scripting.FileSystemObject")Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE)counter= counter + 1//计数器的值增加1Out.WriteLine(counter)Out.Close//关闭文件%>3.谈谈如何设计一个聊天室程序，并简要阐述实现过程(1)需求分析聊天室是实现用户之间即时通信的一种工具。
所以，聊天室应该具备用户的登录页面、用户的注册、用户的信息的修改、以及实现用户进行聊天的功能。
聊天室作为一种交流工具，应该具备简单易用，容易上手，对于使用者的要求不高，适合大众的需求。
同时聊天室还要有一些个性化的界面提供给用户不仅仅是聊天的乐趣，同时也带来全新的视觉效果。
(2)主要模块用户注册页面用户登录页面个人信息页面留言板页面（3）重要的代码程序：（1）登陆页面（login_in.aspx）的调用事件代码：Sub page_load(ByVal sender As Object, ByVal e As EventArgs)Session("user_name") = user_name.TextEnd SubSub Enter_Click(ByVal Sender As Object, ByVal E As EventArgs)'建立Connection对象Dim conn As NewOleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath("chat.mdb"))'建立Command对象Dim cmd As New OleDbCommand("select * from user_infor", conn)conn.Open()Dim dr As OleDbDataReader = cmd.ExecuteReader()Do While dr.Read()If dr.Item("user_name") <> user_name.Text And dr.Item("password1") <> password1.Text ThenResponse.Write("用户名不正确！")ElseResponse.Write("欢迎登陆!")Response.Redirect("succ_register.aspx")conn.Close()End IfLoopEnd Sub（2）、注册页面（register.aspx）的调用事件代码：Sub Enter_Click(ByVal Sender As Object, ByVal E As EventArgs)'建立Connection对象Dim conn As NewOleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath("chat.mdb"))'建立Command对象Dim strSql As StringstrSql = "Insert Intouser_infor(user_name,password1,sex,birthday1,email,intro) Values('" &user_name.Text & "','" & password1.Text & "','" & sex.SelectedItem.Text & "','" & birthday1.Text & "','" & email.Text & "','" & intro.Text & "')"Dim cmd As New OleDbCommand(strSql, conn)Dim Exp As ExceptionTry'执行操作，插入记录conn.open()cmd.ExecuteNonQuery()conn.close()Response.Redirect("succ_register.aspx") '正常添加后，返回首页Catch Expmessage.Text = "注册失败！"End TryEnd Sub（3）、聊天室的代码如下：统计访客人数：4-16.aspx的代码：Sub Page_Load(ByVal Sender As Object, ByVal E As EventArgs)If Session("user_name") = "" ThenResponse.Redirect("login_in.aspx")End Ifmessage.Text = "欢迎" & Session("user_name") & "登陆聊天室!"Application.Lock()Application("user_number") = Application("user_number") + 1Application.UnLock()message1.text = "您是第" & Application("user_number") & "位访客"End Sub显示发言信息代码如下：Sub Enter_Click(ByVal Sender As Object, ByVal E As EventArgs)Dim username As Stringusername = Session("user_name")Application.Lock()Application("show") = username.ToString & "说：<br>" &Application("show")Application("show") = DateTime.Now.ToString & "<br>" &Application("show")Application("show") = Request.ServerVariables("remote_addr") & ":" & Application("show")Application("show") = pronunciation.Text & "<br>" & Application("show")Application.UnLock()pronunciation.Text = "" '将发言框清空End Sub（4）、修改信息调用事件重要代码如下：Sub BindData()Dim username As Stringusername = Session("user_name")Dim conn As NewOleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath("chat.mdb")) '建立Connection对象Dim cmd As New OleDbCommand("select * from user_infor whereuser_name='" & username & "'", conn) '建立Command对象Dim adp As New OleDbDataAdapter(cmd) '建立DataAdapter对象Dim ds As New DataSet() '建立DataSet对象adp.Fill(ds, "user_infor") '填充DataSetMyDataGrid.DataSource = ds.Tables("user_infor").DefaultView '指定数据源MyDataGrid.DataBind()4.谈谈如何设计一个大学生课程管理系统，设计数据库，并简要哦阐述主要模块实现过程（1）设计思路：系统简介：本系统是一款以学校学生课程管理为主题，帮助学生随时管理自己大学所选的课程。