用酸奶做冰淇淋: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就是要传递的答题结果

觉得你的方法不是很好.我说下我的思路:

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")就可以得到提交的内容~~~~