Vraag : De gegevens van de vertoning van MSAccess aan lijst

Ik gebruik
- MSAccess
- Microsoft SQL het Frontpage
- 2002

I am Server van 2000 - van 8.00.760 (Intel X86) gegevens van een OB proberen te tonen MSAccess. Ik wil de aspispagina gegevens van de lijst voor de kopbal trekken. Er zal nooit meer dan 15 kopballen in de 1st rij zijn. Voor de eerste kolom, wil ik de rijetiketten specificeren. Ik heb het die de gegevens werken te tonen wanneer ik de kolomkopballen, maar niet het tegengestelde specificeer.

Currently mijn codevertoningen zoals:

RuimtePERC
Boston 2000 9021
Cleveland 2300 4500
Los Angeles 1900 4500
New York 1800 2100


I wil de vertoning zijn:

Boston Cleveland Los Angeles New York
Space 2000 2300 1900 1800
PERC 9021 4500 4500 2100

Code attached.
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:

<%
'Cre�ër recordset
 Verduister sql, objRS

 sql = „UITGEZOCHTE tblGeneral.ChartID, tblGeneral.City, tblGeneral.State,“ & _
 	„tblSpace.SpaceAll, tblSpace.SpacePERC“ & _
	„VAN tblGeneral BINNEN TREED tblSpace OP tblGeneral.ChartID= tblSpace.ChartID“ toe & _
	„WAAR tblGeneral.VISNID ALS „12““
	
		Als Request.querystring („soort“) = "" toen
 			sql = sql & „ORDE DOOR Stad“
 		Anders
  			sql = sql & „ORDE DOOR“ & Request.querystring („soort“)
  		Eind als			
	
	Reeks objRS = Server.CreateObject („ADODB.Recordset“)
	objRS.Open sql, objConn


'Eerst, toon de kopbalinfo van de LIJST:
Response.Write „“

'De lijstrubrieken van de vertoning voor elke kolom in Recordset

Response.Write „“
Response.Write „“
Response.Write „“
Response.Write „“

Terwijl niet objRS.EOF

	Response.Write „“ & VbCrLf
	Response.Write „“ & VbCrLf
	Response.Write „“ & VbCrLf

   'Vooruitgang recordset
   objRS.MoveNext

Wend
objRS.Close
Reeks objRS = niets

Response.Write „
  SpacePERC
“ & objRS („Stad“) & „  “ & objRS („SpaceAll“) & „  “ & objRS („SpacePERC“) & „  
“ & vbCrLf

%>

Antwoord : De gegevens van de vertoning van MSAccess aan lijst

Geef dit een poging
„ rowAll = „„ rowPerc = „„ Terwijl niet objRS.EOF rowHeader = rowHeader & „„& VbCrLf rowAll = rowAll & „„& VbCrLf rowPerc = rowPerc & „„& VbCrLf 'Vooruitgang recordset objRS.MoveNext Wend objRS.Close Reeks objRS = niets rowHeader = rowHeader & „„& VbCrLf rowAll = rowAll & „„& VbCrLf rowPerc = rowPerc &“„& VbCrLf Response.Write rowHeader Response.Write rowAll Response.Write rowPerc Response.Write“
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:

<>„

'De lijstrubrieken van de vertoning voor elke kolom in Recordset

Schemerige rowHeader, rowAll, rowPerc

rowHeader = „
 
Ruimte
PERC„& objRS („Stad“) &“ „& objRS („SpaceAll“) &“ „& objRS („SpacePERC“) &“ 
„& vbCrLf %>
Andere oplossingen  
 
programming4us programming4us