Zunächst einmal begann ich meinen Code mit:Charaktere gefunden nach dem Ende der SQL-Anweisung Fehler
Comm2 = "INSERT INTO [Results]" _
& "([ResultsID], [TestID], [Thickness], [SNR], [STD], [M1], [M2], [kVp], [mAs], [TargetFilter])" _
& " values('" & CInt(NewRID) & " ', '" & CInt(NewRID) & " ', '" & Thickness & "', '" & SNR & "', '" & STD & "','" & M1 & "', '" & M2 & "', '" & kVp & "', '" & mAs & "', '" & TargetFilter & "')"
Comm3 = "INSERT INTO [Test]" _
& "([TestID], [Date], [MachineID], [RadiographerID])" _
& " values('" & CInt(NewRID) & " ', '" & todaysdate & " ', '" & 1 & " ', '" & UserID & " ',)"
aber dies nicht funktioniert, wie die Tabellen in der Datenbank verknüpft sind, so sie zur gleichen Zeit musste sich ändern, so ich versuche zur Zeit dies:
Comm2 = "INSERT INTO [Results] ([ResultsID],[TestID],[Tickness],[SNR],[STD],[M1],[M2],[kVp],[mAs],[TargetFilter]) VALUES('" & CInt(NewRID) & " ', '" & CInt(NewRID) & " ', '" & Thickness & "', '" & SNR & "', '" & STD & "','" & M1 & "', '" & M2 & "', '" & kVp & "', '" & mAs & "', '" & TargetFilter & "');" _
& "INSERT INTO [Test] ([TestID], [Date[, [MachineID], [RadiographerID]) VALUES('" & CInt(NewRID) & " ', '" & CDate(todaysdate) & " ', '" & CInt(MachineID) & "', '" & CStr(UserID) & "')"
OleDbInsertCommand.Connection = conn
OleDbInsertCommand.CommandText = Comm2
adapter2.InsertCommand = OleDbInsertCommand
adapter2.InsertCommand.ExecuteNonQuery()
Und ich bin immer diese Fehlermeldung: https://gyazo.com/36aa32cbfb0f54bbe571f6a9384114e1
Comm2 = "INSERT INTO [Results] ([ResultsID], [TestID], [Thickness], [SNR], [STD], [M1], [M2], [kVp], [mAs],[TargetFilter]) VALUES('" & CInt(NewRID) & " ', '" & CInt(NewRID) & " ', '" & Thickness & "', '" & SNR & "', '" & STD & "','" & M1 & "', '" & M2 & "', '" & kVp & "', '" & mAs & "', '" & TargetFilter & "')"
comm3 = " INSERT INTO [Test] ([TestID], [Date], [MachineID], [RadiographerID]) VALUES('" & CInt(NewRID) & " ', '" & CDate(todaysdate) & " ', '" & CInt(MachineID) & "', '" & CInt(UserID) & "')"
OleDbInsertCommand.Connection = conn
OleDbInsertCommand.CommandText = comm3
adapter2.InsertCommand = OleDbInsertCommand
adapter2.InsertCommand.ExecuteNonQuery()
OleDbInsertCommand.CommandText = Comm2
adapter2.InsertCommand = OleDbInsertCommand
adapter2.InsertCommand.ExecuteNonQuery()
Mehr als wahrscheinlich wird das Problem weggehen, wenn Sie SQL-Parameter verwenden, anstatt Bits der Schnur zusammenzukleben. – Plutonix
Hey, ich habe gerade "SQL-Parameter" gegoogelt und kann nichts finden, was ähnlich aussieht, hast du einen guten Link, wo ich mein Wissen davon ablegen kann oder ein Beispiel dafür habe? –
https://msdn.microsoft.com/en-us/library/system.data.oledb.oledbparameter (v = vs.110).aspx und ungefähr 1-2 Millionen Qs hier – Plutonix