<% dim conn Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Driver={SQL Server};" & _ " Server=SQL;" & _ " WSID=MAINFRAME;" & _ " Language=us_english;" & _ " Database=SanfordHousing;" & _ " dsn=;uid=wsadmin;pwd=treefrog" %>