I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
strSQL=\"SELECT * FROM bestilt WHERE (sessionID=\'\" & Session.SessionID & \"\' AND varenr=\'\" & request.querystring(\"varenr\") & \"\')\" \' response.write strSQL Set database = Con.Execute(strSQL)
if database.bof or database.eof then \' der blev ikke fundet nogen, der matchede strSQL = \"INSERT INTO bestilt (sessionID, varenr, antal) VALUES (\'\" & Session.SessionID & \"\' , \'\" & request.querystring(\"varenr\") & \"\', \'\" & request.querystring(\"antal\") & \"\')\" response.write strSQL \' Set database = Con.Execute(strSQL) response.write \"<Center><H2>Tak fordi du bestilte her... Du har nu bestilt : </H2></center>\" & database(\"antal\") else \' Der blev fundet nogen i forvejen... nyantal = (database(\"antal\") + request.querystring(\"antal\")) strSQL = \"\" strSQL = strSQL & \"UPDATE bestilt SET antal=\'\" & nyantal & \"\' WHERE sessionID=\'\" & Session.SessionID & \"\' AND varenr=\'\" & request.querystring(\"varenr\") & \"\'\" Set database = Con.Execute(strSQL) response.write \"<Center>Din bestilling er nu blevet opdateret med 1 = \" & database(\"antal\") end if
strSQL = \"SELECT * FROM bestilt WHERE \" & Session.SessionID & \" = bestilt.sessionID AND \'\" & request.querystring(\"varenr\") & \"\' = bestilt.varenr\" Set database = Con.Execute(strSQL)
if database.bof or database.eof then \' der blev ikke fundet nogen, der matchede strSQL = \"INSERT INTO bestilt (sessionID, varenr, antal) VALUES (\" & Session.SessionID & \" , \'\" & request.querystring(\"varenr\") & \"\', \" & request.querystring(\"antal\") & \")\" Set database2 = Con.Execute(strSQL) response.write \"<Center><H2>Tak fordi du bestilte her... Du har nu bestilt : </H2></center>\" else \' Der blev fundet nogen i forvejen... nyantal = (database(\"antal\") + request.querystring(\"antal\")) strSQL = \"UPDATE bestilt SET bestilt.antal=nyantal WHERE bestilt.sessionID=\" & Session.SessionID & \" AND bestilt.varenr=\'\" & request.querystring(\"varenr\") & \"\'\" Set database2 = Con.Execute(strSQL) response.write \"<Center>Din bestilling er nu blevet opdateret med 1 + \" & database2(\"antal\") end if
og det er først efter else, at det går galt,(i UPDATE sætningen, men hvrofor?
fejlen er dette : Der er ikke angivet nogen værdi for en eller flere krævede parametre.
ok, har selv fået det sidste til at køre nu :-) TAK for hjælpen
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.