Søg
Avatar billede cotus Nybegynder
05. maj 2002 - 17:45 Der er 15 kommentarer og
2 løsninger

Problem med database...

Hvorfår får jeg denne fejl?

Error Type:
ADODB.Field (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/25765619/debatten/Default.asp, line 17

I denne fil:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("debat.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM indlaeg WHERE svar_id=NULL order by ID Desc"
Set rs = Conn.Execute(strSQL)
Do

ID = rs("ID")
OVERSKRIFT = rs("OVERSKRIFT")
NAVN = rs("NAVN")
DATO = rs("DATO")
SVAR_ID = rs("SVAR_ID")
BESKED = rs("BESKED")

%>

<table>
<tr>
<td><a href="view.asp?id=<% rs("ID") %>"><% rs("OVERSKRIFT") %></a></td>
<td>Af <% rs("NAVN") %>, d. <% rs("DATO") %></td>
</tr>
</table>

  <% rs.MoveNext
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>

Og denne database: http://www.virtuaserver.dyndns.dk/25765619/database.gif

Hvad fan*** er der galt? :(

/cotus
Avatar billede teamdev Novice
05. maj 2002 - 17:50 #1
PRØV:
ID = rs("ID")
OVERSKRIFT = rs("OVERSKRIFT")
NAVN = rs("NAVN")
DATO = rs("DATO")
SVAR_ID = rs("SVAR_ID")
BESKED = rs("BESKED")

%>

<table>
<%
Do While Not rs.EOF
%>
<tr>
<td><a href="view.asp?id=<% rs("ID") %>"><% rs("OVERSKRIFT") %></a></td>
<td>Af <% rs("NAVN") %>, d. <% rs("DATO") %></td>
</tr>
</table>

<% rs.MoveNext
Loop Conn.Close
Set Conn = Nothing
%>
Avatar billede hotcut Nybegynder
05. maj 2002 - 17:50 #2
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("debat.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM indlaeg WHERE svar_id=NULL order by ID Desc"
Set rs = Conn.Execute(strSQL)

if not rs.EOF then
Do

ID = rs("ID")
OVERSKRIFT = rs("OVERSKRIFT")
NAVN = rs("NAVN")
DATO = rs("DATO")
SVAR_ID = rs("SVAR_ID")
BESKED = rs("BESKED")

%>

<table>
<tr>
<td><a href="view.asp?id=<% rs("ID") %>"><% rs("OVERSKRIFT") %></a></td>
<td>Af <% rs("NAVN") %>, d. <% rs("DATO") %></td>
</tr>
</table>

  <% rs.MoveNext
Loop While Not rs.EOF
end if
Conn.Close
Set Conn = Nothing
%>
Avatar billede peppino Nybegynder
05. maj 2002 - 17:51 #3
Prøv men denne:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("debat.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM indlaeg WHERE svar_id=NULL order by ID Desc"
Set rs = Conn.Execute(strSQL)
Do

ID = rs("ID")
OVERSKRIFT = rs("OVERSKRIFT")
NAVN = rs("NAVN")
DATO = rs("DATO")
SVAR_ID = rs("SVAR_ID")
BESKED = rs("BESKED")

%>

<table>
<tr>
<td><a href="view.asp?id=<%=rs("ID") %>"><%= rs("OVERSKRIFT") %></a></td>
<td>Af <%=rs("NAVN") %>, d. <%=rs("DATO") %></td>
</tr>
</table>

  <% rs.MoveNext
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>
Avatar billede peppino Nybegynder
05. maj 2002 - 17:53 #4
jeg vil mene at det er fordi du har glemt "=" ved dine <% rs("overskrift")%>
Avatar billede peppino Nybegynder
05. maj 2002 - 17:57 #5
nej prøv men denne:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("debat.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM indlaeg WHERE svar_id=NULL order by ID Desc"
Set rs = Conn.Execute(strSQL)

Do Until rs.EOF

ID = rs("ID")
OVERSKRIFT = rs("OVERSKRIFT")
NAVN = rs("NAVN")
DATO = rs("DATO")
SVAR_ID = rs("SVAR_ID")
BESKED = rs("BESKED")

%>
<table>
  <tr>
    <td><a href="view.asp?id=<%=rs("ID") %>"><%= rs("OVERSKRIFT") %></a></td>
    <td>Af <%=rs("NAVN") %>, d. <%=rs("DATO") %></td>
  </tr>
</table>
<% rs.MoveNext
Loop
Conn.Close
Set Conn = Nothing
%>
Avatar billede cotus Nybegynder
05. maj 2002 - 17:59 #6
Får stadig denne fejl:

ADODB.Field (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/25765619/debatten/Default.asp, line 17
Avatar billede teamdev Novice
05. maj 2002 - 18:00 #7
<td><a href="view.asp?id=<%= rs("ID") %>"><%= rs("OVERSKRIFT") %></a></td>
<td>Af <%= rs("NAVN") %>, d. <%= rs("DATO") %></td>
</tr>
Avatar billede cotus Nybegynder
05. maj 2002 - 18:00 #8
Øhm... det giver mig en tom side???

Se selv: http://www.virtuaserver.dyndns.dk/25765619/debatten/

/cotus
Avatar billede peppino Nybegynder
05. maj 2002 - 18:00 #9
prøv at sætte ' ' om null
Avatar billede teamdev Novice
05. maj 2002 - 18:01 #10
kunne også smide en

if rs.eof then
response.write "sorry ingen data"
eller lign.....
Avatar billede cotus Nybegynder
05. maj 2002 - 18:08 #11
Ny fejl i view.asp:

<%
ID = Request.QueryString("nyhed")

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

set rs = Conn.execute("SELECT * FROM indlaeg WHERE ID=" & ID)

Overskrift = rs("OVERSKRIFT")
Navn = rs("NAVN")
Dato = rs("DATO")
Svar_id = rs("SVAR_ID")
Besked = rs("BESKED")
%>
<h1><%=OVERSKRIFT%></h1><br><br>
<i>Af <%=NAVN%>, d. <%=DATO%></i><br><br>
<%=BESKED%>
<%
rs.Close
Set rs = Nothing

Conn.Close
Set Conn = Nothing

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'ID='.
/25765619/debatten/view.asp, line 14
Avatar billede teamdev Novice
05. maj 2002 - 18:09 #12
set rs = Conn.execute("SELECT * FROM indlaeg WHERE ID='" & ID"'")
Avatar billede cotus Nybegynder
05. maj 2002 - 18:11 #13
Error Type:
Microsoft VBScript compilation (0x800A03EE)
Expected ')'
/25765619/debatten/view.asp, line 14, column 61
Avatar billede peppino Nybegynder
05. maj 2002 - 18:23 #14
du skal huske at skrive view.asp?nyhed=1
Avatar billede peppino Nybegynder
05. maj 2002 - 18:25 #15
ret
ID = Request.QueryString("nyhed")
til
ID = Request.QueryString("id")
Avatar billede cotus Nybegynder
05. maj 2002 - 18:26 #16
Får stadig denne fejl:

Error Type:
Microsoft VBScript compilation (0x800A03EE)
Expected ')'
/25765619/debatten/view.asp, line 14, column 61

Linie 14 er:
set rs = Conn.execute("SELECT * FROM indlaeg WHERE ID='" & ID"'")
Avatar billede peppino Nybegynder
05. maj 2002 - 18:31 #17
får du fejlen hvis du bruger denne kode:

<%
ID = Request.QueryString("id")

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

set rs = Conn.execute("SELECT * FROM indlaeg WHERE ID=" & ID)

Overskrift = rs("OVERSKRIFT")
Navn = rs("NAVN")
Dato = rs("DATO")
Svar_id = rs("SVAR_ID")
Besked = rs("BESKED")
%>
<h1><%=OVERSKRIFT%></h1><br><br>
<i>Af <%=NAVN%>, d. <%=DATO%></i><br><br>
<%=BESKED%>
<%
rs.Close
Set rs = Nothing

Conn.Close
Set Conn = Nothing
%>
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
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
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
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
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 20:40 Access udskrift mangler del af ramme om post. Af Uvanga i Access
I går 12:36 nulstille Samsung tablet T-580 Af fase i Tablet
23/1017:19 Kender I "Dropbox" ? Af Ikke-ekspert i Andet software
23/1016:28 Indsæt en kort video i Outlook 2024 Af ErikHg i E-mail programmer
22/1019:20 Hvor kan man finde en god bærbar computer? Af Strawberry i PC
White papers
Flere white papers »