Hej!
Jag använder SQL Server tillsammans med ASP, och får det här ytterst jobbiga felmeddelandet när jag ska sätta in en ny post i databasen:
Microsoft OLE DB Provider for ODBC Drivers fel '80040e14'
[Microsoft][ODBC SQL Server Driver][SQL Server]Violation of PRIMARY KEY constraint 'PK__orders_k5_52003__7720AD13'. Cannot insert duplicate key in object 'orders_k5_52003'.
/cd_web_1/order.asp, rad 238
Rad 238 är den jag markerat med rött i fet stil i koden nedan.
Jag hittar inget på Google och jag fattar inte ett dugg vad som kan vara problemet. Snälla, hjälp mig! Mycket tacksam för all hjälp jag kan få. :D
tbl_name = "orders_k5_" & Month(Now()) & Year(Now())
Set Rs = oConn.Execute("SELECT * FROM information_schema.tables WHERE table_name = '" & tbl_name & "'")
If Rs.EOF Then 'tabellen finns ej
Rs.Close : Set Rs = Nothing
'skapa tabellen och nödvändiga fält
oConn.Execute("CREATE TABLE " & tbl_name & "(" &_
"Firstname char(200)," & _
"Lastname char(200)," & _
"Addrinfo char(200)," & _
"Street char(200)," & _
"Streetnumber char(200)," & _
"Streetalphanumber char(200)," & _
"City char(200)," & _
"Postalcode char(200)," & _
"Phonenumber char(50) primary key," & _
"Altphonenumber char(200)," & _
"Email char(200)," & _
"Civicnr char(200)," & _
"Subsnrdepotnr char(200)," & _
"Curefnumber char(200)," & _
"Prod char(200)," & _
"Prod_info varchar(500)," & _
"Agentid int," & _
"Paymenttype int," & _
"Orderdate char(200)," & _
"Comments varchar(500)," & _
"Agentname char(200)," & _
"Campaign char(200))")
'" & tbl_name & "" & _
Else 'tabellen existerar
[red][b]oConn.Execute("INSERT INTO " & tbl_name & "" & _[/b][/red]
"(Firstname,Lastname,Addrinfo,Street,Streetnumber,Streetalphanumber,City," &_
"Postalcode,Phonenumber,Altphonenumber,Email,Civicnr,Subsnrdepotnr,Curefnumber," & _
"Prod,Prod_info,Agentid,Paymenttype,Orderdate,Comments,Agentname,Campaign)" & _
"VALUES('" & strFirstName & "','" & strLastname & "','" & strAddrinfo & "','" & strStreet & "'," & _
"'" & strStreetnr & "','" & strstreetAlphanumber & "','" & strCity & "','" & strPostalcode & "'," & _
"'" & strPhonenumber & "','" & strAlthomephone & "','" & strEmail & "','_Civicnr_'," & _
"'" & strSubsNrDepotNr & "','" & strCureFNr & "','" & strProductName & "','_Produktinfo'," & _
"'" & strAgentid & "','" & intPaymentid & "','" & Now() & "','" & strComments & "'," & _
"'" & strAgentName & "','Kampanj')")
End If