<!--#include file="config.asp" -->

<%


if request("mode")="chat" then
Set rsAdd = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM tblShoutbox;"
rsAdd.CursorType = 2
rsAdd.LockType = 3
rsAdd.Open strSQL, strConnString

rsAdd.AddNew

rsAdd.Fields("userName")  = Request("from")
rsAdd.Fields("toName")  = Request("toid")

rsAdd.Fields("Msg")  = Request("txtMessage")
rsAdd.Fields("timeofpost")  = now()

rsAdd.Update
rsAdd.Requery

rsAdd.close
Set rsAdd = Nothing
End If
%>
<html>
<head>
<title></title>
<style type="text/css">
<!--
.style1 {
	color: #859559;
	font-size: 11px;
	font-family: Verdana, Arial, Helvetica, sans-serif;
}
-->
</style>
</head>
<style>
.txtbox	{	font-family:verdana; font-size: 13px; height: 18px; width: 230px; border: 1px #838383 solid; background-color:#FFFFFF;	}

.button
	{
	color : #FFFFFF;
	font-family:verdana;
	font-size:11px;
	height: 18px;
	border: 1px #FFFFFF solid;
	background-color:#CD2530;
	cursor:hand;
	font-weight:bold;
	text-align: center;
	vertical-align: top;
	}
</style>

	<body     bgcolor="#e3e8d2" onLoad="document.frmNatterChatPM.txtMessage.focus()" topmargin="3">
		
			<form action="pm_script.asp?mode=chat" method="post" name="frmNatterChatPM">
			 <input type="hidden" name="from" value="<%=Request("from")%>" />
					<input type="hidden" name="toid" value="<%=Request("toid") %>" / >
			  <span class="style1"><%=application("lang_pmscript_1")%></span>
			  <input type="text" name="txtMessage" class="txtbox" maxlength="250">
			  <input type="submit" value="Send" name="submit" class="button" style="cursor:hand;" />
				  <input type="submit" value="Close" name="submit" class="button" style="cursor:hand;"  onClick="parent.close()" /> 
				 

				 
	 </form>		

</body>
</html>