Just nu i M3-nätverket
Jump to content

VBarför vill servern inte visa denna sida


JUTE

Recommended Posts

<html>

 

<!-- #include virtual="adovbs.inc" -->

 

 

<% Set Connect = Server.CreateObject("ADODB.Connection")

Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=h:\webhotell\www.headforscreen.com\data\markus.mdb"

 

Set RecSet = Server.CreateObject("ADODB.Recordset")

Uppdatera = "SELECT * FROM Nyheter WHERE ID = " & Request.Form("AD") & " "

 

RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic

 

RecSet("Nyheter") = Request.Form("Nyheter")

RecSet("Rubrik") = Request.Form("Rubrik")

 

 

RecSet.Update

RecSet.Close

Connect.Close %>

 

 

 

<p><a href="redigera.asp">Redigera annan post!</a>

 

</html>

 

Link to comment
Share on other sites

Tja du, får du inget felmeddelande? Om man bara surfar in på sidan så är ju Request.Form("AD") tomt, vilket innebär att Uppdatera ser ut så här: "SELECT * FROM Nyheter WHERE ID = ", och det är ju inte så lyckat.

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...