Script:
Function Radbryt(rfix)
rfix = "<P>" & Replace(rfix, vbCrLf, "<br>") & "</P>"
Radbryt = rfix
end Function
rs.update
'Set the table column = to my input text box from my form
rs("Namn") = mySmartUpload.Form("Namn")
rs("Naradress") = mySmartUpload.Form("Naradress")
rs("Postnr") = mySmartUpload.Form("Postnr")
rs("Ort") = mySmartUpload.Form("Ort")
rs("Tel") = mySmartUpload.Form("Tel")
rs("Fax") = mySmartUpload.Form("Fax")
rs("Epost") = mySmartUpload.Form("Epost")
rs("www") = mySmartUpload.Form("www")
rs("Amnesomrade") = mySmartUpload.Form("Amnesomrade")
[b]RAD 65[/b] >rs("Ovrigt_swe") = Radbryt(mySmartUpload.Form("Ovrigt_swe"))
rs("Ovrigt_fin") = Radbryt(mySmartUpload.Form("Ovrigt_fin"))
rs("Password") = mySmartUpload.Form("Password")
rs.update
'I do a movelast here to get the ID that is automatically generated
'I also set the value to a local variable so I can write out to the database
rs.movelast
strID = rs("ID")
Felmeddelandet:
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'
Multiple-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done.
/katalog/swe/redigera2.asp, line 65
Det är ju radbrytnings funktionen som är problemet, men jag tycker det ser rätt ut...
------------------
His Divine Shadow is the most despicable being ever created, short and to the point.
http://forums.planetdivine-shadow.com
[Redigerat av His Divine Shadow den 12 sep 2001]
[Redigerat av His Divine Shadow den 12 sep 2001]