Avatar billede 0ffline Nybegynder
13. marts 2004 - 07:30 Der er 7 kommentarer og
1 løsning

Find den laveste værdi

Hej

Hvorledes kan jeg bruge LBound i sorteringen, således jeg kun udtrækker det recordset som har den laveste værdi?

strSQL = "Select * From annonce Where annonce.kategori=pris Order by LAVESTE VÆRDI Desc"
Set rs = Conn.Execute(strSQL)
Avatar billede 0ffline Nybegynder
13. marts 2004 - 07:38 #1
Der skulle have stået noget i stilen af:
strSQL = "Select * From annonce Where annonce.pris= LAVESTE VÆRDI "
Set rs = Conn.Execute(strSQL)
Avatar billede erikjacobsen Ekspert
13. marts 2004 - 07:48 #2
select top 1 * from annonce order by pris asc

giver dig en annonce med mindste pris i Access
Avatar billede 0ffline Nybegynder
13. marts 2004 - 07:52 #3
Du har jo fuldstændig ret (som altid)
Tusinde tak
Avatar billede 0ffline Nybegynder
13. marts 2004 - 07:56 #4
Når du nu alligevel er oppe og ikke ønsker nogle points, har du så en fiks måde hvorpå jeg kan splitte udtrækket 'beskrivelse' således man kun udskriver 25 bogstaver efterfulgt af ...

Det med points var bare en formodning c".)
Avatar billede erikjacobsen Ekspert
13. marts 2004 - 08:02 #5
Det er en korrekt formening ;)

Man kan jo fx

  if len(streng)>25 then
    streng=left(streng,25) & "..."
  end if
Avatar billede 0ffline Nybegynder
13. marts 2004 - 08:10 #6
Det er da skønt at have ret, bare en gang imellem :O)
Det er vel ikke nok bare at smide det ind i enden således

strSQL = "select top 1 * from annonce order by pris asc"
Set rs = Conn.Execute(strSQL)
if len(streng)>25 then
    streng=left(streng,25) & "..."
  end if

Jeg udskriver 'beskrivelsen' sådan -->

" & Replace(rs("beskrivelse"),vbCrLf,"<br>")& "
Avatar billede erikjacobsen Ekspert
13. marts 2004 - 08:32 #7
Hvis du er sikker på der er mindst een række, så er det mere i retning af

strSQL = "select top 1 * from annonce order by pris asc"
Set rs = Conn.Execute(strSQL)
streng=rs("beskrivelse")
if len(streng)>25 then
    streng=left(streng,25) & "..."
  end if

response.write Replace(streng,vbCrLf,"<br>")
Avatar billede 0ffline Nybegynder
13. marts 2004 - 08:39 #8
Perfekt.. havde fået den til at splitte, men så mistede jeg Replace funktionen.
Endnu engang mange tak for hjælpen, håber du får en ligeså godt dag, som min morgen har været
God Weekend
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