作者fumizuki (小獅子)
看板Visual_Basic
標題Re: [ASP]請幫我看看問題在哪裡~ 謝謝~~
時間Fri Oct 7 09:55:23 2005
※ 引述《misssun (小狐狸的小雞姐姐)》之銘言：
: 請高手們幫我看一下,下面的程式到底是哪裡出了錯
: 會出現
: " Microsoft VBScript 執行階段錯誤 (0x800A000D)
: 型態不符合: 'rsScore'
: line 38 "
: 這樣的錯誤訊息呢?!
: 以下是我的程式說明：
: 這段程式碼是我在進行線上考試的分數計算
: Score 就是最後的得分
: data資料表裡面存有考試者的資料account(身分證號)和name以及gscore(得分)
: 這三個欄位
: 為何我的得分一直寫不進去gscore這個欄位呢?
: 請大家為我解答~ 多謝多謝~~~
: <%
: Score = 0
: While Not rs.EOF
: Sel = Request( "No" & rs("題號") )
: Ans = rs("解答")
: If Ans = Sel Then
: Score = Score + rs("分數")
: End If
: rs.MoveNext
: Wend
: SQL = "Select * From data "
: SQL = SQL & "Where account=" & account & " And 姓名='" & Name & "'"
為什麼這邊沒有單引號
: Set rsScore = GetMdbRecordset( "data.mdb", SQL )
確定這行有執行正確嗎
: rsScore("gscore") = Score ===>line 38!
'偵錯
For i = 0 To rsScore.Fields.Count - 1
Response.Write(rs.Score(i)) '列出所有欄位
Next
: rsScore.Update
: %>
--
VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.58.156.43