Halleluja, det funkar nu!! :D :D :D
Jag gick tillbaka till min fungerande, gamla kod och bytte ut kodsnutt efter kodsnutt enligt Era förslag och tips, och helt plötsligt så funkar allt!
Och tack vare emissions lilla lektion i "case-metoden" så slapp jag göra 9 knappt olika sidor (som det är på den gamla webbplatsen) utan istället blev det bara en sida med denna kod:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=adeator_se;UID=xxx;PWD=xxx"
Select Case Request.Querystring("sida")
case "start"
SQL="UPDATE start SET start='" & Replace(Request.Form("start"),"'","\'")& "'"
case "omadeator"
SQL="UPDATE start SET omadeator='" & Replace(Request.Form("omadeator"),"'","\'")& "'"
case "rekryt"
SQL="UPDATE start SET rekryt='" & Replace(Request.Form("rekryt"),"'","\'")& "'"
case "utb"
SQL="UPDATE start SET utb='" & Replace(Request.Form("utb"),"'","\'")& "'"
case "konsult"
SQL="UPDATE start SET konsult='" & Replace(Request.Form("konsult"),"'","\'")& "'"
case "partners"
SQL="UPDATE start SET partners='" & Replace(Request.Form("partners"),"'","\'")& "'"
case "natverk"
SQL="UPDATE start SET natverk='" & Replace(Request.Form("natverk"),"'","\'")& "'"
case "kunder"
SQL="UPDATE start SET kunder='" & Replace(Request.Form("kunder"),"'","\'")& "'"
case "kontakt"
SQL="UPDATE start SET kontakt='" & Replace(Request.Form("kontakt"),"'","\'")& "'"
End Select
Conn.Execute SQL
conn.close
Response.Redirect("kontrollpanelen.asp")
%>
Lite stolt är jag nog över den! ;)
Tusen tack för all Er hjälp!!! (y) (y)
