27 svar · 536 visningar · startad av Poffe
Hejsan
har ett problem med getRows, den väljer bara sista posten i databasen.
Set RS = Connect.Execute(sSQL)
If Not RS.EOF Then
arrUpptagen = RS.GetRows()
'Do until RS.EOF
' Response.Write RS("Start_Date") & "<br>"
' RS.moveNext
'Loop
End If
RS.Close
Set RS = Nothing
När man väljer att den ska skriva ut alla poster så funkar det men med getRows väljer den bara sista, nån som vet varför?
Hur skriver du ut innehållet ur arrUpptagen sen då?
"SELECT Start_Date, End_Date FROM tabell"
Peeer skrev:
Hur skriver du ut innehållet ur arrUpptagen sen då?
Peeer skrev:
Hur skriver du ut innehållet ur arrUpptagen sen då?
problemet är inte att den inte skriver ut utan att den bara får in sista posten och inte alla
grejen är ju det att det funkar om man använder en vanlig loop (den som är i första koden) men inte getRows
Detta borde fungera då:
[RED]sSQL = "SELECT Start_Date, End_Date FROM tabell"
Set RS = Connect.Execute(sSQL)
If Not RS.EOF Then arrUpptagen = RS.GetRows()
RS.Close : Set RS = Nothing
If IsArray(arrUpptagen) Then
For i = 0 To UBound(arrUpptagen,2)
Response.Write arrUpptagen(0,i) &"<br>"& arrUpptagen(1,i) &"<br>"
Next
Erase arrUpptagen
End If[/RED]
jo men grejen är ju att det är så vi skrivit nu ;)
har suttit typ en timme nu och sökt fel, enda felet är at den bara lägger in sista posten ur databasen och det kan ju inte vara påså många ställen det kan gå fel då, eller?
Poffe skrev:
..enda felet är at den bara lägger in sista posten ur databasen..
Lägger in?
Menar du hämtar..?
Och du är säker på att det finns tillräckligt med poster i databasen?
jo, hämtar menar jag ;)
ja, när man inte kör med getrows får man ut alla 10 poster och kör man med getrows får man bara ut sista
Hur ser din GetRows-kod ut?
vilken menar du?
denna använder jag för att hämta
Set RS = Connect.Execute(sSQL)
If Not RS.EOF Then arrUpptagen = RS.GetRows()
RS.Close : Set RS = Nothing
den du skrev alltså...
Ok, testade du med hela koden som jag visade här tidigare?
Vet inte om jag fattar det hela rätt. Men ska du alltså både ta ut RS.GetRows() samt loopa ut det hela? Varför i så fall?
Men men,
Set RS = Connect.Execute(sSQL)
If Not RS.EOF Then
arrUpptagen = RS.GetRows()
RS.moveFirst
Do until RS.EOF
Response.Write RS("Start_Date") & "<br>"
RS.moveNext
Loop
End If
RS.Close
Set RS = Nothing
Eller är det i arrayen alla poster inte kommer in i?
Då lyder följdfrågan, hur vet du det? Är du säker på det?
nej, jag vill endast ta ut getRows men dåfunkar det ju inte. När jag loopar funkar det.
Oki, då är jag med, hur är du säker på att det bara är sista posten i den, skriver du ut den rätt? (Arrayen alltså?)
Testa att använda denna:
[RED]sSQL = "SELECT Start_Date, End_Date FROM tabell"
Set RS = Connect.Execute(sSQL)
If Not RS.EOF Then
arrUpptagen = RS.GetRows()
Else
Response.Write "Databasen gav inget värde.."
End If
RS.Close : Set RS = Nothing
If IsArray(arrUpptagen) Then
For i = 0 To UBound(arrUpptagen,2)
Response.Write arrUpptagen(0,i) &"<br>"& arrUpptagen(1,i) &"<br>"
Next
Erase arrUpptagen
Else
Response.Write "Ingen Array skapades.."
End If[/RED]