Frage : Anzeigendaten verzulegen vom MSAccess

Ich benutze
- MSAccess
- Microsoft SQL-Server 2000 - 8.00.760 (Intel X86)
- das Frontpage 2002

I morgens versuchend, Daten von einem MSAccess DB anzuzeigen. Ich wünsche die Asp-Seite Daten von der Tabelle für die Überschrift ziehen. Es gibt nie mehr als 15 Überschriften in der 1. Reihe. Für die erste Spalte möchte ich die Reihenaufkleber spezifizieren. Ich habe sie zu arbeiten, um die Daten, wenn ich die Spaltenüberschriften spezifiziere, aber nicht das Entgegengesetzte anzuzeigen.

Currently meine Codeanzeigen wie:

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


I wünschen die Anzeige sein:

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

Code attached. 
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:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:

<%
'Recordset verursachen
 Sql, objRS verdunkeln

 sql = „AUSERWÄHLTES tblGeneral.ChartID, tblGeneral.City, tblGeneral.State,“ u. _
 	„tblSpace.SpaceAll, tblSpace.SpacePERC“ u. _
	„VON tblGeneral INNEREM tblSpace AUF tblGeneral.ChartID= tblSpace.ChartID“ u. _ sich ANSCHLIESSEN
	„WO tblGeneral.VISNID MÖGEN „12““
	
		Wenn Request.querystring („Art“) = "" dann
 			sql = sql u. „AUFTRAG DURCH City“
 		Sonst
  			sql = sql u. „AUFTRAG DURCH“ u. Request.querystring („Art“)
  		Beenden wenn			
	
	objRS = Server.CreateObject („ADODB.Recordset“) einstellen
	objRS.Open sql, objConn


'Zuerst, das TABELLEN-Überschriftinfo anzeigen:
Response.Write „“

'AnzeigenTabellenköpfe für jede Spalte im Recordset

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

Während nicht objRS.EOF

	Response.Write „“ u. VbCrLf
	Response.Write „“ u. VbCrLf
	Response.Write „“ u. VbCrLf

   'Das recordset voranbringen
   objRS.MoveNext

Wend
objRS.Close
objRS einstellen = nichts

Response.Write „
  SpacePERC
 („Stadt“) u. „   („SpaceAll“) u. „   („SpacePERC“) u. „  
“ u. vbCrLf

%>

Antwort : Anzeigendaten verzulegen vom MSAccess

Diesem einen Versuch geben
„ rowAll = „„ rowPerc = „„ Während nicht objRS.EOF rowHeader = rowHeader u. „„U. VbCrLf rowAll = rowAll u. „„U. VbCrLf rowPerc = rowPerc u. „„U. VbCrLf 'Das recordset voranbringen objRS.MoveNext Wend objRS.Close objRS einstellen = nichts rowHeader = rowHeader u. „„U. VbCrLf rowAll = rowAll u. „„U. VbCrLf rowPerc = rowPerc u.“„U. 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:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:

<>„

'Tabellenköpfe für jede Spalte im Recordset anzeigen

rowHeader, rowAll, rowPerc verdunkeln

rowHeader = „
 
Raum
PERC„u. objRS („Stadt“) u.“ „u. objRS („SpaceAll“) u.“ „u. objRS („SpacePERC“) u.“ 
„u. vbCrLf %>
Weitere Lösungen  
 
programming4us programming4us