<% Set objdate = server.CreateObject ("Convert.format") %>