Avatar billede lbos Nybegynder
22. februar 2003 - 17:55 Der er 34 kommentarer og
1 løsning

jeg tror den er tricki' ?

jeg er ved at prøve at lave en auktions side.Jeg har downloadet et gratis program .Men problemet er jeg kunne godt tænke mig at trække de måske 5-10 nyeste auktioner ud af databasen .MEN det er jeg vist ikke helt inde i !
db'en hedder /data/QuickAudtion.mdb i denne db er der 4 tabeler |tblQAbids|tblQACategories|tblregistrations|tblQAActions|
Nå det er så tblQAActions der er intresant! I denne tabel er der 15 kolonner disse 3 vil jeg gerne trække ud som de 5-10 nyeste (med billede evt.)
|aucItemTitle| aucImageUrlauc| CloseDate|
Jeg skal helst bruge hele koden da jeg er en nød til det her ;O) !
Avatar billede lbos Nybegynder
22. februar 2003 - 19:18 #1
Den er vist for svær der er ikke nogle der vil svare synes ellers pointne er gode nok ?
Avatar billede stoney96 Nybegynder
22. februar 2003 - 19:25 #2
Sqlstrengen du skal bruge er
"select top 10 * from tblQAActions order by CloseDate desc"

Vend tilbage hvis du har problemer med at implementere det.
Avatar billede lbos Nybegynder
22. februar 2003 - 19:27 #3
Ja men det har jeg !!! Skal bruge det hele Please !!
Avatar billede stoney96 Nybegynder
22. februar 2003 - 19:33 #4
Øh, hvad er "det hele" ?
Avatar billede stoney96 Nybegynder
22. februar 2003 - 19:38 #5
Prøv følgende:


Set conn = Server.CreateObject("ADODB.Connection")
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + Server.MapPath & ("/data/QuickAudtion.mdb "))
sqlstr="select top 10 * from tblQAActions order by CloseDate desc"
set rs=conn.execute(sqlstr)
do until rs.eof
  response.write RS("aucItemTitle") & "<img src=images/" & rs("aucImageUrlauc")
  rs.movenext
loop
Avatar billede stoney96 Nybegynder
22. februar 2003 - 19:41 #6
3.sidste linie skulle have været:

response.write RS("aucItemTitle") & "<img src=images/" & rs("aucImageUrlauc") & " border=0>"
Avatar billede lbos Nybegynder
22. februar 2003 - 19:45 #7
Får denne fejl
Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'Server.MapPath'

/QuickAuction/1.asp, line 2
Avatar billede stoney96 Nybegynder
22. februar 2003 - 19:58 #8
Hvor ligger din database i forhold til asp-filerne ?
Avatar billede lbos Nybegynder
22. februar 2003 - 20:02 #9
den ligger i mappen auktion hvor mine asp filer også ligger db'en ligger i mappen data
Avatar billede stoney96 Nybegynder
22. februar 2003 - 20:03 #10
Prøv at ændre linie 2:
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + Server.MapPath & (".") & "/data/QuickAudtion.mdb")
Avatar billede stoney96 Nybegynder
22. februar 2003 - 20:06 #11
Sorry, linie 2:
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + Server.MapPath(".") & "/data/QuickAudtion.mdb"))
Avatar billede lbos Nybegynder
22. februar 2003 - 20:07 #12
samme fejl

Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'Server.MapPath'

/QuickAuction/1.asp, line 2
Avatar billede stoney96 Nybegynder
22. februar 2003 - 20:09 #13
Prøv lige seneste svar...
Avatar billede mortrr Praktikant
22. februar 2003 - 20:09 #14
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + Server.MapPath("data/QuickAudtion.mdb"))
Avatar billede lbos Nybegynder
22. februar 2003 - 20:12 #15
så siger den det her
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x76c Thread 0xc40 DBC 0x19628adc Jet'.

/QuickAuction/1.asp, line 2
Avatar billede stoney96 Nybegynder
22. februar 2003 - 21:03 #16
Sørg for at iuser.... har adgang til /data/ directoriet.
Avatar billede lbos Nybegynder
23. februar 2003 - 01:13 #17
er ikke helt med nu har prøvet noget andet men nu har jeg da vistnok kontakt til databasen den skriver dette :

Microsoft JET Database Engine error '80040e0c'

Command text was not set for the command object.

/QuickAuction/2.asp, line 16
Avatar billede lbos Nybegynder
23. februar 2003 - 01:16 #18
her er hele scriptet :

<%

ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/data/QuickAuction.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString

sql = "select top 10 * from tblQAAuctions order by CloseDate desc"
set rs = Conn.Execute(strSQL)
do until rs.eof
%><% response.write RS("aucItemTitle") & "<img src=images/" & rs("aucImageURL") & " border=0>"
    Response.Write "<BR>" %><%                                       
rs.movenext()
loop

rs.close
Conn.close
set rs= nothing
set Conn = nothing
%>
Avatar billede lbos Nybegynder
23. februar 2003 - 01:18 #19
linie 16 er
set rs = Conn.Execute(strSQL)
Avatar billede stoney96 Nybegynder
23. februar 2003 - 01:23 #20
Lav linie 16 om til

set rs = Conn.Execute(sql)

