GetRows

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å?

Hur ser din SQL-sats ut?

Notera att loopen ser helt olika ut när du använder GetRows.. ;)

"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 ;)

Aha, ok.. fattade inte det. ;)

Kör några Else-satser på vägen för att kolla var det falerar..

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]