<% strConnString = "driver={SQL Server};server=sql7.globalgold.co.uk;uid=betterthinking;pwd=master-point;database=betterthinking" set my_Conn = Server.CreateObject("ADODB.Connection") my_Conn.Open strConnString id_forum_posts = request("id_forum_posts") strSql = "update forum_posts set binary_display = 1, varchar_subject = '"& Replace(request("varchar_subject"), "'", "''")&"', varchar_post = '"&Replace(request("varchar_post"), "'", "''")&"' where idforumposts =" & request("id_forum_posts") set rs = my_Conn.Execute (strSql) response.redirect("manage_forum.asp?id_forum_topics=" & request("id_forum_topics")) %>