Jag har laddat ner ett nyhetsscript med en databas på mitt bands hemsida.. Förut så hade vi brinkster som webbhotell och då funkade det jättebra. Nu har jag bytt till b-one.net, och får detta felmeddelande: Bra att du hittade hit :) okej! betyder det att man inte kan köra några databaser alls, eller bara att man får köra på någon annan sort? vad för nån isf? tack för hjälpen! B-one har ju inte stöd för asp, access etc. pga. att det är en linux burk de kör med... Dessutom har de väldigt låg obegränsad överföring...ASP hjälp
Kod:
Microsoft VBScript compilation error '800a0400'
Expected statement
ndefault.asp, line 15
With rs
Detta är hela koden för nyhetsfilen:
Kod:
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/news.mdb")
Const perSida = 3
Sidan = Request.QueryString("sida")
If Sidan = "" then
sida = 1
Else
sida = Sidan
End If
With rs
.CursorLocation = 3
.CacheSize = perSida
End With
SQL = "SELECT * From news Order By Id Desc"
rs.Open SQL, MinCon
With rs
.MoveFirst
.PageSize = perSida
.AbsolutePage = sida
End With
Sidor = rs.PageCount
Count = 0
Do While Not rs.EOF And Count < rs.PageSize
%>
<br><font color="#000000" size="1" face="verdana"><b><%=rs("date")%></B><br>
<%=left(rs("news"),10000)%></font><br>
<%
Count = Count + 1
rs.MoveNext
Loop
rs.Close
MinCon.Close
%>
<%If Sidor = 1 Then%>
<%Else%>
<%End If%>
<br>
<br>
<font size="1" face="verdana">Older news:</font>
<br>
<%If Sidor <> 1 Then%>
<%For Sid = 1 To Sidor%>
<%If (Int(Sid)) = (Int(sida)) Then%><%=Sid%><%Else%> <%=Sid%> <%End If%>
<%Next%>
<%End If%>
Vad är det som är fel?Sv: ASP hjälp
Som du kanske kunde läsa på forumet.nu så har inte B-one stöd för access-databaser.Sv: ASP hjälp
Sv: ASP hjälp