❶ 如何通過答題網站源代碼查看答案
看不到的,你把網站架構想的太簡單了,網站答案是在你提交答卷後,在後台進行校驗的,在你答題的時候,源碼裡面是不會有答案的
❷ 簡單的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-------------
<!-- #include virtual="/lkzk/DB0.fun" -->
<%
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-------------------
<!-- #include virtual="/lkzk/DB0.fun" -->
<%
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
'---------------------------------------------------
%>
具體參考:
❸ 誰有《源代碼》百度網盤資源,發給我一份唄
《源代碼》網路網盤高清資源免費在線觀看
鏈接:
影片講述了一位在阿富汗執行任務的美國空軍飛行員柯爾特·史蒂文斯,醒來時發現自己正處在一輛前往芝加哥的火車上,並就此經歷的一系列驚心動魄的事件。
❹ 如何通過查看網頁源代碼查看答題網站的答案
如果是寫作業的話不建議太過分作弊。我覺得這方法應該行不通,要看你是什麼樣的網站。
如果是提交答案老師批改肯定不行,畢竟不是電腦改答案肯定不會再電腦里。
如果是提交給伺服器檢查那也不一定行,畢竟人家多半是用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的成本費用高一些,如在北京、深圳和上海等地的開發公司開發成本費用就會比較高,因為當地開發人員的薪資和其他支出相對更高。