asked on
blankStartDate = "01/01/1940"
blankEndDate = "06/06/2010"
set rs = server.createObject("Adodb.recordset")
MyConn.Execute = "INSERT INTO tblNewsItems (NewItem_Title, NewsItem_LangID, NewsItem_Creator, NewsItem_DateCoLM, NewsItem_StartDate, NewsItem_EndDate, NewItem_METAAuthor, SubSite_ID) VALUES ('" & CleanMe(strNewText) & "', " & Session("Admin_SiteLang") & ", '" & Session("Admin_Name") & "', '" & now() & "', '" & blankStartDate & "', '" & blankEndDate & "', " & NumDefaultAuthor & ", " & Session("Subsite_ID") & " );"