[悬赏50贡献]客户留言无法使用－搜虎VIP极品60多个企业网站

本人前几天购买了全套，但编号为0035红色汽车配件公司网站修正版源码　客户留言无法使用，填写完留言提交后，提示ＸＸ没有填写，其实已经填写了，50贡献请高手解决！！
以下为相关的三个文件

下载地址

文件名: 0035相关文件.rar

网盘失效？举报有奖

立即下载

免费

您已购买

点贡献值

下载权限: 不限 

自助开通VIP会员

点击充值贡献值，即时到帐

免费获取贡献值

完整文件请PM我。

国际顶帖法第一款第一条第一小条第一小项：自己发的帖子必须自己先顶起！！！

我已经在另外一个贴子中回复你了，请查询

给这几个文件谁知道咋弄啊
最好提供全套这样测试也能很快知道是哪个文件出错的！

问题已经帮你解决了，解决方案如下：
找到　FeedbackSave.asp　文件，把文件替换为：

<!--#include file="Inc/Conn.asp"-->
<!--#include file="Inc/articleCHAR.INC"-->
<%
If request.form("CompanyName2")="" Then
Response.Write("<script language=""JavaScript"">alert(""错误：您没输入公司名称，请返回检查！！"");history.go(-1);</script>")
response.end
end if
If request.form("Receiver2")="" Then
Response.Write("<script language=""JavaScript"">alert(""错误：您没输入联系人，请返回检查！！"");history.go(-1);</script>")
response.end
end if
If request.form("Phone2")="" Then
Response.Write("<script language=""JavaScript"">alert(""错误：您没输入联系电话，请返回检查！！"");history.go(-1);</script>")
response.end
end if
If request.form("title2")="" Then
Response.Write("<script language=""JavaScript"">alert(""错误：您没输入标题，请返回检查！！"");history.go(-1);</script>")
response.end
end if
If request.form("textarea")="" Then
Response.Write("<script language=""JavaScript"">alert(""错误：您没输入留言内容，请返回检查！！"");history.go(-1);</script>")
response.end
end if
Add=trim(request.form("Add"))
Postcode=trim(request.form("Postcode"))
Mobile=trim(request.form("Mobile"))
Fax=trim(request.form("Fax"))
email=trim(request.form("email"))
Language=trim(request.QueryString("Language"))

if Add="" then
        Add=null
end if
if Postcode="" then
        Postcode=null
end if
if Mobile="" then
        Mobile=null
end if
if Fax="" then
        Fax=null
end if
if Email="" then
        Email=null
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Feedback"
rs.open sql,conn,1,3

rs.addnew
if session("username")="" then
  rs("Username")="未注册用户"
else
  rs("Username")=trim(request.form("Username"))
end if
rs("CompanyName")=trim(request.form("CompanyName"))
rs("Add")=Add
rs("Postcode")=Postcode
rs("Receiver")=trim(request.form("Receiver"))
rs("Phone")=trim(request.form("Phone"))
rs("Mobile")=Mobile
rs("Fax")=Fax
rs("email")=email
rs("title")=trim(request.form("title"))
rs("content")=htmlencode2(request.form("content"))
rs("Publish")=trim(request.form("Publish"))
if Language="ch" then
rs("Language")="0"
else
rs("Language")="1"
end if
rs("time")=date()
rs.update
rs.close

if Language="ch" then
response.redirect "FeedbackView.asp"
else
response.redirect "EnFeedbackView.asp"
end if

%>




你的贡献值就自己留着吧，我用不着，呵呵。

好 要顶 这个

很不错的东东呀，放了

瞧了 还好，问题需要进一步更新

搜虎不错呀

楼上说的有道理但不给力啊！！！
















我们主要专业从事加密狗软件复制、加密狗硬模拟及加密狗硬复制等相关业务，技术QQ1601500861。
1. 读取原狗数据及加密狗硬件信息
2. *****新加密狗，把原狗的硬件信息及数据写到新的加密狗里
3. 还原正版加密锁内的算法信息(难度最高)