标题:帮忙解决发布信息问题
只看楼主
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
 问题点数:0 回复次数:9 
帮忙解决发布信息问题
就是再添加页添加完成时,提交后仍返回当前页,而且显示页没有显示刚添加完的信息。怎么回事啊?form 表单提交给postexpo.jsp?action=add 方法是post
搜索更多相关主题的帖子: action 信息 而且 
2008-08-13 11:10
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
得分:0 
我是新手,刚进来,希望大家多多指教。我对asp懂得不是特深
2008-08-13 11:12
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
代码是怎么写的?
2008-08-13 11:13
jiazhoutong
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-8-13
得分:0 
帮帮我
谁能告诉我,网上文件签收程序,万分感谢
2008-08-13 11:20
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
得分:0 
<%
response.write"<br>"
if request("action") ="add" then
call post()
end if
response.write"<br>"
%>
 
处理过程
<%
sub post()
if Replace_Text(request.form("title"))="" then
response.write "<li>没有填写展会名称</li>"
founderr=true
end if

if Replace_Text(request.form("title"))>"" then
title=Replace_Text(request.form("title"))
sql="select id from expo where title='"&title&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if not (rs.Bof and rs.eof) then
response.write"<li>此展会名称已经存在,请重新设置</li>"
founderr=true
end if
end if


if Replace_Text(request.form("holdCountry"))="" then
response.write "<li>没有填写举办国家</li>"
founderr=true
end if

if Replace_Text(request.form("beginDate"))="" then
response.write "<li>没有填写参展开始日期</li>"
founderr=true
end if

if Replace_Text(request.form("endDate"))="" then
response.write "<li>没有填写参展结束日期</li>"
founderr=true
end if

if Replace_Text(request.form("expireDate"))="" then
response.write "<li>没有填写报名截止日期</li>"
founderr=true
end if

if Replace_Text(request.form("place"))="" then
response.write "<li>参展地(展馆)</li>"
founderr=true
end if

if Replace_Text(request.form("frontFor"))="" then
response.write "<li>没有填写主办单位</li>"
founderr=true
end if

if Replace_Text(request.form("brief"))="" then
response.write "<li>没有填写展会简介</li>"
founderr=true
end if

if Replace_Text(request.form("product"))="" then
response.write "<li>没有填写参展范围</li>"
founderr=true
end if

if Replace_Text(request.form("linkman"))="" then
response.write "<li>没有填写联系人</li>"
founderr=true
end if

if Replace_Text(request.form("country1"))="中国" then
if Replace_Text(request.form("province"))=""  or Replace_Text(request.form("city"))="" then
response.write "<li>国家如果选择了中国,必须选择地级市和市、县</li>"
founderr=true
end if
end if

if Replace_Text(request.form("address"))="" then
response.write "<li>没有填写联系地址</li>"
founderr=true
end if

if Replace_Text(request.form("phone"))="" then
response.write "<li>没有填写固定电话</li>"
founderr=true
end if

if founderr=false then
'开始存储数据
title=Replace_Text(request.form("title"))

sql="select * from expo where title='"&title&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if not (rs.Bof and rs.eof) then
response.write"<li>此展会名称已经存在,请重新设置</li>"
else
rs.addnew
rs("brief")=Replace_Text(request.form("brief"))
rs("city")=Replace_Text(request.form("city"))
rs("aidance")=Replace_Text(request.form("aidance"))
rs("province")=Replace_Text(request.form("province"))
rs("title")=Replace_Text(request.form("title"))
rs("company")=Replace_Text(request.form("company"))
rs("address")=Replace_Text(request.form("address"))
rs("beginDate")=Replace_Text(request.form("beginDate"))
rs("endDate")=Replace_Text(request.form("endDate"))
rs("activity")=Replace_Text(request.form("activity"))
rs("fax")=Replace_Text(request.form("fax"))
rs("mobile")=Replace_Text(request.form("mobile"))
rs("holdCountry")=Replace_Text(request.form("holdCountry"))
rs("undertake")=Replace_Text(request.form("undertake"))
rs("zip")=Replace_Text(request.form("zip"))
rs("expireDate")=Replace_Text(request.form("expireDate"))
rs("place")=Replace_Text(request.form("place"))
rs("linkman")=Replace_Text(request.form("linkman"))
rs("phone")=Replace_Text(request.form("phone"))
rs("homepage")=Replace_Text(request.form("homepage"))
rs("authorize")=Replace_Text(request.form("authorize"))
rs("charge")=Replace_Text(request.form("charge"))
rs("email")=Replace_Text(request.form("email"))
rs("frontFor")=Replace_Text(request.form("frontFor"))
rs("product")=Replace_Text(request.form("product"))
rs("country1")=Replace_Text(request.form("country1"))
rs("sh")=Replace_Text(request.form("sh"))
if Replace_Text(request.form("pic_on"))=1 then
rs("picture")=Replace_Text(request.form("picture"))
end if
rs("dateandtime")=now()
rs.update
response.redirect ("expo.jsp?pass=1")
end if
end if
end sub
%>
2008-08-13 11:20
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
得分:0 
之前用都是可以的 最近添加就不可以了 希望ysm123版主帮我看看 十分感谢
2008-08-13 11:24
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
得分:0 
对了 调用的conn 呈灰色显示 和它有关吗?
2008-08-13 11:28
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
用的是什么数据库?
2008-08-13 14:35
hikor
Rank: 1
等 级:新手上路
帖 子:111
专家分:0
注 册:2008-8-2
得分:0 
你是怎么让你的数据显示的 代码怎么写的 可能就是那出了问题
2008-08-13 15:16
l520jia
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2008-8-12
得分:0 
是sql server 2000数据库 企业版的,不好意思,由于刚开始这样的工作有点忙。刚才着急就没在
2008-08-13 15:24



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-228051-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.591793 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved