Databasfel?!?!

Har inte haft tillgång till nätet på en månad men senast jag kollade denna funktionen så funkade den strålande så gissa om jag blev förvånad nu när den inte funkar längre. Någon vänlig själ som vill ta sig en titt på var jag har screwat up? ;)

<%
' Kopplingen till databasen
	Set Con = Server.CreateObject("ADODB.Connection") 
	Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("evangemang.mdb")&";"

If Request.Form("losen") = pass Then
	Session("ok") = "ok"
End If

If Request.QueryString("do") = "logout" Then
	Session("ok") = ""
End If

If Request.QueryString("delete") <> "" Then
	SQL = "Delete From handelser Where id = " & Request.QueryString("delete")
	Con.Execute(SQL)
	Response.Redirect "admin.asp"
End If

If Request.QueryString("do") = "add" Then

	title	= Request.Form("rubrik")
	text	= Request.Form("text")
	yy		= Request.Form("yyyy")
	mm		= Request.Form("mm")
	dd		= Request.Form("dd")
	
'	SQL = "Insert Into handelser(title) Values('" & title & "')"

	SQL = "Insert Into handelser(title, [text], yyyy, mm, dd) Values('" & title & "', '" & text & "',"_
		& yy & ", " & mm & ", " & dd & ")"
		
	Con.Execute(SQL)
	
	Session("mess") = "Händelsen är nu inlagd i databasen"
	Con.Close
	Set Con = nothing
	
	Response.Redirect "admin.asp"
End If
%>

Tackar på förhand//

Ooops...Ska kanske ange vad microsoft anger som fel:

Sidan kunde inte visas
Det har uppstått problem med sidan du försökte nå. Den kunde inte visas.

--------------------------------------------------------------------------------

Prova att:

Klicka på knappen Uppdatera, eller försök igen senare.

öppna hemsidan localhost och titta efter länkar till informationen du söker.
HTTP 500.100 - Internt serverfel - ASP-fel
Internet Information Services

--------------------------------------------------------------------------------

Teknisk information (för supportpersonal)

Feltyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Drivrutin för ODBC Microsoft Access] Operationen måste använda en fråga som kan uppdateras.
/uhamn/Kalender/admin.asp, line 36

Webbläsare:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

Sida:
POST 69 bytes to /uhamn/Kalender/admin.asp

POST Data:
yyyy=2004&mm=1&dd=1&rubrik=t6yshrger&text=sfgdsgf&Submit2=L%C4GG+TILL

Tid:
den 17 oktober 2004, 12:41:37

Mer information:
Microsoft Support

If Request.Form("losen") = pass Then

detta kanske kan vara anledningen, skall det inte vara:

If Request.Form("losen") = "pass" Then

Skriv in felmeddelandet annars också.

hmmm...felet ligger på rad 36 enligt felet, jag kom på det sen att jag missat skriva in felrapporten, skall dock ändra detta med och se :P
Nope, ditt tips varken hjälper elr skadar: D

Testa att Skriva ut din sql-sats innan du exekverar den

[red]
Response,Write SQL
Reponse.End
Con.Execute(SQL) [b]din rad 36[/b]
[/red]

mv icaaq

Ersätter rad 36 med din kod och får... tadaa:
Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A0401)
Slut på programsats förväntas.
/uhamn/Kalender/admin.asp, line 36, column 15
Response,Write SQL
--------------^

Weii :D Hmm...Jag är inte helt hundra på det här med databaser

[red]Response.write SQL[/red]

:r

mv icaaq

Feltyp:
Körningsfel i Microsoft VBScript (0x800A01A8)
Objekt krävs.: ''
/uhamn/Kalender/admin.asp, line 37

Berört område i koden :

Response.write SQL
Reponse.End <------ Rad 37 Tror jag
Con.Execute(SQL)

Fan va slarvig jag är.

[red]
Response.Write SQL
Response.End
Con.Execute(SQL) din rad 36
[/red]

:r

mv icaaq

Hmm...Nu får jag ut vad som hända skall men vad som inte händer :P

Texten som visas blir :

Insert Into handelser(title, [text], yyyy, mm, dd) Values('gfdgf', 'gfdgg',2004, 1, 1)

Nu fick jag mig själv...
Hmm...Slarvade lite här och lite där :l Försökte sätta in title två gånger om ser det ut som. Är som sagt inte proffs men nu funkar det iaf efter att jag har tagit bort det... Jag är en lycklig människa igen :D

hmm...Nej, jag trodde jag hade hittat lösningen men nu kinkar det igen. Kör mina sidor i IIS 5.1 i XP Pro. Dock funkar sidan fina fisken på SomainDlx (Gratis Webb) Vad kan problemet vara? Nu verkar det juh inte ligga i koden?!?!

Ingen som har kol på vad det skulle kunna vara som äger lös i burken min?

Har du gjort de rättighetsinställningar som krävs på mappen där du har dina databaser?

Njae...Jag har inte gjort några inställningar alls. Började använda det i förr går typ, har ganska dålig pejl på det faktiskt :( Men allt annat som jag kör med databasen funkar. Dock finns det inget annat än det här dokumentet som skriver till den... Hmm...ska se vad vi kan hitta ;)

Felmeddelandet brukar betyda att NTFS-rättigheterna är felaktigt satta för databasmappen. Du är inte först att få problemet, så jag garanterar att du hittar en lösning med lite sökning här på webForum.

Jope, visst var det så. Funkade redan igår, men ville inte förta mig i glädje som förra gången ;) Men det funkar idag med, så tackar @nders :D

Tacka gärna genom att använda "Acceptera som slutgiltigt svar" och redovisa lösningen så blir det ännu lättare för andra med samma problem. ;)