Database udtræk - sortering og udtræk fra flere tabeller

1)
SELECT COUNT (IDthread) AS Flest, IDuser
FROM thread, users
WHERE userID = IDuser GROUP BY IDuser order by flest desc

//akj

den går ikke: Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/forum.asp, line 27

Kan du evt. sende mig din db/uploade den ??

For at overholde reglerne på E bliver jeg nødt til at uploade den til min HP bagefter så alle kan se løsningen.

//akj

sender email til din hotmail konto

Check lige din mail. Jeg kunne ikke modtage filen.

//akj

SELECT COUNT (IDthread) AS Flest, IDuser
FROM thread, users
WHERE userID = IDuser GROUP BY IDuser order by count(IDthread) desc

Du kan ikke bruge aliaset i order by delen.

sender databasen igen :) - pakket i .rar

the_bma_man - det er rigtigt fandt selv ud af det i går :) - tak
så er der bare THE BIG ONE tilbage

Du skal lave to queries

count_tread:
SELECT threadid, count(threadid) AS antal
FROM posts
GROUP BY threadid;



time_thread:
SELECT threadid, max(cdate(datevalue(createdate) & ' ' & timevalue(createtime))) as seneste
FROM posts
GROUP BY threadid;



Din "rapport" trækker du ud med denne sql:

SELECT Left(Headline,50) AS Expr1, users.Name, thread.Views, users.IDuser, thread.IDthread, count_thread.antal, time_thread.seneste
FROM thread, users, count_thread, time_thread
WHERE thread.userID=IDuser And count_thread.threadid=IDthread and time_thread.threadid=IDthread
ORDER BY thread.IDthread DESC;


//akj

ok - det prøver jeg lige

Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'count_thread'. Make sure it exists and that its name is spelled correctly.
/forum.asp, line 33

koden:
<%
Dim count_tread
Dim count_tread_numRows

Set count_tread = Server.CreateObject("ADODB.Recordset")
count_tread.ActiveConnection = MM_gutternes_STRING
count_tread.Source = "SELECT threadid, count(threadid) AS antal  FROM posts  GROUP BY threadid;  "
count_tread.CursorType = 0
count_tread.CursorLocation = 2
count_tread.LockType = 1
count_tread.Open()

count_tread_numRows = 0
%>
<%
Dim time_thread
Dim time_thread_numRows

Set time_thread = Server.CreateObject("ADODB.Recordset")
time_thread.ActiveConnection = MM_gutternes_STRING
time_thread.Source = "SELECT threadid, max(cdate(datevalue(createdate) & ' ' & timevalue(createtime))) as seneste  FROM posts  GROUP BY threadid"
time_thread.CursorType = 0
time_thread.CursorLocation = 2
time_thread.LockType = 1
time_thread.Open()

time_thread_numRows = 0
%>
<%
Dim rsThreads
Dim rsThreads_numRows

Set rsThreads = Server.CreateObject("ADODB.Recordset")
rsThreads.ActiveConnection = MM_gutternes_STRING
rsThreads.Source = "SELECT Left(Headline,50) AS Expr1, users.Name, thread.Views, users.IDuser, thread.IDthread, count_thread.antal, time_thread.seneste  FROM thread, users, count_thread, time_thread  WHERE thread.userID=IDuser And count_thread.threadid=IDthread and time_thread.threadid=IDthread  ORDER BY thread.IDthread DESC"
rsThreads.CursorType = 0
rsThreads.CursorLocation = 2
rsThreads.LockType = 1
rsThreads.Open()

rsThreads_numRows = 0
%>

De 2 query's skal du lave i access. har du dansk version mener jeg den hedder forespørgsler eller sådan noget.

//akj

thankz man - det kører - jubiiiiiiiiiiii.

MEN det virker kun på 1 record. når jeg laver Repeat Region viser den ikke de andre records. Any ideas ?

my bad - wrong account. sad og checkede det på en kollegas pc

det virker kun på 1 record. når jeg laver Repeat Region viser den ikke de andre records. kan "vi" fikse det :) ?

Jeg er lost... hvad mener du med repeat region ??

//akj

