nån som kan se felet?

MaRseYMedlem sedan maj 2001178 inlägg

Frågan19 aug. 2001 16:53#1

är rätt död nu, håller på å göra ett forum i asp och fått allt å funka förutom sidan där svaren på en rubrik ska visas.
view.asp:

<html>
<!-- #include virtual="/ii4tc/adovbs.inc" -->
<HEAD>

<TITLE>ii4tc</TITLE>
</HEAD>

<BODY BGCOLOR="#4E7990" SCROLL="auto">

<TABLE BORDER="0" BGCOLOR="#4E7990">

<%	session.lcid=1053

	If Request.QueryString("TopicID") = "" Then %>

	<a href="http://www.ii4tc.has.it">www.ii4tc.has.it</a>

	<% End If

	Set Connect = Server.CreateObject("ADODB.Connection")
	MdbFilePath = Server.MapPath("\ii4tc\db\forum.mdb")
	Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
	Set RecSet = Server.CreateObject("ADODB.Recordset")

	

Addera = "SELECT * FROM tab1 " & _
" WHERE TopicID = " & Request.QueryString("TopicID")

	RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %>

<TR><TD WIDTH="395">

<TR><TD WIDTH="395"><TABLE BORDER="1" bordercolor="000000">
<TR><TD WIDTH="395" BGCOLOR="#7DADC6"><h1><B>Topic:</B> <% =RecSet("Rubrik") %></TD></TR>
<TR><TD WIDTH="395" BGCOLOR="#7DADC6"><table><tr><td width="245"><h1><b>Av:</b> <% =RecSet("Nick") %></td><td width="140"><h1><% =RecSet("Datum") %> &#0124; <% =RecSet("Tid") %></td></tr></table><h1><% =RecSet("Text") %></TD></TR>	

	<% RecSet.Close 
	
	Connect.Close %>

<%	Set Connecti = Server.CreateObject("ADODB.Connection")
	MdbFilePath = Server.MapPath("\ii4tc\db\forum.mdb")
	Connecti.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
	Set RecSeti = Server.CreateObject("ADODB.Recordset")

	SQL = "SELECT * FROM tab2 " & _
" WHERE TopicID = " & Request.QueryString("TopicID") & " ORDER BY SvarID asc"

	RecSeti.Open SQL, Connecti, adOpenStatic, adLockOptimistic %>

<%	Do Until RecSeti.EOF %>

[b]<TR><TD WIDTH="395" BGCOLOR="#7DADC6"><table><tr><td width="245"><h1><b>Av:</b> <% =RecSet("Nick") %></td><td width="140"><h1><% =RecSet("Datum") %> &#0124; <% =RecSet("Tid") %></td></tr></table><h1><% =RecSet("Text") %></TD></TR>	[/b]

<%	RecSeti.MoveNext
	Loop
	RecSeti.Close 
	Connecti.Close	

Dim datim
datim = Date

%>
<TR><TD WIDTH="395"></TD></TR></TABLE>

</TABLE>

<TABLE BORDER="0" BGCOLOR="#4E7990">

<form method="POST" action="addcom.asp">

<TR><TD WIDTH="395">
	<table bgcolor="#4E7990" border="1" bordercolor="000000">
	<tr><td width="395" BGCOLOR="#7DADC6"><h1>
	<form method="POST" name="formen" action="addcom.asp">
<br>

	&nbsp;&nbsp;&nbsp;Inlägg:<br>
	&nbsp;&nbsp;&nbsp;<textarea cols="30" rows="5" name="text"></textarea><br>

	&nbsp;&nbsp;&nbsp;Nick:<br>
	&nbsp;&nbsp;&nbsp;<input type="text" size="10" name="nick"><br>

	<input type="hidden" size="10" name="datum" value="<%=Date%>">

	<input type="hidden" size="20" VALUE="<% =Request.QueryString("TopicID") %>" name="TopicID">

	<input type="hidden" name="tid" value="<%=Time%>">

	<div align="right"><input type="submit" value="Posta" class=format2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

	</form>	
</td></tr>
	</table>
</body>
</html>

felmeddelande:

ADODB.Fields fel '800a0cc1'

ADO kunde inte hitta objektet i mängden som överensstämmer med det begärda namnet eller numret.

/ii4tc/forum/view.asp, rad 75

rad 75 är fetmarkerad, nån som ser vad som är fel?

------------------
/MaRseY

LarsGMedlem sedan dec. 200012 464 inlägg

19 aug. 2001 17:06#2

Precis innan rad 75 så öppnar du ett recordset som heter recseti men du använder recset i HTML-koden.

------------------
essentitia preter non sans multiplicandum

MaRseYMedlem sedan maj 2001178 inlägg

19 aug. 2001 17:12#3

hehe, tack som fan, hade aldrig hittat ;)

------------------
/MaRseY

jorgenMedlem sedan feb. 20012 412 inlägg

19 aug. 2001 19:09#4

Hej!

Missminner jag mig inte så är det inte helt bra att döpa kolumner i databasen till "text" och "datum". Har för mig att de är reserverade ord i vissa DB-versioner.

Hade kanske inte med ditt fel att göra, men kan kanske hjälpa dig i framtiden :)

mvh Jörgen

------------------
*** Var går gränsen mellan långa kortbyxor och korta långbyxor? ***