<SCRIPT LANGUAGE="VBSCRIPT" RUNAT="SERVER"> Sub Application_onStart Application("ConnectDataSourceString")="DSN=sjy;UID=sa;PWD=;" Sub Application_onEnd End sub </Script> 在ASP页面上调用 <% Dim conn,strconn Set conn= Server.CreateObjec(“ADODB.Connection”) Conn.open Application("ConnectDataSourceString") %> 如果楼主是说插入语句的话,就像这样 <% set rs=Server.CreateObject("ADODB.Recordset") rs.Open "select * from table",conn,1,2 rs.AddNew rs("字段名")=Request("传来的值") rs.Update %>