Question

asp无法update数据库

<%
dim conn,n,i,c,t,w,s
set conn=server.createobject("ADODB.connection")
conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=127.0.0.1;UID=sa;PWD=123;DATABASE=student2 "
n=request.form("sname")
i=request.form("num")
c=request.form("class")
t=request.form("town")
w=request.form("concract")
s="男"
if request.form("radio")=1 then s="女"
exec="update 计算机系 set 籍贯='"&t&"',班级='"&c&"',联系方式='"&w&"',性别='"&s&"' where 姓名='"&request.form("sname")&"'"
conn.execute exec
conn.close
set conn=nothing
response.write "Operating Successfully!"
%>
<% =now() %>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000">
<caption>
<b>System UpDate</b>r
</caption>
<form name="form1" method="post" action="Update.asp">
<tr>
<td width="236" align="left" valign="middle" bgcolor="#FFFFFF">Enter the name:</td>
<td width="629" align="left" valign="middle" bgcolor="#FFFFFF" >
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><label>
<input type="text" name="sname"/>
</label></td>
</tr>
</table>
<label></label>
</td>
</tr>
<tr>
<td align="left" valign="middle" bgcolor="#FFFFFF"> New ID:</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><label>
<input type="text" name="num" />
</label></td>
</tr>
<tr>
<td align="left" valign="middle" bgcolor="#FFFFFF">Class number</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><label>
<input type="text" name="class" />
</label></td>
</tr>
<tr>
<td align="left" valign="middle" bgcolor="#FFFFFF">Sex:</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><label>
<input type="radio" name="radio" id="radio" value="0"/>
</label>
Boy
<label>
<input type="radio" name="radio" id="radio2" value="1" />
Girl
</label></td>
</tr>
<tr>
<td align="left" valign="middle" bgcolor="#FFFFFF">Hometown:</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><label>
<input type="text" name="town" />
</label></td>
</tr>
<tr>
<td align="left" valign="middle" bgcolor="#FFFFFF">Contract Way:</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><label>
<input type="text" name="concract" />
</label></td>
</tr>
<tr>
<td height="22" colspan="2" align="center" valign="middle" bgcolor="#FFFFFF">
<input type="submit" name="button" id="button" value="UpDate" />
<label>
<input type="reset" name="button2" id="button2" value="Reset" />
</label>
</td>
</tr>
</form>
</table>
点击update后无任何错误提示，看上去好像已经更新了，可打开数据库，里面没有变化啊，什么原因？我打开了包含网页文件的文件夹的写入权限，为什么还是不行？

Answer 1

最有可能是你的数据库的权限问题了哦。你在*.mdb点鼠标右键，属性，权限，添加，查找everyone,赋上所有权限，应该就OK了，还不好，Q我。

Answer 2

不觉得程序有问题
语法到是有一处
s="男"
if request.form("radio")=1 then s="女"
少个end if
如果提交和更新页面是一个页面的话，要注意
判断request.form("sname")是不是为空，如果为空，不执行语句

Answer 3

exec = "update 计算机系 set 籍贯='" & t & "',班级='" & c & "',联系方式='" & w & "',性别='" & s & "' where 姓名='" & request.Form("sname") & "'"

Answer 4

conn.execute exec
后面response.write exec 看看exec 的sql语句是否正确

Answer 5

conn.execute (exec)试一下