<%
'这是连接
set cn=server.CreateObject("adodb.connection")
cn.ConnectionTimeout = Application("DataConn_ConnectionTimeout")
cn.CommandTimeout = Application("DataConn_CommandTimeout")
cn.CursorLocation=3
cn.Open Application("DataConn_ConnectionString"),Application("DataConn_RuntimeUserName"),Application("DataConn_RuntimePassword")
%>
修改的用sql语句,你自己看书吧