Hjäälp =)

Hejsan!

Använder mig av Gruvsjös nyhetsscript, men det vill säg inte riktigt nu när jag lagt in det i den nya desigen...? fattar inte riktigt det fungerar utmärkt på webservern i datorn men när jag laddar upp det så kommer detta flemeddelandet:

no value given for ...bla bla line 43 = RecSet.Open SQL, Conn

Fattar att det har nått med databassökvägen att göra men sökvägen e ju riktig?

KOden:
<%
'##############ÄNDRA DETTA#############################
NyhetPerSida = 10 ' Antal nyhetsrubriker per sida
URL = "../../default.asp" ' Sidan du inkluderar news1.asp i
db = Server.MapPath("/db/gnyheter/db/news.mdb") ' Databasens sökväg
Width = "200" ' Bredd på bilden
'#####################################################
%>

<!--
##########################################
Gruvsjo Nyheter v3
Åsa Gruvsjö ©
https://www.gruvsjo.com
Asa@gruvsjo.com

Fri att använda om ni låter copyrightkoden stå kvar!
##########################################
-->
<link href="stil.css" rel="stylesheet" type="text/css">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#f5f5f5"><table 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>Inga nyheter inlagd<a href="../../default.asp">a!</a></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><a href="<%=URL%>?ID=<%=RecSet("ID")%>"><b><%=RecSet("rubrik")%></b></a></td>
<td><%=FormatDateTime(RecSet("datum"),2)%> (<%=FormatDateTime(RecSet("datum"),4)%>)</td>
</tr>
<%x=x+1
RecSet.MoveNext
Loop
RecSet.Close
If Sidor > 1 Then%>
<tr>
<td valign="top" colspan="2"> Läs mer:
<%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%"><img src="db/gnyheter/bilder/news.gif" border="0" valign="middle"></td>
<td width="94%"><b><%=RS("rubrik")%></b> | <%=FormatDateTime(RS("datum"),2)%>
(<%=FormatDateTime(RS("datum"),4)%>)</td>
</tr>
<tr>
<td colspan="2"><%=Replace(RS("nyhet"),vbCrLf,"<br>")%><br>
<br>
/<%=RS("namn")%></td>
</tr>
<tr>
<td colspan="2"><br>
<a href="<%=URL%>">« Tillbaka</a></td>
</tr>
<%End If%>
</table></td>
</tr>
</table>
<br>

Tack på förhand =)

Mvh Jimmy