写好的ASP程序放到域名空间上不能存数据,但能读

dino2000 2005-09-22 07:01:50

最近小弟来到新公司,做一个网站,基本上是做好了,可是到最近出了点麻烦.
本身这个网站开发的时候就是放在公司内部的服务器上,运行没事(主要是几个表单的问题能够正常的读写,写指的用户提交的内容,读指的是在后台有专门看提交内容的地方).但是放到域名上,就只能读(后台)不能写(用户提交).提交的时候也没有出任何的错误,验证也通过了,并且提示表单提交成功.可是后台来看就是没有.5555555555555555555555555555555

...全文

127 20 打赏收藏转发到动态举报

写回复

用AI写文章

20 条回复

切换为时间正序

请发表友善的回复…

发表回复

jingxiaoping 2005-09-26

打赏
举报

通知服务商，要求调换主机进行测试。

dino2000 2005-09-25

打赏
举报

jingxiaoping(南无本师释迦牟尼佛) ( )
大哥,我查过了,这方面是没有问题的~~~

dino2000 2005-09-25

打赏
举报

问题没有解决啊~~~~~~~~谁解决它,或者有突破性的方案.....50分全是他的,不够再开再加~~~~

csecong 2005-09-24

打赏
举报

注意sql数据库的链接，还有就是sql分给你的库名

还有就是权限的问题

dino2000 2005-09-24

打赏
举报

d a~~

dino2000 2005-09-24

打赏
举报

skangming(简单生活)
是SQL的?有什么关系吗?

谢谢大家可能是我没有说清楚,我现在的状况是这样的:
空间商上的数据库内容是可写可读的(因为我的网站在后台有一个给管理员看的界面,管理员能正常操作这个表).我现在主要是表单(客户填入)写不进数据库,但是本地可以的..........

dino2000 2005-09-24

打赏
举报

再顶~

jingxiaoping 2005-09-24

打赏
举报

一般虚拟主机用户，服务商对其都会分配一个所有者，所以我们在本地测试的时候尽量将所有者设置为默认状态（即dbo），你可以查看一下在数据表里面有一个叫用户的，看看你所设置的数据表的用户是否包含在用户表里面。如果确认无误的话，你可以向他们提出增强自己用户权限的请求。

xiao2004 2005-09-24

打赏
举报

改为rs.open sql,conndb,3,3

dino2000 2005-09-24

打赏
举报

pilicat(http://kmok.cn)
这位兄弟改成什么啊,你这不是一样的吗?
注意思:我的程序在本地没有问题..........

pilicat 2005-09-24

打赏
举报

是不是游标的问题？

把：
rs.open sql,cnndb,1,3
改为：
rs.open sql,cnndb,1,3

dino2000 2005-09-24

打赏
举报

(注意sql数据库的链接，还有就是sql分给你的库名,还有就是权限的问题)都是没有问题的.

dino2000 2005-09-24

打赏
举报

<% dim table_width
dim td_width
Dim odbc
Dim title
Dim webmasterEmail
Dim website
title = "思迅软件"
table_width=119
td_width=59
%>
<%
dim DSNString
DSNString = "driver={SQL Server};server=ISS-SERVER2;" & _
"uid=sa;pwd=;database=sziss;"
Dim cnndb
on error resume next
Set cnndb=Server.CreateObject("ADODB.Connection")
if err.number<> 0 then
cnndb.close
set cnndb = nothing
Response.write "创建数据库对象时出错，请重新再试"&err.description
Response.end
end if
cnndb.ConnectionString = DSNString
cnndb.open
if err.number<> 0 then
cnndb.close
set conn =nothing
Response.write "打开数据库时出错，请重新再试" &err.description
Response.end
end if

%>

这个是连接页面!!

dino2000 2005-09-24

打赏
举报

<html>

<head>
<title><%=title%></title>
</head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
A:link {color:"003399";}
A:visited {color:"003399";}
A:hover {color:"red";}
BODY {font-family: "arial";font-size: 13px}
TD {font-family: "arial";font-size:13px}

</style>
<body>

<%
'set upload=new upload_5xSoft
'response.write request("type") + "<br/>"

company=Trim(Request("company"))
personname=Trim(Request("personname"))
telephone=Trim(Request("telephone"))
email=Trim(Request("email"))
address=Trim(Request("address"))
memo=Trim(Request("memo"))
if company="" then
message=message&"<li>您公司不能为空"
end if
if personname ="" then
message=message&"<li>您的姓名不能为空"
end if
if telephone="" then
message=message&"<li>您的电话及区号不能为空"
end if
if address="" then
message=message&"<li>您的联系地址不能为空"
end if
if instr(email,"@")=0 or instr(email,".")=0 then
message=message&"<li>您的电子邮件地址填写错误"
end if

if message<>"" then
%>
<script language="javascript">
alert('<%=message%>');
history.back();
</script>

<%

else

sql="select * from t_online_feedback"
set rs=server.createobject("adodb.recordset")
rs.open sql,cnndb,1,3
rs.addnew
rs("vch_feedback_company")=company
rs("ch_feedback_name")=personname
rs("ch_feedback_tel")=telephone
rs("int_brach_num")=brach
rs("ch_feedback_email")=email
rs("ch_feedback_address")=address
rs("vch_memo")=memo
rs.update

rs.close
set rs=nothing

%>

<%
response.Redirect "succ.asp"
end if
%>
</body>
</html>
大家帮我看看这个SAVE页面有没有什么问题?