gebruiker53
Guest
- Lid geworden
- 8 mrt 2007
- Berichten
- 56
Ik heb een error in mijn sql syntax, maar ik kom er niet uit. Ik heb de sql al op het scherm laten schrijvne, maar ook dan zie ik niet wat er fout is, wie o wie kan mij helpen (zie hieronder de code)
En hier de uitvoer van de sql:
Code:
Set Rec = Server.CreateObject("ADODB.Recordset")
if id>0 then
SQL = "UPDATE OpleInst SET"
SQL=SQL&" Inst_Name='" & ReplaceBody(Uploader.form("Inst_Name")) & "'"
SQL=SQL&" Inst_Categorie='" & ReplaceBody(Uploader.form("Inst_Categorie")) & "'"
SQL=SQL&", Inst_Unit='" & ReplaceBody(Uploader.form("Inst_Unit")) & "'"
SQL=SQL&", Inst_Adres='" & Uploader.form("Inst_Adres") & "'"
SQL=SQL&", Inst_Postcode='" & Uploader.form("Inst_Postcode") & "'"
SQL=SQL&", Inst_Plaats='" & Uploader.form("Inst_Plaats") & "'"
SQL=SQL&", Inst_Telefoon='" & Uploader.form("Inst_Telefoon") & "'"
SQL=SQL&", Inst_Email='" & Uploader.form("Inst_Email") & "'"
SQL=SQL&", Inst_URL='" & uploader.form("Inst_URL") & "'"
SQL=SQL&", Inst_Descr='" & ReplaceBody(uploader.form("Inst_Descr")) & "'"
if not len(uploader.form("Inst_CEDEO"))=0 then
SQL=SQL&", Inst_CEDEO=" & uploader.form("Inst_CEDEO") & ""
else
SQL=SQL&", Inst_CEDEO=''"
end if
if not len(uploader.form("Inst_GBIO"))=0 then
SQL=SQL&", Inst_GBIO=" & uploader.form("Inst_GBIO") & ""
else
SQL=SQL&", Inst_GBIO=''"
end if
if not len(uploader.form("Inst_VETRON"))=0 then
SQL=SQL&", Inst_VETRON=" & uploader.form("Inst_VETRON") & ""
else
SQL=SQL&", Inst_VETRON=''"
end if
if not len(uploader.form("Inst_NOBOL"))=0 then
SQL=SQL&", Inst_NOBOL=" & uploader.form("Inst_NOBOL") & ""
else
SQL=SQL&", Inst_NOBOL=''"
end if
if not len(uploader.form("Inst_ISO9001"))=0 then
SQL=SQL&", Inst_ISO9001=" & uploader.form("Inst_ISO9001") & ""
else
SQL=SQL&", Inst_ISO9001=''"
end if
if not len(uploader.form("Inst_ECDL"))=0 then
SQL=SQL&", Inst_ECDL=" & uploader.form("Inst_ECDL") & ""
else
SQL=SQL&", Inst_ECDL=''"
end if
if not len(uploader.form("Inst_AACSB"))=0 then
SQL=SQL&", Inst_AACSB=" & uploader.form("Inst_AACSB") & ""
else
SQL=SQL&", Inst_AACSB=''"
end if
if not len(uploader.form("Inst_Equis"))=0 then
SQL=SQL&", Inst_Equis=" & uploader.form("Inst_Equis") & ""
else
SQL=SQL&", Inst_Equis=''"
end if
'
'
'
response.write SQL
SQL=SQL&" Where inst_id="&cstr(id)
ConnBasis.Execute(SQL)
response.redirect "opleidingsinstituten.asp?action=wijzig&id="&cstr(id)&"&saved=yes"
En hier de uitvoer van de sql:
UPDATE OpleInst SET Inst_Name='Akofas Opleidingen' Inst_Categorie='2', Inst_Unit='', Inst_Adres='Stationstraat 122', Inst_Postcode='6191 GB', Inst_Plaats='Beek', Inst_Telefoon='046-4377996', Inst_Email='info@akofas.nl', Inst_URL='www.akofas.nl', Inst_Descr=' Akofas Opleidingen, opgericht in 1990, is een opleidingsinstituut dat zich volledig toelegt op het verzorgen van opleidingen voor medewerkers van bedrijven, overheidsinstellingen, reïntegratiebedrijven en particulieren. Effect en efficiency staan in onze opleidingsfilosofie centraal. Alles staat in dienst van het beoogde rendement.
Visie
Akofas wil voor bedrijven een meedenkende partner zijn waar het gaat om opleidingsvraagstukken. Akofas streeft langdurige klantrelaties na waarin wij op basis van kennen, kunnen en vertrouwen opleidingen ontwerpen, uitvoeren en evalueren, steeds handelend vanuit het klantbelang.
Missie
Akofas laat medewerkers van bedrijven efficiënter en effectiever handelen, waardoor de organisatie waarin zij werkzaam zijn beter presteert. ', Inst_CEDEO='', Inst_GBIO='', Inst_VETRON='', Inst_NOBOL='', Inst_ISO9001='', Inst_ECDL=1, Inst_AACSB='', Inst_Equis='', inst_logo_small=''