| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 930 人关注过本帖
标题:[求助]考试系统中填空字符如何与已知正确答案匹配
取消只看楼主 加入收藏
chenlixiaoyao
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-5-31
收藏
 问题点数:0 回复次数:3 
[求助]考试系统中填空字符如何与已知正确答案匹配
请教大家,我的毕业设计要把填空题的答案和正确答案进行对比,一个填空题还有多个空,而我的答案在数据库里只有一个字段,该如何实现?
搜索更多相关主题的帖子: 数据库 字符 考试 填空 系统 
2006-06-01 11:08
chenlixiaoyao
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-5-31
收藏
得分:0 
高手!!!!
还想问一下,这样的话是不是要把数据库里的答案字段改成abc|def|ghi|jkl|mno|pqu|vwx|yz这样的形势?
TempAry("&CStr(i)&")="&TempAry(i)是什莫意思呢?
2006-06-01 12:20
chenlixiaoyao
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-5-31
收藏
得分:0 

楼上的朋友,我还是不明白,我给你发一段我的代码,你能帮我看一下怎莫改吗?

2006-06-01 21:45
chenlixiaoyao
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-5-31
收藏
得分:0 
set wyrs3=server.CreateObject("adodb.recordset")
wysql3="select * from "&session("mdb")&" where kemu='"&kemu&"' and type='3'"(类型为填空)
wyrs3.open wysql3,conn,1,1
do while not wyrs3.eof
tkwy=tkwy+1
tkanws=request.Form("tk"&tkwy)--这是从递交表单取出的用户填空题答案
tkanw=replace(replace(tkanws,"",""),"","")
tkan=trim(wyrs3("answer"))
if tkanw=tkan then --tkan是正确答案
tkzf=tkzf+tkfs --tkzf是总分,如果相等就总分增加
end if
wyrs3.movenext
loop
我想问,如何把上面简单的tkanw=tkan 条件语句,变成用分割符表示出来的多个空的对比?用一个for语句循环就行吗?
还有,显示用户答案和正确答案的时候,怎莫把那些分隔符去掉呢?
谢谢了!!!!!!!!!!!!!!!!!!11
2006-06-01 21:52
快速回复:[求助]考试系统中填空字符如何与已知正确答案匹配
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.038602 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved