信息反馈

<%@ Language=VBScript %> <% Dim todo, about, refer, subject, email, fdtype, content, saveok, errmsg todo = Request.Form("todo") If todo <> "" Then subject = Request.Form("subject") fdtype = Request.Form("type") about = Request.Form("about") email = Request.Form("email") content = Request.Form("content") refer = Request.Form("refer") If IsNull(refer) Or Trim(refer) = "" Then refer = "norefer" End If saveok = SendFeedback(subject, fdtype, about, email, content, refer) Else about = Request.QueryString("about") refer = Request.QueryString("refer") If IsNull(about) Or about = "" Then about = "这个网站" End If %> 信息反馈 - Regular Expression Laboratory Feedback

首页

入门

引擎

工具

应用

有任何意见、建议、问题、bug 等，可通过本页进行反馈。

<% If todo <> "" Then If saveok Then %>

反馈信息保存成功。

继续访问其他栏目：www.regexlab.com。

<% Else %>

反馈信息保存失败！

你可以返回到前一页面稍后重试，或者直接写邮件给站长 regexlab@gmail.com。

<% End If Else %>

标题：	*
类型：
关于：
邮箱：	* （请留下您的邮箱地址，以便给您回复）
内容：
参考：

<% End If %>