Tjenixen. Tala om att jag sitter fast. Försöker köra en insert i en sql server db, men det vill inte funka. Löste det själv.. Hade stavat fel i klassen.. :( 4 timmars felkontroll för detta.Felmeddelande
Subben där insättning görs:
<code>Private Sub lnkRegistrerakund_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles lnkRegistrerakund.LinkClicked
Dim kund As New clsKund
Dim myConnection As SqlConnection
Dim cn As New clsDatabasuppkoppling
Dim tömma As New clsTömma
myConnection = cn.uppkoppling()
Dim mInsertCommand As SqlCommand = New SqlCommand("INSERT INTO " & _
"Kund(Förnamn, Efternamn, Adress, Postnummer, Ort, Telefon, Mobil)" & _
"VALUES(@Förnamn, @Efternamn, @Adress, @Postnummer, @Ort, @Telefon, @Mobil)", myConnection)
kund.fornamn = txtFornamn.Text 'klassanrop som sätter värde
kund.efternamn = txtEfternamn.Text
kund.adress = txtAdress.Text
kund.postnr = txtPostnr.Text
kund.ort = txtOrt.Text
kund.telefon = txtTel.Text
kund.mobil = txtMobil.Text
mInsertCommand.CommandType = CommandType.Text
mInsertCommand.Parameters.Add("@Förnamn", kund.fornamn)
mInsertCommand.Parameters.Add("@Efternamn", kund.efternamn)
mInsertCommand.Parameters.Add("@Adress", kund.adress)
mInsertCommand.Parameters.Add("@Postnummer", kund.postnr)
mInsertCommand.Parameters.Add("@Ort", kund.ort)
mInsertCommand.Parameters.Add("@Telefon", kund.telefon)
mInsertCommand.Parameters.Add("@Mobil", kund.mobil)
Try
cn.open(myConnection)
mInsertCommand.ExecuteNonQuery()
MessageBox.Show("Registreringen lyckades", "Registrering", MessageBoxButtons.OK, MessageBoxIcon.Information)
tömma.grpBox(grpKunduppgifter)
Catch
If myConnection.State = ConnectionState.Open Then
cn.close(myConnection)
End If
MsgBox("Ett fel inträffade. Felnummer: " & Err.Number & _
" Beskrivning: " & Err.Description & " Källa: " & Err.Source)
Finally
cn.close(myConnection)
End Try
End Sub
</code>
När jag kör detta för jag från try catch satsen följande felmeddelande i messageboxen:
Ett fel inträffade, Felnummer: 5 Beskrivning: Prepared statement '(@Förnamn nvarchar(4000), @Efternamn nvarchar(4000), @Adress nvarc' expects parameters @Ort, wich was not supplied. Källa: .Net SqlClient Data provider
Är det någon som har en aning om varför det blir fel
MVH/ ERIKSv: Felmeddelande