Vad är det som är fel i den här koden? Tanken är att lägga till en ny rad i tabellen "news" i databasen db, som sedan läses från sidan news.asp. När jag klickar på submitknappen ska fltet "newslatest" skickas till skriptet på samma sida som heter update.asp. Fick det att funka med formuläret och skriptet på olika sidor men inte på samma.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<html>
<head>
<title>uppdatera nyhetssidan</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
If Request.Form("btnSubmit") Then
%>
<!-- #include virtual="adovbs.inc" -->
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open "news", Conn, adOpenStatic, adLockOptimistic
'Skapa ny post i recordsetet
RecSet.AddNew
'Lägg in den nya posten
RecSet("newslatest") = Request.Form("newslatest")
latestnews = RecSet("newslatest")
Response.Write "<font color=""#CC3333"">Nyhetssidan har uppdaterats med: </font><br><br> " & latestnews
Response.Write "<br> <a href=""news.asp""><font color=""#CC3333"">Kolla alla poster</font></a>"
'Uppdatera databasen med den nya posten
RecSet.Update
RecSet.Close
Conn.Close
%>
<% Else %>
<form action="update.asp" method="post" name="newsupdate" id="newsupdate">
<textarea name="newslatest" cols="50" rows="5" id="newslatest"></textarea>
<br>
<input name="btnSubmit" type="submit" id="btnSubmit" value="skicka">
</form>
<% End If %>
</body>
</html>