<% str_ConnectionString = "Provider=SQLOLEDB;Data Source=122.155.3.151;Initial Catalog=db_name;User Id=db_user;Password=db_password;" Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open str_ConnectionString Response.write("Connected Successfully") %>