Kuinka Access 2000 tietokantaan kirjoitetaan tietoa? Lukeminen onnistuu hyvin, mutta palvelin kertoo virheeksi, että "Toiminnossa on käytettävä päivitettävää kyselyä.". Olen siis tehnyt jotakin perustavanlaatuisesti väärin, mutta mitä?
***
Dim oConn
Dim oRS
Dim sSQL
Dim sColor
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../foorumit.mdb"))
Response.Expires = -1
sSQL = "INSERT INTO kayttajat (kayttaja_nick,kayttaja_sposti,kayttaja_ssana, kayttaja_taso, kayttaja_viesti, kayttaja_hahmokpl) VALUES('"&strKtunnusTaytetty&"','"&strSahkopostiTaytetty&"','"&strSalasanaTaytetty&"',1, '"&strViesti&"',1)"
oConn.Execute sSQL,recaffected
'Set oRS = oConn.Execute(sSQL)
Response.Write("Toteutetaan käsky: " & sSQL)
oConn.Close
***
Dim oConn
Dim oRS
Dim sSQL
Dim sColor
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../foorumit.mdb"))
Response.Expires = -1
sSQL = "INSERT INTO kayttajat (kayttaja_nick,kayttaja_sposti,kayttaja_ssana, kayttaja_taso, kayttaja_viesti, kayttaja_hahmokpl) VALUES('"&strKtunnusTaytetty&"','"&strSahkopostiTaytetty&"','"&strSalasanaTaytetty&"',1, '"&strViesti&"',1)"
oConn.Execute sSQL,recaffected
'Set oRS = oConn.Execute(sSQL)
Response.Write("Toteutetaan käsky: " & sSQL)
oConn.Close
Vastaukset 1
Vanhimmat
Ongelma ratkesikin jo. Unohdin asettaa kansion oikeudet.