connstr = "DRIVER=SQL Server; SERVER=tcp:127.0.0.1,1633; UID=sa; password=12345;DATABASE=webexam;" set conn = Server.CreateObject("ADODB.Connection") conn.open connstr