Create Table [DBO]. [TEST] ([ID] [INT] Identity (1, 1) Not Null, [STR_NOTE] [NVARCHAR] (50) Collate Chinese_PRC_CI_AS NULL, [Father_ID] [INT] NULL) ON [PRIMARY] GO -> <% DIM STRCONN, CONN, RS, SQLSTRCONN = "driver = {SQL Server}; server = localhost; database = wawavote; uid = SA; PWD = SA; "DIM II = 0Function showtree (PARENTID) i = i 1 DIM RS SET RS = Server.createObject (" AdoDb.Recordset ") SQL =" SELECT ID, STR_NOTE, FATHER_ID, (Select Str_Note from Test T2 WHERE T2.ID = T1.FATHER_ID) AS PARENTNAME AUD = "& CINT (PARENTID) RS.Open SQL, STRCONN, 1, 1 DO While Not rs.eof for j = 1 To i response. Write ("---") Next Response.write (RS (1) & "[& RS (3) &"]
") SHO Wtree RS (0) i = i-1 rs.movenext loop rs.close: set = Nothing end functionssion showTable (Table) DIM RS set = server.createObject ("adodb.recordset") SQL = "SELECT * FROM" & Trim (Table) RS.Open SQL, STRCONN, 1, 1 for i = 0 to rs.fields.count-1 Response.write ("[" & rs.fields (i) .name & "]") Next Response.write "
") do while not rs.eof for i = 0 to rs.fields.count-1 response.write ("[[" & rs.fields (i) .value & "]") Next Response.write ("< BR> ") rs.movenext loop rs.close: set =
