CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

pro_styler Nybegynder

19. oktober 2003 - 19:52 Der er 6 kommentarer

Hva er fejlen.

Hejsa jeg har et lille bytte ting system :)
Jeg kan bare ikke finde fejlen :(
Håber der er noget der kan hjælpe mig ;)

Sådan ser min kode ud:

<%
Response.Buffer = True

mode = Request.QueryString("mode")
%>
<html>
<head>
<title> Tilbyder:</title>
<meta name="GENERATOR" content="Namo WebEditor v5.0(Trial)">
<meta name="description" content="Inserts a blank document layout with no defined style.">
</head>
<body>

<%

Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN

Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"Select * From bruger_koeb\"
rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

<% if mode = "bruger" then %>

<form action="byt.asp?mode=postet" method="post" name="formen">
HH Bruger Navn: <input type="text" name="hhname"><br>
Jeg Tilbyder : <input type="text" name="tilbyder"><br>
Jeg Får : <input type="text" name="for"><br>
Andet : <textarea name="txt"> rows="4" cols="40" </textarea><br>
<input type="submit" value="BYT!">

<hr>
<%=RS("hhname")%><br> Tilbyder:<%=RS("tilbyder")%><br> For:<%=RS("for")%> <br> Andet:<%=RS("txt")%>

<% end if %>
<% if mode = "postet" then %>

rs.AddNew
rs(hhname) = Request.form(hhname)
rs(tilbyder) = Request.form(tilbyder)
rs(for) = Request.form(for)
rs(icq) = Request.form(txt)
rs.Update

<% end if %>

rs.Close
Set rs = Nothing

Conn.Close
set Conn = Nothing

</body>
</html>

Synes godt om

korup Nybegynder

19. oktober 2003 - 20:03 #1

Hvilken fejl får du?

/korup

Synes godt om

ddobbeltv Nybegynder

19. oktober 2003 - 20:13 #2

<% end if %>

rs.Close
Set rs = Nothing

Conn.Close
set Conn = Nothing

</body>
</html>

skal rs.Close og resten ikke <% %>'s ?

Synes godt om

Slettet bruger

19. oktober 2003 - 20:15 #3

Der er flere steder der mangler <% og %>

<%
Response.Buffer = True

mode = Request.QueryString("mode")
%>
<html>
<head>
<title> Tilbyder:</title>
<meta name="GENERATOR" content="Namo WebEditor v5.0(Trial)">
<meta name="description" content="Inserts a blank document layout with no defined style.">
</head>
<body>

<%

Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN

Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"Select * From bruger_koeb\"
rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

if mode = "bruger" then %>

<form action="byt.asp?mode=postet" method="post" name="formen">
HH Bruger Navn: <input type="text" name="hhname"><br>
Jeg Tilbyder : <input type="text" name="tilbyder"><br>
Jeg Får : <input type="text" name="for"><br>
Andet : <textarea name="txt"> rows="4" cols="40" </textarea><br>
<input type="submit" value="BYT!">

<hr>
<%=RS("hhname")%><br> Tilbyder:<%=RS("tilbyder")%><br> For:<%=RS("for")%> <br> Andet:<%=RS("txt")%>

<% end if %>
<% if mode = "postet" then

rs.AddNew
rs(hhname) = Request.form(hhname)
rs(tilbyder) = Request.form(tilbyder)
rs(for) = Request.form(for)
rs(icq) = Request.form(txt)
rs.Update

end if
rs.Close
Set rs = Nothing

Conn.Close
set Conn = Nothing

%>

</body>
</html>

Synes godt om

snakeeyz Nybegynder

20. oktober 2003 - 21:18 #4

der mangler da også " " Request.form
og i Recordsettet der bruges til at gemme

f.eks.:
rs.AddNew
rs("hhname") = Request.form("hhname")

Håber det hjælper ?

Synes godt om

snakeeyz Nybegynder

24. oktober 2003 - 08:32 #5

Har du fået løst problemet ?

Synes godt om

Slettet bruger

07. november 2003 - 21:32 #6

Er du der?

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS