Quite simple i assume you have a UserName Login system:
here is an idea of what you need to do
strsql = "INSERT INTO " & strTablePrefix & "TOPICS (CAT_ID,FORUM_ID,T_STATUS,T_MAIL,T_SUBJECT,T_MESSAGE,T_AUTHOR,T_REPLIES,T_VIEW_COUNT,T_LAST_POST,T_DATE,T_LAST_POSTER,T_IP,T_LAST_POST_AUTHOR,T_LAST_POST_REPLY_ID,T_ARCHIVE_FLAG,T_STICKY,T_SIG) VALUES (" & _
"'1<< Category ID'," & _
"'1<< Form ID'," & _
"'1<< Sticky or not'," & _
"'0<< mail or not'," & _
"'" & Request.Form("subject") & "'," & _
"'" & Request.Form("message") & "'," & _
"'1<<MEMBER_ID of Person'," & _
"'0'," & _
"'0'," & _
"'0'," & _
"'20050303184111'" & _
"'20050303184111'" & _
"'1<<MEMBER_ID of Person'," & _
"'" & Request.ServerVariables("remote_addr") & "'," & _
"'1'," & _
"'0'," & _
"'0'," & _
"'0'," & _
"'0')"
my_conn.execute(strsql)
If you are NOT in the same database as Snitz is you will need to create another connection string in that page and call it something other than anything already used like my_conn11
make sure you take out my little comments marked by << in the statement