asp，Set conn = Server.CreateObject("ADODB.Connection")，conn.Open "your_connection_string"，Set rs = conn.Execute("SELECT * FROM your_table")，Do While Not rs.EOF， Response.Write(rs("column_name") & "")， rs.MoveNext，Loop，rs.Close，conn.Close，Set rs = Nothing，Set conn = Nothing，``