databasen.mdb

tja... skicka hit den...

bengt.horgerud@markarydsgrafiska.se

Du kan se hvad jeg mener her: http://friserverplads.dk/debatten/tagwall/
Og du kan i stedet downloade databasen her: http://friserverplads.dk/debatten/tagwall/db/database.mdb

.::Michael::.

var vill du ha databasen nu då...

Må jeg lige indskyde:
http://www.html.dk/tutorials/asp/lektion21.asp

jo... man kan lösa det med ett adminscript...

svaret ;)

glad påsk och trevlig helg...

Hvad er fejlen i denne:

<% ID = Request.FORM("id"

Set MinCon = Server.CreateObject ("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db/database.mdb")
SQL = "SELECT * FROM tagwall WHERE id = " & ID & ""
rs.Open SQL, MinCon,1,2

    rs("nick") = Request.Form("nick")
    rs("dato") = Request.Form("dato")
    rs("email") = Request.Form("email")
    rs("besekd") = Request.Form("besked")   
rs.Update
rs.Close

Response.Redirect "admin.asp?msg=success"
%>

Jeg får følgende at vide:




<% ID = Request.FORM("id"

Set MinCon = Server.CreateObject ("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db/database.mdb")
SQL = "SELECT * FROM tagwall WHERE id = " & ID & ""
rs.Open SQL, MinCon,1,2

    rs("nick") = Request.Form("nick")
    rs("dato") = Request.Form("dato")
    rs("email") = Request.Form("email")
    rs("besekd") = Request.Form("besked")   
rs.Update
rs.Close

Response.Redirect "admin.asp?msg=success"
%>

Jeg fårfølgende at vide:






Microsoft VBScript compilation error '800a03ee'

Expected ')'

/debatten/tagwall/andra.asp, line 1

ID = Request.FORM("id"
----------------------^

Du mangler slutparentes

Tak :)

/Lukket