不通过dsn访问sql server 在连接字符串里加上服务器和数据库驱动程序就可以了 例子 : dim conn set conn = Server.CreateObject("ADODB.Connection") conn.ConnectionString = "driver={SQL Server};"server=yourserver;uid=sa;pwd=pwd;database=pubs" conn.open Set cmd= Server.CreateObject("ADODB.Command") Set cmd.ActiveConnection = conn