Jag har ett nyhets-sript på min hemsida. Ligger i www.hemsida.com/nyheter
På min startsida har jag en kodsnutt för att visa de tre senaste nyheterna:
<!-- #include virtual="/nyheter/data.asp" -->
<%
dim data, strDB, intCount, include_page, linked_page
set data = server.createobject("ADODB.Recordset")
data.activeconnection = strDB
data.source = "SELECT * FROM admin WHERE id = 1"
data.open
include_page = data("included_page")
if data("linked_page") = "none" then
linked_page = include_page
else
linked_page = data("linked_page")
end if
data.close
set data = server.createobject("ADODB.RecordSet")
data.activeconnection = strDB
data.source = "SELECT TOP 3 * FROM news ORDER BY id DESC"
data.open
intCount = 0
while not data.eof and intCount < data.pagesize
intCount = intCount + 1
response.write data("news_date") & "<br>"
response.write "<a href=/nyheter/"& linked_page &"?id="& data("id") &">"& data("news_title") &"</a><br><br>"
data.movenext
wend
data.close
%>
Nu skulle jag vilja använda samma script till uppdateringar. Lägga scriptet i www.hemsida.com/uppdateringar och visa 3 senaste på startsidan.
När jag försöker göra det får jag detta felmeddelande:
Microsoft VBScript compilation error '800a0411'
Name redefined
/start/Default.asp, line 124
dim data, strDB, intCount, include_page, linked_page
----^
Hur ska jag göra för att lösa det hela?
Jättetack på förhand!
//Korak