01. april 2005 - 10:59Der er
17 kommentarer og 1 løsning
while loop i asp
Hej jeg henter kolonne navne fra en tabel, og ved hjælp fra det indhold i disse kolonner, men jeg har problemer med at få dem placeret under hinanden.... lige nu ser tabellen heltt forkert ud, nogend er kan hjælpe???
While Not rs.EOF columnName = rs("Column_Name") Response.Write("<td>" & columnName & "</td>") While Not rsSQL.EOF Response.Write("<tr><td>" & rsSQL(columnName) & "</td></tr>") rsSQL.MoveNext Wend rs.MoveNext Wend
er det det her du vil: ---------------------------------- columnName| columnName| columnName| ----------------------------------- rsSQL | rsSQL | rsSQL | rsSQL | rsSQL | rsSQL | osv?
for som koden er nu så løber du første gang rsSQL til EOF... i næste yderloop så tror jeg enten ikke der vil ske noget eller også løber den igennem og finder ingenting fordi der ikke er eksekveret en ny sql rsSQL skal vel genereres/executes som ny efter hvert inderloop?
ok men så er det klart for i din inderste løkke løber den hele rsSQL igennem så næste gang er der ikke mere Men hvordan skal den ende op med at se ud? Skal der stå de samme rsSQL i hver kollonne? for så kan du gøre sådan her: While Not rs.EOF response.write ("<td><table border='1' cellspacing='2' cellpadding='1' >") columnName = rs("Column_Name") Response.Write("<td>" & columnName & "</td>") While Not rsSQL.EOF Response.Write("<tr><td>" & rsSQL(columnName) & "</td></tr>") rsSQL.MoveNext Wend rsSQL.MoveFirst rs.MoveNext response.write ("</table></td>") Wend
jeg må indrømme jeg har lidt svært ved at lure dine øverste linjer: --------------------------- Set rsSQL = Server.CreateObject("ADODB.Connection") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DSN=DatabaseName" Set rs = conn.OpenSchema(adSchemaColumns, Array(empty, empty, "Kunde"))
sql = "SELECT * FROM Kunde WHERE (Kunde = 'Test kunde')" Set rsSQL = conn.Execute(sql) ---------------------
ok men så vil jeg også mene at denne linje ikke giver mening og kan slettes Set rsSQL = Server.CreateObject("ADODB.Connection") Fordi du sætter den igen til Set rsSQL = conn.Execute(sql)
I din sql vælger du jo kun hvor kunde er lig test kunde så du får vel også kun eet resultat...eller?
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.