Avatar billede exe-s Nybegynder
15. maj 2003 - 18:23 Der er 26 kommentarer og
1 løsning

Tælle sammen i mdb database

Jeg har lige lavet en ny hjemmeside www.jbruhn.dk med spil på, jeg har så lavet sådan at den tæller hits for hvert spil der bliver spillet. Mit spørgsmål er så hvordan får jeg plusset alle disse tal sammen for at vise hvor hits alle spillene har fået til sammen...

MVH.
Jonas
Avatar billede exe-s Nybegynder
15. maj 2003 - 18:23 #1
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 18:26 #2
SELECT COUNT(hits) FROM db....
Avatar billede exe-s Nybegynder
15. maj 2003 - 18:31 #3
kan du give mig hele koden?
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 18:34 #4
Det er SQL sætningen som du skal sætte ind det rigtige sted....
Hvis jeg skal give dig koden må du give mig resten af kilden ;)
Avatar billede mm12010 Nybegynder
15. maj 2003 - 18:37 #5
SELECT SUM(Hits) AS allHits FROM Spil
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 18:40 #6
nå ja, sum er vist mere rigtigt ;)
Avatar billede mm12010 Nybegynder
15. maj 2003 - 18:47 #7
Set rs = conObj.Execute("SELECT SUM(Hits) AS allHits FROM Spil")
Response.Write "hits alle spillene har fået til sammen:" & rs("allHits")
Avatar billede exe-s Nybegynder
15. maj 2003 - 19:06 #8
Det kan jeg ikke... hmmm... Vil i ikke lige give mig hele koden... altså fra start til slut?
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 19:09 #9
vi kan jo ikke sidde og gætte os til det rigtige....
Som jeg skrev tidligere må du give os kildekoden før vi kan rette den....
Avatar billede exe-s Nybegynder
15. maj 2003 - 19:14 #10
Jeg er ikke så god til asp igen :o( Og det eneste jeg egentlig har er det du har givet mig. Så vil I ikke være flinke at give mig hele koden :o)
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 19:17 #11
prøv nu at forstå problemet. Vi kan ikke lave det for dig når vi ikke ved hvordan din database ser ud og hvordan din asp side ser ud.

Siden du har en side må du også have noget kildekode. Post din kildekode her så vi kan ordne det.
Avatar billede exe-s Nybegynder
15. maj 2003 - 19:22 #12
Lige nu ser det sådan her ud:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("spildb.mdb")
Conn.Open DSN

strSQL = "SELECT hits AS allHits FROM Spil"

set rscount = conObj.Execute("SELECT hits AS allHits FROM Spil")
antal = rscount("antal")
set rscount = nothing
%> <%=antal%> spil

Men det tror jeg er meget forkert... Og min database er en microsoft acces database.
Avatar billede kaptajnkemo Nybegynder
15. maj 2003 - 19:27 #13
Hm.... jeg kender ikke meget til VbScript.... og vil iøvrigt foreslå dig at du laver det i javascript, ellers kan siden ikke ses i alle browsere...

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("spildb.mdb")
Conn.Open DSN

strSQL = "SELECT hits AS allHits FROM Spil"

set rscount = conObj.Execute("SELECT hits AS allHits FROM Spil")
antal = rscount("allHits")
set rscount = nothing
%> <%=allHits%> spil

er et stykke af vejen, men som sagt kender ikke VB så jeg tør ikke love dig noget....
Avatar billede exe-s Nybegynder
15. maj 2003 - 20:56 #14
Nejj det virker ikke... desværre... Men er der andre som kan hjælpe?
Avatar billede mm12010 Nybegynder
15. maj 2003 - 22:11 #15
er heller ikke nogen haj i VB, men prøv dette:

<%
Dim Conn, DSN, strSQL, antal
Set Conn = Server.CreateObject("ADODB.Connection")
Set DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
Set DSN = DSN & ";DBQ=" & Server.MapPath ("spildb.mdb")
Conn.Open DSN

