<%@LANGUAGE="VBSCRIPT"%> <% Response.Buffer = True Dim iMonth, iYear iMonth=Request ("month") iYear=Request ("year") if iMonth = "" then iMonth = Month(Now) sMonth=NameFromMonth(iMonth) if iYear = "" then iYear = Year(Now) Dim blog_id Dim rsblog Dim blog_autore Dim email Dim blog_titolo Dim blog_testo Dim blnComments Dim data Dim ora Dim giorno Dim mese Dim anno Dim strMode strMode = "new" %> <% = Ublogname %>
<% = strLangSelectNewBlog %>     <% = Date() %>  
 
 
<% if Ublogtype = "open" then %> <% elseif Session("admin") = False or IsNull(Session("admin")) = True then Response.Redirect"login.asp?strMode=" & strMode & "" else %> <% end if %>
   
<% Set adoCon = Nothing Set strCon = Nothing %>