Avatar billede nanna31 Praktikant
09. februar 2006 - 20:21 Der er 4 kommentarer og
1 løsning

option explicit burde fungere her

men det gør den ikke?

<html>
<title>Hente data fra database</title>
<head>
</head>
<body>

<% @ Language="VBScript"     %>
<% Option Explicit         %>
<% response.buffer=true     %>


<% Response.CacheControl = "no-cache"         %>
<% Response.AddHeader "Pragma", "no-cache"     %>
<% Response.Expires = -1             %>



<%
Dim CONN, DSN, SQL, RS
Set CONN = Server.CreateObject("ADODB.CONNection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("database.mdb")
CONN.Open DSN



SQL = "Select * from personer"
Set RS = CONN.Execute(SQL)

Do
  Response.Write RS("Foedselsdato") & "<br>"
  RS.MoveNext
  Loop While Not RS.EOF



CONN.Close
Set CONN = Nothing
%>

</body>
</html>
Avatar billede morhan Novice
09. februar 2006 - 23:34 #1
<% @ Language="VBScript"    %>
<% Option Explicit        %>
<% response.buffer=true    %>
<html>
<title>Hente data fra database</title>
<head>
</head>
<body>
Avatar billede softspot Forsker
09. februar 2006 - 23:35 #2
Det er fordi Option Explicit skal sættes inde du skriver andet kode, herunder sende output til klienten (som det HTML du har stående inden dit pagedirective er). Derfor skal du altid placere pagedirective i toppen af din ASP-siden (hvis du vælger at medtage det), samt en række andre indstillinger, herunder Option Explicit.

Din kode burde nok se således ud i stedet:

<% @ Language="VBScript" %>
<%
Option Explicit         
response.buffer=true   
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1
%>
<html>
<title>Hente data fra database</title>
<head>
</head>
<body>

<%
Dim CONN, DSN, SQL, RS
Set CONN = Server.CreateObject("ADODB.CONNection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("database.mdb")
CONN.Open DSN



SQL = "Select * from personer"
Set RS = CONN.Execute(SQL)

Do
  Response.Write RS("Foedselsdato") & "<br>"
  RS.MoveNext
  Loop While Not RS.EOF



CONN.Close
Set CONN = Nothing
%>

</body>
</html>
Avatar billede nanna31 Praktikant
10. februar 2006 - 00:44 #3
takker - husk at lægge svar
Avatar billede softspot Forsker
10. februar 2006 - 08:54 #4
Velbekomme :)
Avatar billede softspot Forsker
13. februar 2006 - 13:09 #5
Tak for point :)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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