18. maj 2004 - 14:31Der er
15 kommentarer og 1 løsning
Min kode hænger!
Hey eksperter. Nu har jeg de sidste par dage arbejdet med at programmere en hjemmeside i asp, jeg har dog det problem at flere gange når jeg opdatere siderne så fryser de nærmest. Jeg kontaktede så web udbyderene og de skrev følgende: "Din applikation er nu genstartet, da denne var crashet. Dette kan blandt andet ske hvis der er noget kode der hænger."
Jeg kunne forestille mig det er pga. af nogle uendelige loops eller tilsvaredende.. Bruegr du for- og whileløkker, så vær sikker på de blir afsluttet..
Her er en af siderne som har fået web servicen til at gå "kold": <% if request.querystring("tilfoej") = "Ok" then %> <!--#include file="aabendatabaseforbindelse.asp"--> <% Set rs_tilfoejarrangementtilkalender = Server.CreateObject("ADODB.RecordSet") SQLstring = "SELECT * FROM kalender" rs_tilfoejarrangementtilkalender.Open SQLstring, db_fjordnet, adOpenKeyset, adLockOptimistic rs_tilfoejarrangementtilkalender.addNew rs_tilfoejarrangementtilkalender("arrangement") = Server.HTMLEncode(request.querystring("navnpaaarrangement")) rs_tilfoejarrangementtilkalender("dato") = request.querystring("dato") rs_tilfoejarrangementtilkalender("tid") = request.querystring("tid") rs_tilfoejarrangementtilkalender("prismedlem") = request.querystring("prismedlemmer") rs_tilfoejarrangementtilkalender("pris") = request.querystring("prisandre") rs_tilfoejarrangementtilkalender("mereinfo") = Server.HTMLEncode(request.querystring("information")) rs_tilfoejarrangementtilkalender("kategoriid") = 0
if request.querystring("mulighedfortilmelding") = "ON" then
if request.querystring("tilmeldingsenest") = "" then rs_tilfoejarrangementtilkalender("tilmeldingsenest") = request.querystring("dato") else rs_tilfoejarrangementtilkalender("tilmeldingsenest") = request.querystring("tilmeldingsenest") end if
if request.querystring("tilmeldingermaks") = "" then rs_tilfoejarrangementtilkalender("tilmeldingermaks") = 0 else rs_tilfoejarrangementtilkalender("tilmeldingermaks") = cint(request.querystring("tilmeldingermaks")) end if
else rs_tilfoejarrangementtilkalender("tilmelding") = 0 end if
rs_tilfoejarrangementtilkalender.Update rs_tilfoejarrangementtilkalender.close set rs_tilfoejarrangementtilkalender = Nothing %> <!--#include file="lukdatabaseforbindelse.asp"--> <% end if %> <html>
if request.form("mulighedfortilmelding") = "on" then tilmeldingSwitch = 1 if request.form("tilmeldingsenest") = "" then tilmeldesSenest = kalenderdato else tilmeldesSenest = request.form("tilmeldingsenest") end if if request.form("tilmeldingermaks") = "" then tilmeldesMax = 0 else tilmeldesMax = cint(request.form("tilmeldingermaks")) end if else tilmeldingSwitch = 0 tilmeldesMax = 0 tilmeldesSenest = kalenderdato end if
Fik det aldrig til at køre ordentlig, siden blev heller aldrig lavet færdig.
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.