<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Mesg="" If request.ServerVariables("CONTENT_LENGTH")<>0 Then strName=DBFX(request("txtName")) strEmail=DBFX(request("txtEmail")) strSub=DBFX(request("txtSub")) strMessage=DBFX(request("taMessage")) strSQL="INSERT INTO tb_Contact (vcName,vcEmail,vcSubject,vcMessage) VALUES('" & strName & "','" & strEmail & "','" & strSub & "','" & strMessage & "')" Conn.Execute(strSQL) Mesg="Youor Message is stored in our database Successfully. We will contact you soon!" End IF %>

Contact Us Please Fill The Following Informations To Send A Message <%= Mesg%>    Name : Email : Subject : Message :