4 svar · 181 visningar · startad av Lord Moyne
Har problem med följande INSERT kommando, och får felmeddelandet "Column count doesen't match value count".
Hjälp, någon?
intSeasonID = CInt(Request.QueryString("SeasonID"))
intLeagueID = CInt(Request.QueryString("LeagueID"))
intGameID = CInt(Request.QueryString("GameID"))
If IsArray(Session("Stats")) = True Then
Dim arrStats
arrStats = Session("Stats")
Set objConn = dbConn()
For i = 0 to UBound(arrStats)
If IsEmpty(arrStats(i,0)) = False Then
intTeamID = arrStats(i,0)
intTime = arrStats(i,2)
strEvent = arrStats(i,3) & "/" & arrStats(i,4)
strPlayer = arrStats(i,5) & "/" & arrStats(i,6)
strSQL = "INSERT INTO matchfacts (mID, mSeasonID, mLeagueID, mGameID, mTeamID, mTime, mEvent, mPlayer) " & _
"VALUES (NULL, " & intSeasonID & ", " & intLeagueID & ", " & intGameID & ", " & intTeamID & ", " & intTime & ", '" & strEvent & "', '" & strPlayer & "')"
Set objRS = objConn.Execute(strSQL) : Set objRS = Nothing
End If
Next
Set objConn = Nothing
End If
Response.Redirect("creategame.asp?Stage=1")
Debug time
strSQL = "INSERT INTO matchfacts (mID, mSeasonID, mLeagueID, mGameID, mTeamID, mTime, mEvent, mPlayer) " & _
"VALUES (NULL, " & intSeasonID & ", " & intLeagueID & ", " & intGameID & ", " & intTeamID & ", " & intTime & ", '" & strEvent & "', '" & strPlayer & "')"
response.write "SQL:" & strSQL
response.end
' objConn.Execute(strSQL)
Vad blir resultatet av utskriften?
Vilka datatyper har kolumnerna?
Är det någon kolumn som är REQUIRED som du har utelämnat?
Är det fler angivna kolumner i SQL-satsen än vad som finns i databasen?
Tydligen var det intTimeID, som kan bestå av ett decimaltal, som ställde till det.
Löste det genom Replace(intTimeID, ",", ".").
Ja, ett komma kan ju enkelt spöka till det... om du inte kan använda dig av Date, så tycker jag att du borde använda String istället. Då slipper du dom där knepiga felmeddelandena.