strSQL = "SELECT SUM(Hits) AS allHits FROM Spil"

set rscount = Conn.Execute("strSQL")
antal = rscount("allHits")
set rscount = nothing
Response.Write "hits alle spillene har fået til sammen:" & antal
%>
Avatar billede mm12010 Nybegynder
15. maj 2003 - 22:12 #16
hvis ikke det virker kan jeg nemt lave det i JavaScript...
Avatar billede mm12010 Nybegynder
15. maj 2003 - 22:13 #17
hovsa..! :o)

ret denne linie:
Set DSN = DSN & ";DBQ=" & Server.MapPath ("spildb.mdb")

til:
Set DSN = DSN & "DBQ=" & Server.MapPath ("spildb.mdb")
Avatar billede exe-s Nybegynder
16. maj 2003 - 22:36 #18
Det virker heller ikke... Ingen af delene...
Avatar billede kaptajnkemo Nybegynder
17. maj 2003 - 15:10 #19
så må du jo fortælle lidt om fejlmeddelserne, ellers skyder vi i blinde...
Avatar billede exe-s Nybegynder
18. maj 2003 - 15:20 #20
Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: '[string: "DRIVER={Microsoft Ac"]'
/jbruhn/tael.asp, line 4
Avatar billede mm12010 Nybegynder
18. maj 2003 - 15:26 #21
må vi se hele din kode?
Avatar billede exe-s Nybegynder
18. maj 2003 - 15:27 #22
<%
Dim Conn, DSN, strSQL, antal
Set Conn = Server.CreateObject("ADODB.Connection")
Set DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
Set DSN = DSN & "DBQ=" & Server.MapPath ("spildb.mdb")
Conn.Open DSN

strSQL = "SELECT SUM(Hits) AS allHits FROM Spil"

set rscount = Conn.Execute("strSQL")
antal = rscount("allHits")
set rscount = nothing
Response.Write "hits alle spillene har fået til sammen:" & antal
%>
Avatar billede mm12010 Nybegynder
18. maj 2003 - 16:51 #23
<%
Dim Conn, DSN, strSQL, antalSet
Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("spildb.mdb")
Conn.Open DSN

strSQL = "SELECT SUM(Hits) AS allHits FROM Spil"

set rscount = Conn.Execute("strSQL")
antal = rscount("allHits")
set rscount = nothing
Response.Write "hits alle spillene har fået til sammen:" & antal
%>
Avatar billede exe-s Nybegynder
18. maj 2003 - 17:54 #24
hmmm... nej desværre...
nu skriver den...

Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: ''
/jbruhn/tael.asp, line 6
Avatar billede mm12010 Nybegynder
18. maj 2003 - 19:12 #25
her er det i JavaScript

det virker jeg har testet det

------------------------------------
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<%
conn = Server.CreateObject("ADODB.Connection");
DBPath = "DBQ=" + Server.MapPath("spildb.mdb");
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; " + DBPath);

strSQL = "SELECT SUM(Hits) AS allHits FROM Spil";
rscount = conn.Execute(strSQL);
antal = rscount("allHits").value;

conn.Close();
%>
<html>
<head>
<title>353085</title>
</head>

<body>
<table width="450" border="1" cellspacing="0" cellpadding="0">
  <tr>
    <td>Hits alle spillene har fået til sammen:</td>
    <td><%=antal%></td>
  </tr>
</table>
</body>
</html>
------------------------------------

du kan selv et eksempel her: http://www.uniquem.dk/kunst/353085.asp
Avatar billede exe-s Nybegynder
18. maj 2003 - 19:21 #26
Mange tak mm12010 :o) Nu virker det skam kan du tro... Se det om et stykke tid på www.jbruhn.dk under spil...
Avatar billede mm12010 Nybegynder
05. august 2003 - 12:13 #27
lukketid?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester