13 svar · 256 visningar · startad av MizzK
när jag inkluderar mitt nyhetsscript på min sida får jag detta felet
Feltyp:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer: 'RecSet'
/VIP/grund/nyheter1/news2.asp, line 112
vad betyder d?? och vad gör jag åt d?
Kan det vara så att ditt recordset inte heter RecSet?
<%
NyhetPerSida = 5 ' Antal nyhetsrubriker per sida
URL = "index.asp" ' Sidan du inkluderar news2.asp i
db = Server.MapPath("grund/nyheter1/db/news.mdb") ' Databasens sokvag
Width = "50" ' Bredd pa bilden
%>
<table align="left" cellpadding="1" cellspacing="0" width="100%" border="0">
<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
If Request.QueryString("ID") = "" Then
Set RecSet = Server.CreateObject("ADODB.Recordset")
Sidan = Request.QueryString("sida")
If Sidan = "" then
sida = 1
Else
sida = Sidan
End If
With RecSet
.CursorLocation = 3
.CacheSize = NyhetPerSida
End With
SQL = "SELECT * FROM news Order By id desc"
RecSet.Open SQL, Conn
If RecSet.EOF Then%>
<tr>
<td><SPAN class="textheader">Inga nyheter inlagda!</span></td>
</tr>
<%Else
With RecSet
.MoveFirst
.PageSize = NyhetPerSida
.AbsolutePage = sida
End With
Sidor = RecSet.PageCount
x = 0
Do While Not RecSet.EOF And x < RecSet.PageSize%>
<tr>
<td>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 align="center">
<TBODY>
<tr>
<td align="left"><br><SPAN class="textheader"><%=RecSet("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RecSet("datum"),1)%>]</span><p></p></td>
</tr>
</TBODY>
</TABLE>
</td>
</tr>
<tr>
<td>
<TABLE cellSpacing=0 cellPadding=0 width="93%" border=0 align="center">
<TBODY>
<tr>
<td valign="top" colspan="2"><SPAN class="textthreadbody"><%If Len(RecSet("nyhet")) > 145 Then%><%=Left(RecSet("nyhet"),150)%>...<%Else%><%=RecSet("nyhet")%><%End If%></SPAN></td>
</tr>
</TBODY>
</TABLE>
</td>
</tr>
<tr>
<td colspan="2" align="right" ><A class="linkbig" href="<%=URL%>?ID=<%=RecSet("ID")%>"><IMG height=10 hspace=0 src="bilder/linkdot.gif" width=9 border=0 alt="dot">läs mer</a></td>
</tr>
<tr>
<td colspan="2" width="60%" style="BORDER-RIGHT: rgb(231,231,229) 0px solid; BORDER-TOP: rgb(231,231,229) 0px solid; BORDER-LEFT: rgb(231,231,229) 0px solid; BORDER-BOTTOM: rgb(231,231,229) 1px solid">
<IMG height=1 width=1 hspace=0 src="bilder/transp.gif"alt="transp" ></td>
</tr>
<%x=x+1
RecSet.MoveNext
Loop
RecSet.Close
If Sidor > 1 Then%>
<tr>
<td valign="top" colspan="2">
<%For Sid = 1 To Sidor
If (Int(Sid)) = (Int(sida)) Then%><b><%=Sid%></b><%Else%> <a href="<%=URL%>?sida=<%=Sid%>"><%=Sid%></a> <%End If
Next%>
</td>
</tr>
<%End If
End If
End If
If Request.QueryString("ID") <> "" Then
Set RS=Conn.Execute("Select * From news Where id=" & Request.QueryString("ID"))%>
<tr>
<%If RS("bild") <> "" Then%>
<td rowspan="3" valign="top"><img src="<%=RS("bild")%>" border="1" width="<%=Width%>"></td>
<td rowspan="3" width="5"></td>
<%End If%>
<td width="6%"> <SPAN class="textheader"><%=RecSet("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RecSet("datum"),1)%>]</span></td>
</tr>
<tr>
<td colspan="2"><SPAN class="textthreadbody"><%=Replace(RS("nyhet"),vbCrLf,"<br>")%><br><br>/<%=RS("namn")%></SPAN></td>
</tr>
<tr>
<td colspan="2"><br><a href="<%=URL%>">Tillbaka</a></td>
</tr>
<%End If%>
</table>
all kod =)
Glömde tydligen dessa:
4) använd alltid [kod]-taggar.
5) markera vilken rad i koden felmeddelandet pekar på.
Mvh
Broskan
Jag tycker det ser ut som att du anropar RecSet efter att det har stängts.
<td width="6%"> <SPAN class="textheader"><%=RecSet("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RecSet("datum"),1)%>]</span></td>
</tr>
Ska du inte ha RS("rubrik") och RS("datum")
//Broskan
@nders skrev:
- markera vilken rad i koden felmeddelandet pekar på.
MizzK skrev:
alltså problemet uppstår när jag includerar d i min andra sida.. fungerar utmärkt att köra ensamt.. sidan d ska ligga på är vip.hh.se på startsidan..
Då får man väl gissa på att du använder samma objektnamn i det scriptet du inkluderar innan du är klar med objekten i den kod som körs innan?
denna raden..
<td width="6%"> <SPAN class="textheader"><%=RecSet("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RecSet("datum"),1)%>]</span></td>
Broskan
Men funkar det inte så här???
<td width="6%"> <SPAN class="textheader"><%=RS("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RS("datum"),1)%>]</span></td>
//Broskan
har löst problemet.. enkla felet att jag bara skulle ändra RecSet till RS så fungerade d utmärkt =))
Broskan
Det var ju liksom det jag svarade i mitt första inlägg ;-)
Bra att du fick till det, vart lite fundersam.
//Broskan
jepp, såg och testade runt lite så fungerade d =)
tack
