%
Producttitle=request("producttitle")
If Request( "Submit" )<>"" Then
date1=date
set rs=server.createobject("adodb.recordset")
SQL="select * from message where ID is Null"
rs.open SQL,conn,1,3
rs.Addnew
rs("title")=Trim( Request("title") )
rs("msg")=Trim( Request("content") )
rs("email")=Trim( Request("email") )
rs("tel")=Trim( Request("tel") )
rs("address")=Trim( Request("address") )
rs("msg_date")=date1
rs("answer")="NoRe"
rs.Update
rs.close
Response.Redirect ("message.asp")
end if
%>
china wholesalers,china wholesale,china wholesaler