Detta funkade fint innan jag bytte ut min connection... nån som ser ett fel?
strNamn = Replace(Request.Form("namn"), "'", "''")
strSmeknamn = Replace(Request.Form("smeknamn"), "'", "''")
strAlder = Replace(Request.Form("alder"), "'", "''")
strBor = Replace(Request.Form("bor"), "'", "''")
strMusiksmak = Replace(Request.Form("musiksmak"), "'", "''")
strDricker = Replace(Request.Form("dricker"), "'", "''")
strMinne = Replace(Request.Form("minne"), "'", "''")
strDackning = Replace(Request.Form("dackning"), "'", "''")
strOl = Replace(Request.Form("ol"), "'", "''")
strDrink = Replace(Request.Form("drink"), "'", "''")
strSpy = Replace(Request.Form("spy"), "'", "''")
strEpost = Replace(Request.Form("epost"), "'", "''")
strNamn = Replace(strNamn, "%", "")
strSmeknamn = Replace(strSmeknamn, "%", "")
strAlder = Replace(strAlder, "%", "")
strBor = Replace(strBor, "%", "")
strMusiksmak = Replace(strMusiksmak, "%", "")
strDricker = Replace(strDricker, "%", "")
strMinne = Replace(strMinne, "%", "")
strDackning = Replace(strDackning, "%", "")
strOl = Replace(strOl, "%", "")
strDrink = Replace(strDrink, "%", "")
strSpy = Replace(strSpy, "%", "")
strEpost = Replace(strEpost, "%", "")
If Request.Form("nyhetsbrev") = "True" Then
strNyhetsbrev = "True"
Else
strNyhetsbrev = "False"
End If
sql= "update anv set "&_
"namn = '" &strNamn& "', "&_
"smeknamn = '" &strSmeknamn& "', "&_
"alder = '" &strAlder& "', "&_
"bor = '" &strBor& "', "&_
"musiksmak = '" &strMusiksmak& "', "&_
"dricker = '" &strDricker& "', "&_
"minne = '" &strMinne& "', "&_
"dackning = '" &strDackning& "', "&_
"ol = '" &strOl& "', "&_
"drink = '" &strDrink& "', "&_
"spy = '" &strSpy& "', "&_
"epost = '" &strEpost& "', "&_
"nyhetsbrev = " &strNyhetsbrev& " "&_
"where anvID = " &Session("ID")
'objConnect.Execute(sql),,128
'Response.Redirect("admin.asp?admin=form")
write sql
om jag srkiver ut sql så får jag =
update anv set namn = 'Jocke', smeknamn = 'alkis, pungis', alder = '1985-05-18', bor = 'Huddinge', musiksmak = '', dricker = 'allt med alkohol...', minne = 'kommer inte ihåg...', dackning = 'Någon av DE på kräftskivan', ol = 'Spendrups', drink = 'Peach...', spy = 'Whiskey', epost = 'jocke@alkisarna.com', nyhetsbrev = True where anvID = 1
