<!--#include file="commsql.inc"--> <% Set rs=Server.CreateObject("Adodb.Recordset") re.open"select newstitle from news" do while not rs.eof response.write rs("newstitle") rs.movenext loop rs.close set rs=nothing %> <td><img src="reguest1.gif" /><a href=""><%=newstitle%></a></td>
commsql.inc--页面 <% datanet = "DSN=tmpDS;uid=sa;pwd=198613;database=News" set conn=server.createobject("adodb.connection") Conn.Open datanet