asp向ACCESS添加数据,在本地可以添加进去,上传到服务器后就添加不到数据库了,但也没有错误提示。
<formaction="action.asp?action=addmes"method="post"enctype="multipart/form-data"><tr>...
<form action="action.asp?action=addmes" method="post" enctype="multipart/form-data">
<tr>
<td width="13%" height="16"> </td>
<td width="87%"> </td>
</tr>
<tr>
<td align="right">订单类型:</td>
<td><select name="mesleixing" id="mesleixing">
<option value="1">自产</option>
<option value="2">外发</option>
</select>
订单来源:
<select name="sourceid" id="sourceid">
<%
set ts = server.CreateObject("adodb.recordset")
sqll = "select * from mes_source"
ts.open sqll,conn,1,1
do while not ts.eof and not ts.bof
%>
<option value="<%=ts("sourceid")%>"><%=ts("sourcename")%></option>
<%ts.movenext
loop
ts.close
set ts = nothing
%>
</select>
游戏名称:
<select name="gameid" id="gameid">
<%
set ts = server.CreateObject("adodb.recordset")
sqll = "select * from mes_game"
ts.open sqll,conn,1,1
do while not ts.eof and not ts.bof
%>
<option value="<%=ts("gameid")%>"><%=ts("gamename")%></option>
<%ts.movenext
loop
ts.close
set ts = nothing
%>
</select> </td>
<tr>
<td align="right">订单号:</td>
<td><input name="mesud" type="text" id="mesud"></td>
</tr>
<td align="right">角色名:</td>
<td align="left"><input name="mesname" type="text" id="mesname"></td>
</tr>
<tr>
<td height="84" align="right" valign="top">订单内容:</td>
<td align="left" valign="top"><textarea name="mesbody" cols="80" rows="6" id="mesbody"></textarea></td>
</tr>
<tr>
<td height="33" align="right">接单时间:</td>
<td><table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20%"><input name="mestime" type="radio" value="1" checked onClick="sss1();">
自动
<input name="mestime" type="radio" value="2" onClick="sss2();">
手动 </td>
<td width="80%"><span style="display:none" id="mesontime">
<input name="mestimeone" id="mestimeone" type="text" size="15"><img src="Img/QN1CS1.gif" width="16" height="13" onClick="return showCalendar('mestimeone', 'y-mm-dd');"/>
<select name="shi" id="shi">
<%for i=1 to 24
if i = 1 then
response.write("<option value=1 selected>1</option>")
else
response.write(" <option value="&i&">"&i&"</option>")
end if
next
%>
</select>
小时</span></td>
</tr>
</table></td>
</tr>
<tr>
<td align="right">完成周期:</td>
<td><input name="zhouqi_m" type="text" id="zhouqi_m" value="0" size="5">
月
<input name="zhouqi_d" type="text" id="zhouqi_d" value="0" size="5">
日
<input name="zhouqi_h" type="text" id="zhouqi_h" value="0" size="5">
小时</td>
</tr>
<tr>
<td align="right">接单价格:</td>
<td><input name="mesinprice" type="text" id="mesinprice" size="10">
¥</td>
</tr>
<tr>
<td align="right">转出价格:</td>
<td><input name="mesoutprice" type="text" id="mesoutprice" value="0" size="10">
¥(<span class="STYLE2">非转出单请使用 展开
<tr>
<td width="13%" height="16"> </td>
<td width="87%"> </td>
</tr>
<tr>
<td align="right">订单类型:</td>
<td><select name="mesleixing" id="mesleixing">
<option value="1">自产</option>
<option value="2">外发</option>
</select>
订单来源:
<select name="sourceid" id="sourceid">
<%
set ts = server.CreateObject("adodb.recordset")
sqll = "select * from mes_source"
ts.open sqll,conn,1,1
do while not ts.eof and not ts.bof
%>
<option value="<%=ts("sourceid")%>"><%=ts("sourcename")%></option>
<%ts.movenext
loop
ts.close
set ts = nothing
%>
</select>
游戏名称:
<select name="gameid" id="gameid">
<%
set ts = server.CreateObject("adodb.recordset")
sqll = "select * from mes_game"
ts.open sqll,conn,1,1
do while not ts.eof and not ts.bof
%>
<option value="<%=ts("gameid")%>"><%=ts("gamename")%></option>
<%ts.movenext
loop
ts.close
set ts = nothing
%>
</select> </td>
<tr>
<td align="right">订单号:</td>
<td><input name="mesud" type="text" id="mesud"></td>
</tr>
<td align="right">角色名:</td>
<td align="left"><input name="mesname" type="text" id="mesname"></td>
</tr>
<tr>
<td height="84" align="right" valign="top">订单内容:</td>
<td align="left" valign="top"><textarea name="mesbody" cols="80" rows="6" id="mesbody"></textarea></td>
</tr>
<tr>
<td height="33" align="right">接单时间:</td>
<td><table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20%"><input name="mestime" type="radio" value="1" checked onClick="sss1();">
自动
<input name="mestime" type="radio" value="2" onClick="sss2();">
手动 </td>
<td width="80%"><span style="display:none" id="mesontime">
<input name="mestimeone" id="mestimeone" type="text" size="15"><img src="Img/QN1CS1.gif" width="16" height="13" onClick="return showCalendar('mestimeone', 'y-mm-dd');"/>
<select name="shi" id="shi">
<%for i=1 to 24
if i = 1 then
response.write("<option value=1 selected>1</option>")
else
response.write(" <option value="&i&">"&i&"</option>")
end if
next
%>
</select>
小时</span></td>
</tr>
</table></td>
</tr>
<tr>
<td align="right">完成周期:</td>
<td><input name="zhouqi_m" type="text" id="zhouqi_m" value="0" size="5">
月
<input name="zhouqi_d" type="text" id="zhouqi_d" value="0" size="5">
日
<input name="zhouqi_h" type="text" id="zhouqi_h" value="0" size="5">
小时</td>
</tr>
<tr>
<td align="right">接单价格:</td>
<td><input name="mesinprice" type="text" id="mesinprice" size="10">
¥</td>
</tr>
<tr>
<td align="right">转出价格:</td>
<td><input name="mesoutprice" type="text" id="mesoutprice" value="0" size="10">
¥(<span class="STYLE2">非转出单请使用 展开
4个回答
2012-04-12
展开全部
其实可以检查一下服务器中 Access 数据库文件是否具有写入权限,然后再检查一下文件夹是否具有写入权限..
再提供一个简单的方法,再添加数据后,把数据库文件下载下来,进行对比,看看是添加了没显示还是根本没有添加成功..然后再来找错误..
再提供一个简单的方法,再添加数据后,把数据库文件下载下来,进行对比,看看是添加了没显示还是根本没有添加成功..然后再来找错误..
追问
只添加了两个时间,还有就是添加了最后一个userid,在本地测试是没有问题的,在朋友的虚拟主机测试也是没有问题的,那么到底是主机有问题呢还是我代码有错呢,纠结。
追答
mesinpric 这个变量 是不是 全局变量,或者是在其他的页面有该变量?
还有就是 貌似 你 mesgonetime 变量有三次重定义..,如果是需要三个值的话,可以 mesgonetime = mesgonetime & ...其他的
一个最简单的办法就是:
你把所有的变量都在服务器中打印出来,看看那些变量都有值没有,如果没有值就是变量的问题,如果有值,应该会写入成功,也就是会是数据库的问题..不过基本上可以排除SQL语句的问题
展开全部
你的conn.asp呢?发上来
追问
这里输入字数不多,可否加个QQ私聊下?
追答
删除Q
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
数据库连接文件的路径检查一下!
追问
数据库文件没有问题,因为在另一个功能添加新用户的时候是没有问题的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
路径是相对路径吗?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询