- skal svare til variablen i linie 15
Avatar billede eagleeye Praktikant
23. februar 2003 - 01:38 #21
Du skriver SQL det ene sted of strSLQ det andet prøv at ændre disse to:

sql = "select top 10 * from tblQAAuctions order by CloseDate desc"
set rs = Conn.Execute(strSQL)


Til:

sql = "select top 10 * from tblQAAuctions order by CloseDate desc"
set rs = Conn.Execute(SQL)
Avatar billede lbos Nybegynder
23. februar 2003 - 01:55 #22
så får jeg denne fejl :

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/QuickAuction/2.asp, line 16
Avatar billede eagleeye Praktikant
23. februar 2003 - 02:03 #23
Tjek at kolonne og tabel navne er stavet korrekt. Fejlen betyder som regl at en kolonne er stavet forkert.
Avatar billede eagleeye Praktikant
23. februar 2003 - 02:08 #24
Hvis de er korrekt stavet i forhold til databasen så prøv at sætte [] omkring kolonne og tabel navne:

sql = "select top 10 * from [tblQAAuctions] order by [CloseDate] desc"
Avatar billede lbos Nybegynder
23. februar 2003 - 02:17 #25
Du havde ret eagleeye by closedate skulle være by aucCloseDate men billede sektionen ! Der kommer ikke noget billede frem det er nok fordi at det billede er en adresse http://*********.gif på en eller anden server har du en ide til det ?
Og lige en sidste :O) når den trækker de 10 sidste ud trækker den alle ud også de auktioner som er sluttet hvad kan jeg gøre der er en tabel der hedder aucEnded  hvor den skriver y eller n
Avatar billede stoney96 Nybegynder
23. februar 2003 - 02:21 #26
Start evt. med det helt enkle og udbyg derefter sql-sætningen, bare for lige at se at der kommer noget ud.

F.eks.
sql = "select * from tblQAAuctions"

- så skal alle dine data vælte ud. Ellers er der en anden fejl.
Avatar billede lbos Nybegynder
23. februar 2003 - 04:06 #27
Eagleeye du får pointene det med billedet har jeg selv fundet ud af. Men ikke det med :
når den trækker de 10 sidste ud trækker den alle ud også de auktioner som er sluttet hvad kan jeg gøre der er en tabel der hedder aucEnded  hvor den skriver y eller n
Og lige en sidste jeg kunne godt tænke mig en link til auktionerne Hvorn' gør jeg det ?
Håber du gider at svare
Avatar billede lbos Nybegynder
23. februar 2003 - 04:58 #28
Eagleeye den med auc ended har jeg også klaret men det kniber sgu med linket ???
Avatar billede stoney96 Nybegynder
23. februar 2003 - 05:44 #29
Tak til Ibos for 0 points. Nu har jeg også kun hjulpet dig fra kl.19.30 til kl.02.30. Og tak til Eagleeye som nassede de tilbudte points.
Kammerater!!!!!
Avatar billede lbos Nybegynder
23. februar 2003 - 05:52 #30
stoney96 er det ikke dem som kommer med det rette svar/løsning der skal have point ?
Jeg er da meget glad for at du har gidet at forsøge hjælpe mig men har ikke rigtig ku bruge det men du kan få de samme point hvis du kan svre på det med linket !
Avatar billede lbos Nybegynder
23. februar 2003 - 05:53 #31
svare på det med linket (sove tid ?)
Avatar billede eagleeye Praktikant
23. februar 2003 - 11:27 #32
stoney96 >> du kan få point her: http://www.eksperten.dk/spm/320689

Hvad mener du med 23/02-2003 05:44:39. Jeg nasser sku ikke en skid jeg hjælper hvor det er muligt. Før jeg læste den kommentar ville jeg med glæde dele point med dig, nu gør jeg det bare.
Avatar billede stoney96 Nybegynder
23. februar 2003 - 22:05 #33
Nej, Eagleeye - det var ikke så meget dig jeg blev "pissed" på.
Jeg blev lidt harm over at svaret 23/02-2003 01:23:14 ikke bliver accepteret og 23/02-2003 01:38:04 bliver det. Det er jo det samme som bliver svaret.
Jeg synes at have nurset ham Ibos igennem hele forløbet og så skriver han "gudhjælpemig" at mine forslag ikke virker. Prøv at se hvad jeg har svaret for ham.
Så Eagleeye, behold points'ne - Det er Ibos der er nasseren, sorry Eagleeye.
Avatar billede eagleeye Praktikant
23. februar 2003 - 22:09 #34
Ssvar nu på det spørgsmål jeg har oprettet til dig, du har da lavet grund arbejdet  her.
Avatar billede lbos Nybegynder
24. februar 2003 - 14:34 #35
Jeg vil gerne sige tak for de fine ord ! Det er stadig sådan at den der fandt problemet var Eagleeye !Og jeg valgte at at han skulle have pointene .Men ved nærmere eftertanke kan jeg godt se jeg burde havde delt pointene ,sket er sket jeg er sku ligeglad hwem som får pointene ,bare jeg fik det op og køre !Men jeg bryder mig fandeme ikke om at blive kaldt en nasser !!!!!!!!!!!!!!!!!!1
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