<% dim My_Conn Set my_conn = Server.CreateObject ("ADODB.Connection") my_conn.ConnectionTimeout = 360 my_conn.CommandTimeout = 30 my_conn.Open session("strConnect") %>