addform.asp

留言 留言本采用asp+access数据结构

<%face="face/"%>
<div id="submit">
      <form action="post.asp?action=add" method="post" name="form" id="form" onSubmit="return FrontPage_Form1_Validator(this)">
        <p><img src="images/i1.gif" /><img src="images/add.gif" /><br />
		<% if system("face")=1 then %>
        <div class="submitright"><script>
        function showimage(){document.images.showimages.src="<%=face%>"+document.form.face.options[document.form.face.selectedIndex].value+".gif";}
        </script>
        <div class="faceselect"><select name="face" size="1" onChange="showimage()">
        <%for i=1 to 51
        g=""
        g=i
        %>
        <option value='<%=g%>'>头像<%=g%></option>
        <% next %> 
        </select></div>
        <div class="faceimg"><img src="<%=face%>9.gif" name="showimages" id="showimages" height="60" width="60"  /></div>
        </div>
        <%end if%>
        <br />
        </p>
        <div class="submitleft">
        <label for="user">昵称：</label>
        <input type="text" id="user" name="user" value="" />
        <span class="STYLE2">*</span><br />
         <% if system("email")=1 then %>
        <label for="qq">Email：</label>
        <input type="text" id="email" name="email" value="" />
        <span class="STYLE2">*</span> 请填写您的email.方便我们与您联系.<br />
        <%end if%>
        <% if system("qq")=1 then %>
        <label for="qq">联系QQ：</label>
        <input type="text" id="qq" name="qq" value="" />
        <span class="STYLE2">*</span> 请填写您的QQ.方便我们与您联系.<br />
        <%end if%>
        <% if system("web")=1 then %>
        <label for="web">个人网站：</label>
        <input type="text" id="web" name="web" value="" />
        <span class="STYLE2">*</span> 请填写您的个人网站，没有可不填<br />
        <%end if%>
        <label for="content">内容：</label>
         <textarea rows="5" cols="80" name="content" ></textarea>   
         <span class="STYLE2">*</span><br />    
          <label for="comment">　</label>
        <span>提交前请按Ctrl+C保存留言内容，以免程序出错而丢失！最大允许<font color="#FF0000"><%=system("words")%></font> 字        </span><br />
         <% if system("toadmin")=1 then %>
        <label for="toadmin">悄悄话：</label>
        <input name="toadmin" type="checkbox" id="toadmin" value="1" />
        <span>当选中时，此留言只有管理员可见</span><br />
        <%end if%>
        <% if system("code")=1 then %>
        <label for="code">验证码：</label>
        <input name="code" type="text" id="code" size="10" />
        *  <img src="include/code.asp" title="验证码,看不清楚?请点击刷新验证码" style="cursor:pointer" onClick="this.src='include/code.asp?'+Math.random()" /><br />
        <%end if%>
        <input type="submit" id="sbutton" value="确  定" />
        <br />
        <input name="ac" type="hidden" id="ac" value="add" />
        </div>
      </form>
    </div>