ASP & MS ACCESS "Two Tables [one Article And One Comment]

Hi please i have a problem withthis and i need some help,
i received some great help so far thank you So much Markoc.
and now i'm stucj here.


I have two tables :
one called reviews [rid, review]
and the comments [cid, rid, review]

the first two pages work fine, but whenever i click on submit on the second page it take me to the
third one which cannot be displayed.
here is the code on the pages, please if you can help.
------------------------------------------------
on the first page i have " reviews listing "
-------------------------------------------------

<%
Dim oConn, sConnection
Set oConn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=xx" & _
"Persist Security Info=False"
oConn.Open(sConnection)
set rsUsers = Server.CreateObject("ADODB.Recordset")
rsUsers.Open "select * from reviews" , oConn
%>

<center><table >

<%
Do while NOT rsUsers.EOF
getrid = rsUsers("rid")
getreview = rsUsers("review")

Response.Write "<tr><a href='viewreview.asp?rid=" & getrid & "'>" & getrid & "</a></td></tr>"
Response.Write "<tr><td colspan='5' width='541' height='25' ><font face='Trebuchet MS'>" & getreview & "</font></td></tr>"

rsUsers.MoveNext
Loop
rsUsers.Close
set rsUsers = Nothing
%>

--------------------------------------------------------------------------------------------------------------------------
the second page is viewreview.asp AND ALSO I HAD A TEXT BOX FOR THE USERS TO LEAVE COMMENTS
--------------------------------------------------------------------------------------------------------------------------

<%
Dim oConn, sConnection
Set oConn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=xx" & _
"Persist Security Info=False"
oConn.Open(sConnection)

getrid = Request.QueryString("rid")

strSQL = "SELECT * FROM reviews WHERE rid=" & getrid

Dim rsUsers
set rsUsers = Server.CreateObject("ADODB.Recordset")
rsUsers.Open strSQL , oConn
getrid = rsUsers("rid")
getreview = rsUsers("review")
rsUsers.Close
set rsUsers = Nothing
%>

<center><table cellpadding="2" cellspacing="2" border="0" width="541" >

<tr><td>"<%= getrid %>"</td></tr>
<tr><td>"<%= getreview %>"</td></tr>


</table><table>


<TR>
<TD vAlign=top bgColor=#d6d6d6 colSpan=6>
<form name="comments" action="submitcom.asp?rid=<%=getrid%>" method="POST">
<textarea name="comment" rows="5" cols="50"></textarea>
<br><br>
<input type="submit" value="Submit">&nbsp;
<input type="reset" value="Reset">
</form>
-------------------------------------------------------------------------------------------
THE LAST PAGE IS submitcom.asp
-------------------------------------------------------------------------------------------

<%
Dim oConn, sConnection
Set oConn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\xx"& _
"Persist Security Info=False"
oConn.Open(sConnection)


Dim rsUsers
StrSql = "insert into comments" _
& " (rid, comment)" _
& " VALUES (" _
& "'" & Request("getrid") & "'," _
& "'" & request("comment") & "')"
'DEBUG SCRIPT
'Response.Write StrSql & "<br>"
'response.End
oConn.excute StrSql
set rsUser = nothing
set oConn = nothing
%>


-------------------------------------------------------------------------------------------------