<% 'On Error Resume Next Set db = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") db.Open Application("alakazoo_ConnectionString"), Application("alakazoo_RuntimeUserName"), Application("alakazoo_RuntimePassword") If Err Then 'Response.Write "Database Connection Error" Else SQL = "exec dbaMaintenance" db.Execute SQL End If db.Close Set rs = Nothing Set db = Nothing %>