Editing i databasen.....

Hovsa dataen skal addes i text10 og text11 og text12!!!!!

Sådan:


<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
If Request(\"update\") = \"true\" Then

Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"UPDATE [booking] SET text10 = \" & Request.Form(\"text10\") & \",text11 = \" & Request.Form(\"text11\") & \",text12 = \" & Request.Form(\"text12\") & \" WHERE ID = \"& Request.QueryString(\"id\") &\"\", DataConn

Response.Write \"Blabla, db\'en skulle nu være opdateret!\"

End If
%>

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"Select * From [booking] where id=\"& Request.QueryString(\"id\") &\"\", DataConn
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

\'Det der kommer herefter skal addeds til i databasen i samme id!!!

<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>
<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>

</body>
</html>


/Mattias

Nu er jeg lidt newbie (MEGET for at være ærlig:)).. Skal jeg ikke have en form, med en button som sender infoen til databasen? hvordan ser den liiiiige ud?

<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
If Request(\"update\") = \"true\" Then

Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"UPDATE [booking] SET text10 = \" & Request.Form(\"text10\") & \",text11 = \" & Request.Form(\"text11\") & \",text12 = \" & Request.Form(\"text12\") & \" WHERE ID = \"& Request.QueryString(\"id\") &\"\", DataConn

Response.Write \"Blabla, db\'en skulle nu være opdateret!\"

End If
%>

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"Select * From [booking] where id=\"& Request.QueryString(\"id\") &\"\", DataConn
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

\'Det der kommer herefter skal addeds til i databasen i samme id!!!

<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>
<form action=\"dinside.asp?update=true&id=<%= Request(\"id\") %>\">
<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>
<input type=\"submit\" value=\"Gem!\">
</form>

</body>
</html>

Det er skrevet i \"frihånd\" og jeg skal have dansk nu, så se om det virker :)

\"dinside.asp\" skal selfølgelig ændres!

/Mattias

Pyha du er en snut.... går du på HTX?

Den siger fejl i linie 65!!

Microsoft OLE DB Provider for ODBC Drivers error \'80040e14\'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'id=\'.

/admin_booking_show.asp, line 65

<html>
<head>
<style type=\"text/css\">
BODY{
  scrollbar-3d-light-color: #FFFFFF;
  scrollbar-arrow-color: #FFFFFF;
  scrollbar-base-color: #4a5989;
  scrollbar-dark-shadow-color: #FFFFFF;
  scrollbar-face-color: #4a5989;
  scrollbar-highlight-color: #FFFFFF;
  scrollbar-shadow-color: #FFFFFF;
}
</style>
<title>www.ClanSek.dk - Surpreme Elite Killers</title>
</head>
<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/settings.mdb\")
DataConn.Open DSN
%>

<%
Set news = Server.CreateObject(\"ADODB.RecordSet\")
news.open \"Select * From [settings] Order by id desc\", DataConn, 1, 3
%>
<body bgcolor=\"#<%=news(\"bgcolor\")%>\" text=\"#<%=news(\"text\")%>\" link=\"#<%=news(\"link\")%>\" vlink=\"#<%=news(\"vlink\")%>\" alink=\"#<%=news(\"alink\")%>\">
<%
set news = nothing
Dataconn.Close
%>

<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\"><STRONG><FONT face=Arial size=6>Admin Section - Server Booking</FONT></STRONG>
<br>
<br>
<font face=arial color=\"White\"><a href=\"admin_session.asp\">Back To Admin - Main</a></font>
<br>
<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
If Request(\"update\") = \"true\" Then

Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"UPDATE [booking] SET text10 = \" & Request.Form(\"text10\") & \",text11 = \" & Request.Form(\"text11\") & \",text12 = \" & Request.Form(\"text12\") & \" WHERE ID = \"& Request.QueryString(\"id\") &\"\", DataConn

Response.Write

End If
%>

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"Select * From [booking] where id=\"& Request.QueryString(\"id\") &\"\", DataConn
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

<form action=\"admin_booking_show.asp?update=true&id=<%=Request(\"id\") %>\" id=form1 name=form1>
<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>

<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>
<input type=\"submit\" value=\"Gem!\">
</form>

</body>
</html>

Det skyldes at du inden for dine form-tags ikke angiver noget id.

Når du inserter eller updater en post søger den kun efter id (nøglen) inden for de to form tags.

En løsning på det er at lave et hidden field inden for dine form-tags der indeholder id-værdien for den pågældende post!

Det kunne se således ud:

<form action=\"admin_booking_show.asp?update=true&id=<%=Request(\"id\") %>\" id=form1 name=form1>
<input type=\"HIDDEN\" name=\"id\" value=\"<%=accept(\"Id\")%>\">
<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>

<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>
<input type=\"submit\" value=\"Gem!\">
</form>

Din update statement skal dermed være:

sql = \"UPDATE tablename SET columnname=\'\"&expression&\"\' WHERE Id=\" &request.form(\"id\")

<html>
<head>
<style type=\"text/css\">
BODY{
  scrollbar-3d-light-color: #FFFFFF;
  scrollbar-arrow-color: #FFFFFF;
  scrollbar-base-color: #4a5989;
  scrollbar-dark-shadow-color: #FFFFFF;
  scrollbar-face-color: #4a5989;
  scrollbar-highlight-color: #FFFFFF;
  scrollbar-shadow-color: #FFFFFF;
}
</style>
<title>www.ClanSek.dk - Surpreme Elite Killers</title>
</head>
<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/settings.mdb\")
DataConn.Open DSN
%>

<%
Set news = Server.CreateObject(\"ADODB.RecordSet\")
news.open \"Select * From [settings] Order by id desc\", DataConn, 1, 3
%>
<body bgcolor=\"#<%=news(\"bgcolor\")%>\" text=\"#<%=news(\"text\")%>\" link=\"#<%=news(\"link\")%>\" vlink=\"#<%=news(\"vlink\")%>\" alink=\"#<%=news(\"alink\")%>\">
<%
set news = nothing
Dataconn.Close
%>

<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\"><STRONG><FONT face=Arial size=6>Admin Section - Server Booking</FONT></STRONG>
<br>
<br>
<font face=arial color=\"White\"><a href=\"admin_session.asp\">Back To Admin - Main</a></font>
<br>
<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
If Request(\"update\") = \"true\" Then

Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"UPDATE [booking] SET text10 = \'\" & Request.Form(\"text10\") & \"\',text11 = \'\" & Request.Form(\"text11\") & \"\',text12 = \'\" & Request.Form(\"text12\") & \"\' WHERE ID = \"& Request.QueryString(\"id\"), DataConn

Response.Write

End If
%>

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"Select * From [booking] where id=\"& Request.QueryString(\"id\") &\"\", DataConn
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

<form action=\"admin_booking_show.asp?update=true&id=<%=Request(\"id\") %>\" id=form1 name=form1>
<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>

<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>
<input type=\"submit\" value=\"Gem!\">
</form>

</body>
</html>


Sådan..

Eromaster > jeg går i folkeskole, 7kl.

Okay det virker stadig ikke....
Microsoft OLE DB Provider for ODBC Drivers error \'80040e14\'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'id=\'.

/admin_booking_show.asp, line 60

Problemet er ligger i det nedenstående tekst... i kan sikkert godt se at jeg kun har programmeret asp i ca 3 uger!! :o(

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"Select * From [booking] where id=\"& Request.QueryString(\"id\") &\"\", DataConn
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

Prøv følgende:

accept.open \"SELECT * FROM booking WHERE Id=\" &request.querystring(\"id\"), DataConn, 1, 3

Stadig fejl:
Microsoft OLE DB Provider for ODBC Drivers error \'80040e14\'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'Id=\'.

/admin_booking_show.asp, line 60

Er det når du skal vise dine poster eller når du har submittet og skal gemme dine ændringer du får fejlen???

det er når jeg submitter

Så er det fordi at dit id ikke sendes videre!

Prøv at lave et hidden field inden for din form der indeholder værdien af det pågældende id kombineret med ovenstående sql-sætning!

Tror nemlig ikke problemet er der hvor du siger det er - ikke når du kan vise dine oplysninger med ikke opdatere dem.

Hvordan ser din update-statement ud???

mit asp doc ser sådan ud nu!!\'

  <html>
<head>
<style type=\"text/css\">
BODY{
  scrollbar-3d-light-color: #FFFFFF;
  scrollbar-arrow-color: #FFFFFF;
  scrollbar-base-color: #4a5989;
  scrollbar-dark-shadow-color: #FFFFFF;
  scrollbar-face-color: #4a5989;
  scrollbar-highlight-color: #FFFFFF;
  scrollbar-shadow-color: #FFFFFF;
}
</style>
<title>www.ClanSek.dk - Surpreme Elite Killers</title>
</head>
<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/settings.mdb\")
DataConn.Open DSN
%>

<%
Set news = Server.CreateObject(\"ADODB.RecordSet\")
news.open \"Select * From [settings] Order by id desc\", DataConn, 1, 3
%>
<body bgcolor=\"#<%=news(\"bgcolor\")%>\" text=\"#<%=news(\"text\")%>\" link=\"#<%=news(\"link\")%>\" vlink=\"#<%=news(\"vlink\")%>\" alink=\"#<%=news(\"alink\")%>\">
<%
set news = nothing
Dataconn.Close
%>

<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\"><STRONG><FONT face=Arial size=6>Admin Section - Server Booking</FONT></STRONG>
<br>
<br>
<font face=arial color=\"White\"><a href=\"admin_session.asp\">Back To Admin - Main</a></font>
<br>
<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
If Request(\"update\") = \"true\" Then

Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"UPDATE [booking] SET text10 = \'\" & Request.Form(\"text10\") & \"\',text11 = \'\" & Request.Form(\"text11\") & \"\',text12 = \'\" & Request.Form(\"text12\") & \"\' WHERE ID = \"& Request.QueryString(\"id\"), DataConn

Response.Write

End If
%>

<%
Set accept = Server.CreateObject(\"ADODB.RecordSet\")
accept.open \"SELECT * FROM booking WHERE Id=\" &request.querystring(\"id\"), DataConn, 1, 3
%>

<strong>
<%=accept(\"text1\")%> of <%=accept(\"select3\")%>
<br>
<%=accept(\"select1\")%>:00 &nbsp;<strong>To</strong>&nbsp; <%=accept(\"select2\")%>:00
<br>
<%=accept(\"text4\")%> vs <%=accept(\"text5\")%>
<br>
<%=accept(\"text6\")%>
<br>
<a href=\"mailto:<%=accept(\"text7\")%>\"><%=accept(\"text7\")%></a>
<br>
<%=accept(\"text8\")%>
<br>
<%=accept(\"text9\")%>
<br>
<br>
<br>
</strong>

<%
accept.Close
set accept = nothing
%>

<form action=\"admin_booking_show.asp?update=true&id=<%=Request(\"id\") %>\" id=form1 name=form1>
<strong>Accept Match?</strong>
<br>
<SELECT id=text10 name=text10 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"Accepted\" selected>Accept</OPTION>
<OPTION value=\"Refused\">Refuse</OPTION>
</select>
<br>
<br>
<strong>Accepted by</strong>
<br>

<SELECT id=text11 name=text11 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<OPTION value=\"SEK| Chunga\" selected>SEK| Chunga</OPTION>
<OPTION value=\"SEK| NarkoKrig\">SEK| NarkoKrig</OPTION>
<OPTION value=\"SEK| Erom@ster\">SEK| Erom@ster</OPTION>
</select>
<br>
<br>
<strong>Borrowing</strong>
<br>
<SELECT id=text12 name=text12 style=\"FONT-SIZE: xx-small; WIDTH: 140px; FONT-FAMILY: verdana; BACKGROUND-COLOR: silver\">
<option value=\"None\" selected>Those a server</option>
<OPTION value=\"SEK| Clanserver #1\">SEK| Clanserver #1</OPTION>
<OPTION value=\"SEK| Clanserver #2\">SEK| Clanserver #2</OPTION>
<OPTION value=\"SEK| Clanserver #3\">SEK| Clanserver #3</OPTION>
<option value=\"SEK| Clanserver #4\">SEK| Clanserver #4</option>
</select>
<input type=\"submit\" value=\"Gem!\">
</form>

</body>
</html>

Eromaster > Det er jo fordi du skal skrive: ditaspdoc.asp?id=1 f.eks! Du skal huske at have et ?id=[someid] !! Ellers er det jo klart at det ikke virker

Okay det asp doc som linker til det som skal gemme ændringer i db\'en ser sådan ud:


<html>
<head>
<style type=\"text/css\">
BODY{
  scrollbar-3d-light-color: #FFFFFF;
  scrollbar-arrow-color: #FFFFFF;
  scrollbar-base-color: #4a5989;
  scrollbar-dark-shadow-color: #FFFFFF;
  scrollbar-face-color: #4a5989;
  scrollbar-highlight-color: #FFFFFF;
  scrollbar-shadow-color: #FFFFFF;
}
</style>
<title>www.ClanSek.dk - Surpreme Elite Killers</title>
</head>
<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/settings.mdb\")
DataConn.Open DSN
%>

<%
Set news = Server.CreateObject(\"ADODB.RecordSet\")
news.open \"Select * From [settings] Order by id desc\", DataConn, 1, 3
%>
<body bgcolor=\"#<%=news(\"bgcolor\")%>\" text=\"#<%=news(\"text\")%>\" link=\"#<%=news(\"link\")%>\" vlink=\"#<%=news(\"vlink\")%>\" alink=\"#<%=news(\"alink\")%>\">
<%
set news = nothing
Dataconn.Close
%>


<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">
<STRONG><FONT face=Arial size=6>Admin Section - Server Booking</FONT></STRONG>
<br>
<br>
<font face=arial color=\"White\"><a href=\"admin_session.asp\">Back To Admin - Main</a></font>
<br>
<br>

<%
Set DataConn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = dsn & \"DBQ=\" & server.mappath(\"../../mdb/booking.mdb\")
DataConn.Open DSN
%>

<%
Set status = Server.CreateObject(\"ADODB.RecordSet\")
status.open \"Select * From [booking] Order by id desc\", DataConn, 1, 3
if not status.EOF then
Status.MoveFirst
end if
do while not status.eof
%>

<strong><a href=\"admin_booking_show.asp?id=<%=status(\"id\")%>\"><%=status(\"text9\")%></a> has booked the server at:</strong>
<br>
<strong><%=status(\"select3\")%> the <%=status(\"text1\")%></strong>
<br>
<strong><%=status(\"text4\")%> vs <%=status(\"text5\")%></strong>
<br>
<br>

<br>
<br>

<%
status.MoveNext
loop
status.Close
set status = nothing
Dataconn.Close
%>


</BODY>
</HTML>


og det virker perfekt... er det noget prob i deT?

test