在ASP页面里,我已经查询得到记录rs1("total") (为总分成绩)
         Dim n
         n=rs1("total")         response.write"总分:"&n&"<br>"   可以在页面上看到输出为‘总分:90’。接着,我再次查询得到记录rs2 ,我想将rs2("total")与 n 比较,看是否相等。但出错。代码如下:
    Do While Not rs2.eof      
       If rs2("total")=n Then
          num=num+1
       Else
     Exit do
       End If
      rs2.moveNext
    Loop
  
出错如下:
        总分:90      Microsoft VBScript 运行时错误 '800a000d'                     类型不匹配              \all\all\check.asp, line 699补充说明:rs2记录有100条,rs2("total")也是成绩。

解决方案 »

  1.   

    N久没用VB了
    看看是不是这样?
    If rs2("total").Value=n Then
              num=num+1
          Else 
      

  2.   

    试试  val(rs2("total"))=val(n)
      

  3.   

    另外给n一个类型吧  Dim n as double
      

  4.   


    总分:90Microsoft VBScript 运行时错误 '800a000d' 类型不匹配: 'val' \all\all\check.asp, line 699
      

  5.   


    情况也是这样
    总分:90 Microsoft VBScript 运行时错误 '800a000d' 类型不匹配: 'val' \all\all\check.asp, line 699 
      

  6.   

    在VB版,提问,问题得以解决解决办法,全部转为字符
          If cstr(rs2("total"))=cstr(n) Then 
              num=num+1 
          Else