Asp

SQL = \"Select count(id) as antal from test\"

Prøv dette
SQL = \"Select count(*) as antal from test WHERE id;\"
lip

nej!

SQL = \"SELECT COUNT(id) AS antal FROM test WHERE id=0;\"

eller bvad ID nu skal være.. hvis du vil tælle ALT skal du helt fjerne WHERE delen

hvis jeg vil tælle det antal poster der er i id rækken, skal det så være:

SQL = \"SELECT COUNT(id) AS antal FROM test WHERE id=0;\"

SQL = \"SELECT COUNT(id) AS antal FROM test\"

er den du skal bruge

Skal den så hentes med:

response.write \"<table border=\'0\' font-size: 8 pt\'><font face=\'Verdena\' size=\'1\' color=\'#000000\'><b>\" & Record(\"antal\") & \" : </b></font>\"

SQL = \"Select count(id) as antal from test WHERE id\" & request(\"Id\")

Så henter den fil nummer tre i databasen hvis du skrive www.dinside.dk/ditdokument.asp?id=3

webs:> nemlig!

så skriver den

ADODB.Recordset error \'800a0cc1\'

Item cannot be found in the collection corresponding to the requested name or ordinal.

hmm .. har du et felt der hedder ID ?

id

hmm .. den fatter jeg godtnok ikke .. du kan også prøve med

SQL = \"SELECT COUNT(*) AS antal FROM test\"

du antallet udskrive den således i din tabel
<%=Record(\"antal\")%>

lip:> så læs dog med!!! han laver en response.write hvor han sagtens kan bruge \" & Record(\"antal\") & \"

Ups - Undskyld
lip

SQL = \"SELECT COUNT(*) AS antal FROM test\" virker hellere ikke

lip:> det\' ok :-)

Skal der ændres noget i databasen for at det virker?

har du executet din sql-streng rigtigt
Et bud på hvordan den kan se ud;
<%
Set oC_Conn = Server.CreateObject(\"ADODB.Connection\")
oC_Conn.Open(\"dit database navn\")

SQL = \"SELECT COUNT(*) AS antal FROM test\"
Set Record = Oc_Conn.Execute(SQL)
%>

response.write \"<table border=\'0\' font-size: 8 pt\'><font face=\'Verdena\' size=\'1\' color=\'#000000\'><b>\" & Record(\"antal\") & \" : </b></font>\"

Måske, men nu ser den sådan her ud:

<%
  Set Rs = Server.CreateObject(\"ADODB.Connection\")
  DBPath = \"DBQ=\" & server.mappath(\"test.mdb\")
  Rs.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
SQL = \"Select top 5 * from test order by id desc;\"
SQL = \"SELECT COUNT(id) AS antal FROM test\" 
Set Record = Oc_Conn.Execute(SQL)
%>


--

Det giver denne fejl:

Microsoft VBScript runtime error \'800a01a8\'

Object required: \'Oc_Conn\'

Den sidste linje skal ihvertfald se således ud
Set Record = Rs.Execute(SQL)

Hopper lidt mellem de fejl..

nu er den:

ADODB.Recordset error \'800a0cc1\'

Item cannot be found in the collection corresponding to the requested name or ordinal.

  Set Rs = Server.CreateObject(\"ADODB.Connection\")
  DBPath = \"DBQ=\" & server.mappath(\"test.mdb\")
  Rs.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
SQL = \"SELECT COUNT(id) AS antal FROM test\" 
Set Record = Rs.Execute(SQL)

SQL = \"Select top 5 * from test order by id desc;\"
Set toppen = Rs.Execute(SQL)

Du skal skilde dine sql kald i to,
dine reference til følgende kald; \"Select top 5 * from test order by id desc;\"
skal så bare rettes til toppen istedet for Record.

Fejlen er der desværre endnu

Tja, det virker hos mig!!
Når jeg fremprovokere den samme fejl som du har.
Så retter jeg i sql-kaldet, så får jeg nemlig samme fejl.
Så jeg har en ide om at fejlen ligger der, men jeg kan åbentbart ikke finde den.
Prøv at rette SQL til strSQL alle de steder hvor du skriver SQL.
Har du evt. flere sql kald på denne her side- hvor det evt. kunne gå galt!!?

<%
  Set Rs = Server.CreateObject(\"ADODB.Connection\")
  DBPath = \"DBQ=\" & server.mappath(\"test.mdb\")
  Rs.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
  strSQL = \"SELECT COUNT(id) AS antal FROM test\" 
  Set Record = Rs.Execute(strSQL)

  strSQL = \"Select top 5 * from test order by id desc;\"
  Set toppen = Rs.Execute(strSQL) 
%>
--
Senere i scriptet:

<%  \'finder tag i databasen
    If \"\" = Request.QueryString(\"Mode\") then
    strSql = \"Select * from test order by id DESC\"
    Set Record =  Rs.Execute(strSql)

Do While Not Record.EOF
response.write \"<table border=\'0\' style=\'font-family: Verdana; font-size: 8 pt\'><font face=\'Verdena\' size=\'1\' color=\'#000000\'><b>\" & Record(\"hjalp\") & \" : </b></font>\"
response.write \"<font face=\'Verdena\' font color=\" & Record(\"go\") & \" size=\'1\'> \" & Record(\"jep\") & \" </font>\"
response.write \"<font face=\'Verdena\' size=\'1\' color=\'08335A\'>[\" & Record(\"sidste\") & \"]</font><br>\"
response.write \"<font face=\'Verdena\' size=\'1\' color=\'08335A\'>[\" & Record(\"antal\") & \"]</font><br>\"

Record.MoveNext
    Loop
    Record.Close
    RS.Close
  end if
%>

Okay!
Du må ikke bruge  - Set Record = Rs.Execute(strSql) -
to gange,
den nemmeste er at lave det første kald om.
Kald det evt. RecObj i stedet for Record.
således;
  strSQL = \"SELECT COUNT(id) AS antal FROM test\" 
  Set RecObj = Rs.Execute(strSQL)

Husk så at lave [\" & RecObj(\"antal\") & \"] om også.
Nu skulle det virke ;0)

lip:> Du må bruger Set Record = Rs.Execute liugespå mange gange du har lyst til!

tdaugaard-
da ikke når det er tre forskellige sql kald, det giver da ikke mening!!
lip

Nu virker det.

Tak for hjælpen.

lip:> jo, hvis ikke du bruger dem sammen så må du godt.

Men det gør webs jo i denne her situation!!

lip:> okæi .. det havde jeg ikke lige set .. ;o)