Kolla om databasen är slut?

jo jag såg det men det fungerade ändå inte
testar runt lite nu..

hmm. ska det vara såhär?;

Select count(*) as antalposter from Info

Response.Write antalposter

rakt upponer i koden eller?

ISS klagade på ordet "count(*)". Det skulle tydligen vara Case med tyckte den

nej, inte rakt upp o ner .. :)
det ska vara
SQL = "SELECT count(*) as antalposter from Info"

Sen får du ju exekvera SQL frågan..

Sedan hämta ut värdet, t.ex såhär:
Response.Write RecSet("antalposter")

ja jag tänkte väl :P

SQL = "SELECT * From Info WHERE Pic = '" & Request.Querystring("pic") & "'"

så ser den ut nu
hur ska jag kopletera med din kod?

SQL = "SELECT * From Info WHERE Pic = '" & Request.Querystring("pic") & "' count(*) as antalposter "

vild gissning :)

Föresten, ska man kunna ta bort sina egna inlägg?
jag kan inte det :x

jag kan däremot redigera dom.
Knas bas

njaa

du kan inte komplettera med den i din nuvarande SQL-fråga, du får helt enkelt köra 2 stycken SQL frågor. Att du t.ex först kollar hur många poster det är totalt.

edit: nej du kan inte ta bort dina egna inlägg

oki
hmm
betyder detta samma sak?

Conn.Execute SQL

Recset.Open SQL, Conn

argh...
jag får det inte att fungera..

Set Conn = Server.CreateObject("ADODB.Connection")
Set Recset = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(URL) & ";pwd=;"

SQL = "SELECT count(*) as Poster from Info"

Conn.Execute SQL
Recset.Open SQL, Conn

Response.Write Recset("Poster")

där har du kodsnutten

den säger att Recset är Fel antal argument eller felaktig egenskapstilldelning. x(

ja, är Conn.Execute SQL verkligen nödvändig?

jag skulle iaf inte gjort databasöppningen på det där viset ;)

Jag är totalt kass på databaskopplingar
Du får gärna ge mej en om du har en bra ;)

men jag vet uinte
säg hur jag ska göra :P

EY jag fixade det :e :e :e
Tack för hjälpen!

ja visst, tanka ner http://www.knivby.nu/adovbs.inc
och lägg den i mappen där dina asp-filer ligger.
Sedan överst på varje asp-fil som du ska göra en databaskoppling på skriver du:

<!--#include file="adovbs.inc" -->

Sen för att, t.ex ta ditt exempel, så gör du såhär för att öppna databasen o hämta värden:

<%
Set Connect = Server.CreateObject("ADODB.Connection") 
Set Recset = Server.CreateObject("ADODB.Recordset") 
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(URL) & ";pwd=;" 

SQL = "SELECT count(*) as Poster from Info" 
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
Response.Write RecSet("Poster") & "<br>"
RecSet.Close
SQL = "SELECT * From Info WHERE Pic = '" & Request.Querystring("pic") & "'" 
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
'Här får du hämta ut den information du vill använda

RecSet.Close
Connect.Close
Response.Write Recset("Poster") 
%>

koden är inte testad men jag tror det ska funka

skillnaden är?
att du skriver Connect istället för Conn? :q

nee, använder mej av adovbs.inc oxå.. om du vill veta mer om varför så får du prata med nån som är bättre än mej. Jag har lärt mej att det är bättre att göra så, och därför gör jag det :e
"Tror" att den typ låser databasen medans man arbetar med den för att undvika konflikter från flera klienter samtidigt.. kan dock ha fel

Aha
äh det funkar då är jag nöjd :)

Men nu har jag prebliem med If satsen.

Jag har
If Request.Querystring("pic") = Poster Then
Response.Write "slut"
Else
Response.Write "o-slut"
End if

om man översätter det blir det
If "8" = 8 Then bla

det funkar ju inte
båda måste vara nummer eller text (samma)
hur gör jag om text till nummer eller tvärtom? :q

Du ska inte behöva göra det, annars är det Cint(Request.Querystring("pic"))
men som sagt, det ska inte behövas.. hm

jag destade att ta
if 8 = "8" then bla
det funkade inte
men if 8 = 8 funkar

Weee det funka :f

hm, prova
If cint(Request.Querystring("pic")) = Poster Then

men jag tror inte det är där felet ligger..

det va det jag gjorde och då funkade det :)