Får hela tiden felmeddelandet "Datatype mismatch in criteria expression" när jag försöker lägga till poster i min databas...
Såhär ser koden ut i stora drag:
Denna kod skall hämta QuestionID (Primärnyckel) från tabellen Questions, för senast tillagda raden:
objCmd.CommandText = "SELECT @@identity FROM Questions"
objCmd.CommandType = CommandType.Text
objRdr = objCmd.ExecuteReader()
objRdr.Read()
dim intQuestionID as Integer = CInt(objRdr.Item(0))
Denna kod skall lägga till en post skall lägga till en rad i tabellen Choices:
objCmd.CommandText = "INSERT INTO Choices([Text], QuestionID) VALUES(@Text, @QuestionID)"
objCmd.Parameters.Add("Text", TextBox.Text)
objCmd.Parameters.Add("QuestionID", intQuestionID)
objCmd.CommandType = CommandType.Text
Felet uppstår på denna raden:
objCmd.ExecuteNonQuery()
Vad är fel???? Det fungerar när jag kör frågorna direkt i MS Access.... Blir så trött....!!!!!