<% dim cnn Set cnn = Server.CreateObject("ADODB.Connection") cnn.Open(Application("ConnectionString")) AssembleFormatToFile Request.QueryString("object_format_id"), True Response.Write(Request.QueryString("object_format_id")) cnn.Close Set cnn = Nothing %>