<% str="Provider=SQLOLEDB.1;Data Source=localhost;Initial catalog=ieasy_db;User Id=ieasy;Password=0101;" Set db = Server.CreateObject("ADODB.Connection") db.Open str sql="select * from ad2000mailnew2 " set rs=server.CreateObject("adodb.recordset") rs.Open sql,db,1 %> <%do until rs.EOF%> > <%rs.Movenext loop%> ¼ö½Å°ÅºÎ