用酸奶做冰淇淋:asp高手请进,脚本中的变量怎样传递到数据库
来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 03:42:27
现在编一个在线答题系统,想实现单击选择题就把答案提交到服务器的功能。现在用脚本实现了在线取得答案,但在脚本中怎样提交到数据库。部分代码如下
<script language=vbscript>
Sub DivClickS(pQstType)
On Error Resume Next '2002/09/02
lcStr= Trim(window.event.srcelement.name) '取表单项名称
msgbox lcstr
lcQstNo = Right(lcStr, Len(lcStr)-1)
lcStuNo = Trim(Form.StuNo.Value)
lcResult = "" '答题结果
If pQstType=1 Then '单选
For lnI=1 To 4
If Form.All(lcStr & lnI).Checked Then
lcResult = Form.All(lcStr & lnI).Value
Exit For
End If
Next
end if
msgbox lcResult '答题结果
end sub
</script>
<FORM name=FORM action=psave.asp method=post>
<P><B> 【单项选择题-1】</B></P>
<DIV id=DIV1010111 name="DIV1010111">
<P>Word文档默认的扩展名是( )。
<P> A.WRI B.TXT C.DOC D.DOT</P>
<P><B> 【本题答案:】
<INPUT id=A10101111 onclick=divclicks(1) type=radio value=A name=A1010111>A
<INPUT id=A10101112 onclick=divclicks(1) type=radio value=B name=A1010111>B
<INPUT id=A10101113 onclick=divclicks(1) type=radio value=C name=A1010111>C
<INPUT id=A10101114 onclick=divclicks(1) type=radio value=D name=A1010111>D </B></P>
</DIV>
<HR color=#ff0000 SIZE=1>
</form>
lcresult就是要传递的答题结果
<script language=vbscript>
Sub DivClickS(pQstType)
On Error Resume Next '2002/09/02
lcStr= Trim(window.event.srcelement.name) '取表单项名称
msgbox lcstr
lcQstNo = Right(lcStr, Len(lcStr)-1)
lcStuNo = Trim(Form.StuNo.Value)
lcResult = "" '答题结果
If pQstType=1 Then '单选
For lnI=1 To 4
If Form.All(lcStr & lnI).Checked Then
lcResult = Form.All(lcStr & lnI).Value
Exit For
End If
Next
end if
msgbox lcResult '答题结果
end sub
</script>
<FORM name=FORM action=psave.asp method=post>
<P><B> 【单项选择题-1】</B></P>
<DIV id=DIV1010111 name="DIV1010111">
<P>Word文档默认的扩展名是( )。
<P> A.WRI B.TXT C.DOC D.DOT</P>
<P><B> 【本题答案:】
<INPUT id=A10101111 onclick=divclicks(1) type=radio value=A name=A1010111>A
<INPUT id=A10101112 onclick=divclicks(1) type=radio value=B name=A1010111>B
<INPUT id=A10101113 onclick=divclicks(1) type=radio value=C name=A1010111>C
<INPUT id=A10101114 onclick=divclicks(1) type=radio value=D name=A1010111>D </B></P>
</DIV>
<HR color=#ff0000 SIZE=1>
</form>
lcresult就是要传递的答题结果
觉得你的方法不是很好.我说下我的思路:
1,建立选择题数据库,字段设置大致为:
ID,QUESTION,A,B,C,D,ANSWER
QUESTION:选择题题干;
A,B,C,D对应的4个答案内容;
ANSWER:正确答案
2,问题的输出:
可以一次从数据库提取一个问题,也可以一下提取10个问题,当然是随机的取,不能重复.
使用ASP代码将问题输出到学生端,样式自定,我看你做的就很好了.
3,答案的回收:
可以在网页上放一个交卷按钮,SUBMIT该学生的答案.
当然是用REQUEST来获得提交的内容,并分离出来,可以保存到SESSION中,也可以分离后存到专门建立的学生答案数据库里.
这是开发框架,其中还有很多细节问题,....楼主好象在问一个细节啊?提交答案就是在脚本里用FORM.SUBMIT()表单就可以了啊,ASP里用REQUEST("xxxx")就可以得到提交的内容~~~~