全民趣答题的源码_谁有《源代码》百度网盘资源

❶ 如何通过答题网站源代码查看答案

看不到的，你把网站架构想的太简单了，网站答案是在你提交答卷后，在后台进行校验的，在你答题的时候，源码里面是不会有答案的

❷ 简单的asp答题系统

利用ASP和Access数据库制作局域网网上答题系统

本系统由Index. asp、Lkzk.asp、Save.asp、Db0.fun 四个小程序及Access数据库文件lkzk.mdb组成各程序的功能分别是:
1． Index. asp 是框架网页,负责导入Lkzk.asp、Save.asp两个子网页组成完整的程序页面。
2． Lkzk.asp 是随机出题答题的交互页面生成程序，主要完成随机选题、题目显示、答案输入及正确率、总答题数显示等功能。
3． Save.asp 完成答题正误判断、显示及成绩登记（按客户端IP地址）。
4． Db0.fun 包含打开Access数据库的多个函数(Lkzk.asp、Save.asp都用到的)。
5． lkzk.mdb Access数据库文件,由表“IP”和表“题库”组成。
表（IP）由编号字段ID(数字格式)、客户机地址字段IP(文本格式)、错误答案数字段nnn(数字格式)、正确答案数字段yyy(数字格式) 所组成；
表“题库” 由题号字段ID(数字格式)、单选多选标记字段dx(数字格式)、答案字段xz(文本格式)、试题内容字段na(备注格式)所组成。（注:试题内容的选择部分必须为“A. …… B. …… C. …… D. ……” 格式）
--------------- Index. Asp-----------------
<html>
<head>
<title>网上司考试题库</title>
</head>
<frameset rows="87%,*" framespacing="0">
<frame name="top" src=image/lkzk.asp scrolling="auto">
<frame name="bottom" scrolling="auto" marginwidth="0" marginheight="0">
<noframes>
<body>
<p>此网页使用了框架，但您的浏览器不支持框架。</p>
</body>
</noframes>
</frameset>
</html>
--------------Lkzk.asp-------------

<%
Set rsu2 = GetMdbStaticRecordset("lkzk.mdb", "IP")
Set rs = GetMdbStaticRecordset("lkzk.mdb", "题库")
%>
<HTML>
<head>
<title>网上司考试题库</title>
</head>
<BODY >
<font size="4" color="#000080">司考试题库
<%
ClientIP = Request.ServerVariables("REMOTE_ADDR")
userIP=Right(ClientIP,Len(ClientIP)-InStrRev(ClientIP,"."))
rsu2.AbsolutePosition=userIP
Randomize
I=Fix(Rnd*1800)
rs.AbsolutePosition=I+1
%>
总第<%=CStr(I+6)%>题 <%'=rs("type")%>
<FORM Action=save.asp Method=GET target="bottom">
<INPUT Type=Hidden Name=AI Value="<%=I%>">
<HR>
<% s=rs("na")
x=InStr(s,"A.")
sx="多选"
if rs("dx")=0 then
sx="单选"
end if %>
<%=Left(s,x-1)%> '显示除选择部分外的试题内容
<font color="red">
<%=sx%> <BR> '显示是单选还是多选题
</font>
<% s=Right(s,Len(s)-x+1)
x=InStr(s,"B.") %> '以下开始显示复选框及选择部分
<INPUT Type=CheckBox Name=A Value="a">
<%=Left(s,x-1)%><BR>
<%s=Right(s,Len(s)-x+1)
x=InStr(s,"C.")%>
<INPUT Type=CheckBox Name=A Value="b">
<%=Left(s,x-1)%><BR>
<%s=Right(s,Len(s)-x+1)
x=InStr(s,"D.")%>
<INPUT Type=CheckBox Name=A Value="c">
<%=Left(s,x-1)%><BR>
<%s=Right(s,Len(s)-x+1)%>
<INPUT Type=CheckBox Name=A Value="d"> <%=s%>
<BR>
<INPUT Type=Submit Value="查看答案">
<a href="lkzk.asp" target="_self">继续做题</a> <BR>
<%if rsu2("nnn")+rsu2("yyy")=0 then rsu2("yyy")=1 end if%>
正确率：<%=FormatNumber(rsu2("yyy")/(rsu2("nnn")+rsu2("yyy"))*100, 2, True)%>%
总答题数：<%=rsu2("nnn")+rsu2("yyy")%>
</form>
</font>
</BODY>
-----------------Save.asp-------------------

