Hmm...
Ja nu får jeg ikke "id" med fra den forrige side.
Dette er den forrige side:
<%
' Hvis brugeren ikke er logget rigtigt på
' sendes han/hun direkte til formularen
If Session("login") <> "JA" Then
Response.Redirect "login.asp"
End If
%>
<html>
<head>
<title>Ingstrup Mølle Fiskepark</title>
<link rel="Stylesheet" type="text/css" href="../style.css">
</head>
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../cgi-bin/database.mdb")
Conn.Open DSN
' SQL forespørgsel
strSQL = "Select * from arrangementer where id = " &
Request.Querystring("id")
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
Dim RedigerDato
RedigerDato = Split(rs("dato"),"-")
%>
<body topmargin="0">
<table border="0" width="610" align="left" cellspacing="0"
cellpadding="0">
<tr>
<td width="100%">
<h1 align="center"><br>
Rediger arrangementet</h1>
<form action="opdater.asp?id=<% Request.Querystring("id")
%>" method="post" >
<div align="right">
<table border="0" width="550" cellspacing="0"
cellpadding="2">
<tr>
<td width="118">Overskrift:</td>
<td width="418"><input type="text" name="overskrift"
size="50" maxlength="50" tabindex="1" value="<%
Response.Write rs("overskrift")
%>
"></td>
</tr>
<tr>
<td width="118">Dato:</td>
<td width="418"> <input type="text" name="dag"
size="2" maxlength="2" tabindex="2" value="<%
Response.Write RedigerDato(0)
%>
"> / <input type="text" name="maaned" size="2" maxlength="2"
tabindex="3" value="<%
Response.Write RedigerDato(1)
%>
"> - 20<input type="text" name="aar" size="2" maxlength="2"
tabindex="4" value="<%
if (RedigerDato(2)-2000 < 10) then
Response.Write "0" & RedigerDato(2)-2000
else
Response.Write RedigerDato(2)
End if
%>
"></td>
</tr>
<tr>
<td width="118">Klokkeslæt:</td>
<td width="418"> <input type="text" name="klokken"
size="5" maxlength="5" tabindex="5" value="<%
Response.Write rs("klokken")
%>
"></td>
</tr>
<tr>
<td width="118" valign="top">Beskrivelse:</td>
<td width="418"><textarea rows="8"
name="beskrivelse" cols="50" tabindex="6"><%
Response.Write rs("beskrivelse")
%>
</textarea></td>
</tr>
<tr>
<td width="536" colspan="2">
<table border="0" width="100%" cellspacing="0"
cellpadding="0">
<tr>
<td width="100%">
<p align="center"><br>
<input type="submit" value="Ok - indsend"
name="submit" tabindex="7"> <input type="reset" value="Fortryd
alle ændringer" name="reset" tabindex="8">
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</form>
<p align="left">
</td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
Læg mærke til at jeg, for at få "id" overført til næste side (som er
den side jeg skrev i første indlæg i denne tråd), har Request'et
"id" fra URL'en og overfører den via "action" i form'en. Kan det
overhovedet lade sig gøre? Åbenbart ikke - da jeg jo stadig ikke kan
få dette her til at virke. Hvis ikke - hvad skal jeg så gøre?
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials