05. maj 2002 - 20:14Der er
21 kommentarer og 1 løsning
Udskrive kommentarer
Jeg har et forum her, og indtil videre er der en oversigt, en view-side og en opret-funktion. Men jeg vil jo også gerne kunne se alle kommentarerne til indlægget. Min view-side, er som følger:
<-----view.asp-----> <% 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> <i>Af <%=NAVN%>, d. <%=DATO%></i><br><br> <%=BESKED%>
<% rs.Close Set rs = Nothing
Conn.Close Set Conn = Nothing %> <-----view.asp----->
Så vil jeg gerne, nedenunder, lave noget der har denne funktion:
If kommentarer = 0 Then Response.write "Der er ingen kommentarer til dette indlæg" Else Udskriv alle kommentarer, med rs("SVAR_ID") = Requet.Querystring ("ID")
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<-----view.asp-----> <% 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") Kommentar = rs("kommentar") %> <% If Kommentar = "" Then%> Der er ikke nogen kommentar! <%Else%> <h2><%=Kommentar%></h2> <% End If %> <h1><%=OVERSKRIFT%></h1> <i>Af <%=NAVN%>, d. <%=DATO%></i><br><br> <%=BESKED%>
<% rs.Close Set rs = Nothing
Conn.Close Set Conn = Nothing %> <-----view.asp----->
Conn.Execute(strSQL) Conn.Close Set Conn = Nothing
Response.redirect "default.asp" %>
og jeg får fejlen: Error Type: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10) [Microsoft][ODBC Microsoft Access Driver]COUNT field incorrect /25765619/debatten/save_new.asp, line 8
bindestreg> Hvad er det lige foreskellen er (det med at skrive = idtedet for Response.Write, og der skal ikke være ' rundt om recordsettet ID, da det er et autonumneringsfelt???
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.
