<% Dim author, id, message author = Request.Form("txtName") id = Request.QueryString("id") message = Request.Form("txtaMessage") '''''''''''''''''''''''''''''''''''''''''''' 'puts name and title into the table ' '''''''''''''''''''''''''''''''''''''''''''' 'make db connection connect() 'insert record addReply() 'disconnect to db Disconnect() 'Redirct to the display asp Response.Redirect("theTopic.asp?id=" & id) %>