Du hämtar aldrig de varibler som används, du infogar bara dem som text,
Så här t.ex.
objNyhet.InsertCommand.CommandText = "INSERT INTO Nyhet(ForfattarID) VALUES (" + intSignatur + ")"
Frågan#1
dim objNyhet as new OleDbDataAdapter("SELECT * FROM Nyhet", oConn)
dim ds = new DataSet()
'fyll dataset
objNyhet.Fill(ds, "Nyhet")
'läser in och konverterar från de olika webbkontrollerna
dim intSignatur as Integer = Convert.ToInt32(DDLSignatur.SelectedItem.Value)
dim intAffarsomrade as Integer = Convert.ToInt32(DDLAffarsomrade.SelectedItem.Value)
dim intNyhetskategori as Integer = Convert.ToInt32(DDLNyhetskategori.SelectedItem.Value)
dim strRubrik as String = tbRubrik.Text
dim strFriText as String = tbFritext.Text
dim strStartDatum as String = tbStartDatum.Text
dim strSlutDatum as String = tbSlutDatum.Text
dim strURL as String = tbURL.Text
dim boolStartsida as Boolean = 0
'skapa en datarad i datasetet
dim dr as DataRow = ds.Tables("Nyhet").NewRow()
'dr(0) är en räknare som efterfrågas
dr(1)= intSignatur
dr(2)= intAffarsomrade
dr(3)= intNyhetskategori
dr(4)= strRubrik
dr(5) = strFriText
dr(6) = boolStartsida
dr(7) = strStartDatum
dr(8) = strSlutDatum
dr(9) = strURL
ds.Tables("Nyhet").Rows.Add(dr)
'läser in till datakällan
objNyhet.InsertCommand = new OleDbCommand
objNyhet.InsertCommand.CommandText = "INSERT INTO Nyhet(ForfattarID, AffarsomradesID, NyhetskategoriID, Rubrik, LopText, Startsidan, Startdatum, Slutdatum, DokumentURL) VALUES (intSignatur,intForfattarID,intAffarsomradesID,intNyhetsKategoriID,'strRubrik','strLopText',boolStartsidan,'strStartDatum','strSlutDatum','strURL')"
objNyhet.InsertCommand.Connection = oConn
objNyhet.Update(ds, "Nyhet")
end sub
fungerar inte alls...ah, vad ska jag göra. var ska jag börja? *grina*
