<% strText=Request.Form("text") Dim rs sql = "SELECT pageContents FROM content where id=1" 'sql = "UPDATE content SET pageContents = '" & strText & "' WHERE id=1" 'response.Write(sql) Set rs = Server.CreateObject("ADODB.Recordset") 'conn.Execute sql rs.Open sql, conn, 3, 3 'on error resume next response.Write(sql) response.Write(rs("pageContents")) rs("pageContents") = strText rs.Update rs.close ' Close database connection Set rs = nothing 'obj variable released response.Redirect("../fromMyStudy/fromMyStudy.asp") %>