http://www.gutternes.dk/forum.asp - den viser kun 1 record selvom der er oprettet 169 threads.

med repeat mener jeg bare koden:
    <%
While ((Repeat1__numRows <> 0) AND (NOT rsThreads.EOF))
%>
    <tr>
        <form name="form1" method="POST" action="<%=MM_editAction%>">
          <td height="20">
              <a href="java script:document.forms['form1'].submit()"><%=(rsThreads.Fields.Item("Expr1").Value)%></a>
              <input name="Views" type="hidden" id="Views" value="<%=(rsThreads.Fields.Item("Views").Value)+1%>">
              <input type="hidden" name="MM_update" value="form1">
              <input type="hidden" name="MM_recordId" value="<%= rsThreads.Fields.Item("IDthread").Value %>">
              <input name="IDthread" type="hidden" id="IDthread" value="<%=(rsThreads.Fields.Item("IDthread").Value)%>">
          </td>
        </form>
        <td align="center" class="black9"><%=(rsThreads.Fields.Item("antal").Value)%></td>
        <td align="center"><a href="profil.asp?IDuser=<%=(rsThreads.Fields.Item("IDuser").Value)%>" class="black9"><%=(rsThreads.Fields.Item("Name").Value)%></a></td>
        <td align="center" class="black9"><%=(rsThreads.Fields.Item("Views").Value)%></td>
        <td class="black9">&nbsp;<%=(rsThreads.Fields.Item("seneste").Value)%></td>
    </tr>
    <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  rsThreads.MoveNext()
Wend
%>

Det er fordi der kun er en threadid i din "posts" tabel.

//akj

hvordan kan/bør jeg så gøre det ?

Du kan da lige starte med at lukke et af dine brugernavne !!!

//akj

my bad - det er fordi jeg rykker lidt rundt herinde på kontoret. flere af os har konti til eks.dk og jeg havde ikke lagt mærke til at det var en anden som var logget på.

er der ikke en måde at få alle "threads" med ?
skal det være gennem de queries der ligger i access ?

Der skal jo være en relation mellem post og thread. Alle threads bør vel have minimum en post.

Skal jeg være helt ærlig tror jeg ikke en skid på din forklaring......
Jeg har lige søgt lidt rundt her på E.

http://www.eksperten.dk/spm/407843 oprettet af mvk
http://www.eksperten.dk/spm/470502 oprettet af mvk

http://www.eksperten.dk/spm/420267 oprettet af enrik
Er "enrik" også en kollega ??

Det lugter...

//akj

enrik er mvk's bror - Henrik Vind-Knudsen - han lavede det forrige site.

nu sidder jeg og mvk og laver det nye site - det er vel fair nok at man er flere om at lave det og så når mvk render ind i probs opretter han et ? og når jeg ikke kan nå videre opretter jeg et spørgsmål. jeg ved ikke om det er imod ekspertens regler, men jeg synes det burde være ok

en thread har ingen post før det oprettes et "svar" til den pågældende thread

OK

Uden en record i post til hver thread vil det ikke virke.

Du skal flytte beskeden over i posts istedet for at have den i threads så der altid vil være en record i posts til hver thread.

//akj

kan jeg lave det med sådan en queries som du viste tidligere ?

Nej, du skal sørge for at oprette en record i post tabellen når du opretter en ny thread.

Og så bruger du igen forkert brugernavn....

//akj

jeg fik den lavet med en sql:
SELECT LEFT(thread.Headline,35) AS Headline50, Name, thread.Views, thread.IDthread, IDuser, thread.CreateDate, thread.CreateTime, COUNT (t1.threadID) as Svar
FROM (thread LEFT JOIN [users] ON thread.userID = users.IDuser) LEFT JOIN thread as t1 ON  thread.IDthread = t1.threadID
WHERE thread.threadID = 0  GROUP BY LEFT(thread.Headline,35), Name, thread.Views, thread.IDthread, IDuser, thread.CreateDate, thread.CreateTime
ORDER BY thread.IDthread DESC

den er fanme vild :) - men den virker uden queries i databasen

tak for al din hjælp

selvtak

//akj