webForumDet fria alternativet

Recordset

5 svar · 358 visningar · startad av devotion

devotionMedlem sedan jan. 20013 582 inlägg
#1

Hepp :)

Har följande kod som stegar i recordsetet:

Set objRS = Server.Createobject("ADODB.Recordset")
objRS.Open sSQL, objConn, 1, 2

'Gå till sista posten i recordsetet
'**********************************
objRS.Move objRS.RecordCount-1

'Ta fram värdena för pris och leverantör
'***************************************
dHighestPrice = cdbl(objRS("articlePriceWithDiscount"))
sHighestPriceSupplier = objRS("supplierName")

'Gåt ill första posten
'*********************
objRS.MoveFirst

'Ta fram värdena för pris och leverantör
'***************************************
dLowestPrice = cdbl(objRS("articlePriceWithDiscount"))
sLowestPriceSupplier = objRS("supplierName")

'Skriv ut högsta respektive lägsta pris
'**************************************
response.write "<span class=""highestPrice"">Högst pris: " & sHighestPriceSupplier & " " & dHighestPrice & " kr</span><br>"
response.write "<span class=""lowestPrice"">Lägst pris: " & sLowestPriceSupplier & " " & dLowestPrice & " kr</span>"

[b]objRS.MoveFirst[/B]

If objRS.EOF then

...

Min fråga är:

Behöver den sista objRS.MoveFirst (som är i fetstil) vara med? Kankse bara är en estetisk fråga. Har testat lite olika och inte fått någon skillnad. Är kodraden bara onödig?

Mvh
Henrik

TroxyMedlem sedan mars 20041 505 inlägg
#2

Du har ju redan kört objRS.Movefirst ovanför, så det ska väl inte behövas en gång till.

Gör du mer saker med ditt Recordset längre ner i koden eller?
Om du bara använder ditt Recodset till det som du visade så skulle jag personligen skrota hela grejen.
Skriv en SQL-fråga som plockar ut högsta respektive lägsta värdet istället.

Dock skulle du kunna skriva objRS.MoveLast istället för objRS.Move objRS.RecordCount-1.

devotionMedlem sedan jan. 20013 582 inlägg
#3

Efter den visade koden loopar jag ut ett antal artiklar som presenteras i en tabell. Den med lägst pris först och den med högst pris sist...

Jag har försökt att göra det med en SQL-fråga men gått bet...
http://www.webforum.nu/showthread.php?t=143873

Kanske skulle använda sig av objRS.MoveLast istället..

Mvh
Henrik

devotionMedlem sedan jan. 20013 582 inlägg
#4

Är det sista:

objRS.MoveFirst

Onödigt?

Mvh
Henrik

emissionMedlem sedan dec. 19996 721 inlägg
#5

devotion skrev:

Är det sista:

objRS.MoveFirst

Onödigt?

Mvh
Henrik

Japp. Du bör dessutom flytta "If objRS.EOF then" längre upp.

devotionMedlem sedan jan. 20013 582 inlägg
#6

Ok!

Tackar emission!... :)

132 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)