<%
Set rsu2 = GetMdbStaticRecordset("lkzk.mdb", "IP")
Set rs = GetMdbStaticRecordset("lkzk.mdb", "题库")
%>
<HTML>
<BODY >
<% I=CInt(Request("AI"))
rs.AbsolutePosition=I+1
ssx="错"
A=Replace( Request("A"), ", ", "" )
if A=rs("xz") then '判断答题正误
ssx="对"
end if
%>
<FONT Color=Red>
您答<%=ssx%>了 '显示答案正误等信息
</FONT>
试题库总第<%=CStr(I+1+5)%>题您的答案是：<%=A%>
参考答案是：<%=rs("xz")%>
<%
ClientIP = Request.ServerVariables("REMOTE_ADDR")
userIP=Right(ClientIP,Len(ClientIP)-InStrRev(ClientIP,"."))
rsu2.AbsolutePosition=userIP
rsu2.Update
If ssx="对" then
rsu2("yyy") =rsu2("yyy")+1
End if
if ssx<>"对" then
rsu2("nnn") =rsu2("nnn")+1
End if
rsu2.Update '以下将正误结果记录于数据库表“IP”中
%>
</BODY>
</HTML>
--------------Db0.fun----------------
<% ' 以下为函数程序
'---------------------------------------------------
Function GetMdbConnection( FileName )
Dim Provider, DBPath
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath = "Data Source=" & Server.MapPath(FileName)
Set GetMdbConnection = GetConnection( Provider & DBPath )
End Function
'---------------------------------------------------
Function GetMdbRecordset( FileName, Source )
Set GetMdbRecordset = GetMdbRs( FileName, Source, 2, "" )
End Function
'---------------------------------------------------
Function GetMdbStaticRecordset( FileName, Source )
Set GetMdbStaticRecordset = GetMdbRs( FileName, Source, 3, "" )
End Function
'---------------------------------------------------
Function GetConnection( Param )
Dim conn
On Error Resume Next
Set GetConnection = Nothing
Set conn = Server.CreateObject("ADODB.Connection")
If Err.Number <> 0 Then Exit Function
conn.Open Param
If Err.Number <> 0 Then Exit Function
Set GetConnection = conn
End Function
'---------------------------------------------------
Function GetMdbRs( FileName, Source, Cursor, Password )
Dim conn, rs
On Error Resume Next
Set GetMdbRs = Nothing
If Len(Password) = 0 Then
Set conn = GetMdbConnection( FileName )
Else
Set conn = GetSecuredMdbConnection( FileName, Password )
End If
If conn Is Nothing Then Exit Function
Set rs = Server.CreateObject("ADODB.Recordset")
If Err.Number <> 0 Then Exit Function
rs.Open source, conn, Cursor, 2
If Err.Number <> 0 Then Exit Function
Set GetMdbRs = rs
End Function
'---------------------------------------------------
%>

具体参考:

❸ 谁有《源代码》百度网盘资源,发给我一份呗

《源代码》网络网盘高清资源免费在线观看

链接:

提取码: hfaa

影片讲述了一位在阿富汗执行任务的美国空军飞行员柯尔特·史蒂文斯，醒来时发现自己正处在一辆前往芝加哥的火车上，并就此经历的一系列惊心动魄的事件。

❹ 如何通过查看网页源代码查看答题网站的答案

如果是写作业的话不建议太过分作弊。我觉得这方法应该行不通，要看你是什么样的网站。
如果是提交答案老师批改肯定不行，毕竟不是电脑改答案肯定不会再电脑里。
如果是提交给服务器检查那也不一定行，毕竟人家多半是用javascript对照答案文件的，你顶多找到文件再服务器哪里，但是你是以guest或一般user权限访问服务器肯定不给你打开文件。
如果是练习题的网页可以看一下脚本，找一下input源码试试，好久没玩html了，不知道怎么教你，你自己网络一下input源码的工作原理吧，如果是选择题那你看有没有0123（我记得好像有0,0就是选项一）之类的，如果是文本框，看到中文或者引号的地方注意一下，引号里的不是脚本就是答案，这个凭直觉应该看得出来。
专业名词不懂就网络一下，答案仅供参考因为我今年才初1。还有不建议作弊。
补充：文本框哪里不一定是全句对照，很可能是看看你有没有关键词（也就是是不是大致一样）或者按照错误率（一定错误率之内算对）。不过有文本框的多半就是老师或者员工对答案的啦。

❺ 求助！！HTML源代码！要求可以实现在线答题，且为多项选择题的源码！

你说的多项选择题，我是不是可以理解成多选？？

多选的实现是这样的：
第一：必须将多选框放到form里面。
第二：然后name属性完全一样，value不相同。这样当你提交到Action中的时候，只需要使用request对象获取toselect的值就行了。
第三：获取值：request.getParameterValues("toselect")，就会将选中的多选框里面的value获取，并且返回一个String[]数组，这个数组里面就有你想要的值：即选中的值
<html>
<body>
<form>
<input type = "checkbox" value = "A" name = "toselect"/>A
<input type = "checkbox" value = "B" name = "toselect"/>B
<input type = "checkbox" value = "C" name = "toselect"/>C
<input type = "checkbox" value = "D" name = "toselect"/>D
</form>
</body>
</html>

❻ 微信公众平台推送的答题类的测验游戏是怎么做出来的

答题测试的H5作为不少商家活动的首选类型，需求自然就很大。一般来说，答题测试按功能层面又分为根据趣味测试、问卷调查两大类型。

趣味测试H5：根据得分获得不同结果，用户活动营销

问卷调查H5：统计答题人的选项/得分，用于数据收集

之前写过类似的教程，使用的是专业H5页面制作工具：Epub360

❼ 我想自己做一款答题类app，只在自己公司内部使用，方便考核。请问该怎么做有没有傻瓜软件

做一款答题类app，只在自己公司内部使用，方便考核

如今，不少企业都想拥有属于自己企业或产品的手机APP，但其中最困扰企业主的问题就是：开发一款手机APP到底需要多少钱？

简单点来说，要视手机APP的需求及质量而言，价位一般在几千到十几万左右，更高端的价格更高。

四、APP开发公司的所在地

需要注意的是，同样实力的APP开发公司，在不同的城市也会导致APP的成本费用高一些，如在北京、深圳和上海等地的开发公司开发成本费用就会比较高，因为当地开发人员的薪资和其他支出相对更高。

导航:首页 > 源码编译 > 全民趣答题的源码

全民趣答题的源码

与全民趣答题的源码相关的资料