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