Thanks for the reply... This is still giving a 500

<%

var to = Server.CreateObject("ADODB.Recordset");

to.ActiveConnection = MM_s4r_STRING;

to.Source = "SELECT newdate, news FROM dbo.news";

to.CursorType = 0;

to.CursorLocation = 2;

to.LockType = 1;

to.Open();

var to_numRows = 0;

%>

<%

Response.Write "&news=" & Server.URLEncode(to.Fields.Item("news").Value)

Response.Write "&newdate=" & Server.URLEncode(to.Fields.Item("newdate").Value)

%>

<%

to.Close();

%>

No visual error but server logs state - 800a03ec|Expected_';'