8 svar · 267 visningar · startad av ampy
när jag skriver denna kod:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & Server.MapPath("gastbok/gastbok_2000.mdb")
Set oRS = Connect.Execute("select count(*) as no from gbook")
<b> <%=gbookCount%> </b> inlägg i Gästboken
RecSet.Close
Connect.Close
%>
så får jag detta felmeddelande:
Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A0400)
Programsats förväntas.
/Ampy/main.asp, line 328
<b> <%=gbookCount
vad är felet?
Du har missat i asp-avgänsningen.
Så här ska det se ut:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & Server.MapPath("gastbok/gastbok_2000.mdb")
Set oRS = Connect.Execute("select count(*) as no from gbook")
%>
<b> <%=gbookCount%> </b> inlägg i Gästboken
<%
RecSet.Close
Connect.Close
%>
Mvh,
------------------
All your base are belong to me.
Nu får jag detta felmeddelande:
Körningsfel i Microsoft VBScript (0x800A01A8)
Objekt krävs.: ''
/Ampy/main.asp, line 326
Du kallar ditt connectionobjekt för Connection när du skapar det, men kallar det för Connect när du ska använda det.
------------------
All your base are belong to me.
Du har olika namn på ditt recordset... Du döper det först till oRS, sedan stänger du det med RecSet. Likadant med din connection.
Plus att du inte får ut antalet inlägg på det sätt du har gjort... Du måste gå via recordsetet.
Prova:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & Server.MapPath("gastbok/gastbok_2000.mdb")
Set [b]oRS[/b] = Connection.Execute("select count(*) as no from gbook")
%>
<b> <% =[b]oRS("no")[/b] %> </b> inlägg i Gästboken
<%
[b]
oRS.Close
Connection.Close
set oRS = Nothing
set Connection = Nothing
[/b]
%>
Det fetmarkerade är ändrat...
------------------
SPiN, bjorne.w@telia.com
-- Den som går i andras fotspår kommer aldrig först --
[Redigerat av SPiN den 14 okt 2001]
SPiN är vaken, bra där. :)
dock missade han en sak, det jag först noterade:
Set oRS = [b]Connection[/b].Execute("select count(*) as no from gbook")
mvh,
------------------
All your base are belong to me.
[Redigerat av @nders den 14 okt 2001]
din kod funkade spin , tack
@nders, var då? :q :e
ampy> Vad bra! :)
------------------
SPiN, bjorne.w@telia.com
-- Den som går i andras fotspår kommer aldrig först --
[Redigerat av SPiN den 14 okt 2001]