[求助]请教数据为何加不进去?

楼主
[求助]请教数据为何加不进去?
下面一段代码,调试时db.execute(strSql) 语句出错,数据加不进去,请指教!
<% 'Option Explicit %>
<% 'Response.Buffer=True%>
<html>
<head>
 <title> 添加新记录页面</title>
</head>
<body>
 <h2 align="center">添加新记录</h2>
<center>
<table border="1" width="90%">
   <form  action=""  method="post"  name="form1">
        <tr><td width="11%">姓名</td><td width="89%"><input type="text" name="name" ></td></tr>  
 <tr><td><input type="submit" value=" 确 定 "></td></tr>
   </form>
</table>
</center>

<%
 If Request.Form("name")<>"" Then
 
  dim db
  set db=Server.Createobject("ADODB.Connection")
  db.Open "DBQ="&Server.Mappath("classmatet.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
   
  Dim strSql,varName
  varName=Request.Form("name")  
  StrSql="Insert into contact(name) values("" & varName & "")"  
 db.execute(strSql)            '****调试时本句出错
  Response.Redirect "index.asp"     
 Else
  Response.Write "将所有信息填写完整"'******调试时首次运行便出现本句文字,是否以上的条件语句有错
 End If
%>
</body>
</html>
 
[em12]
1楼
StrSql="Insert into contact(name) values('" & varName & "')"  
试试
2楼
试过,不行;括号内也用过二个双引号,但一样不行。不知道为什么?
3楼
Action  = "#"
字符串改单引号应该就行了。
4楼
经过前辈指点,问题已解决,谢谢各位的大力指教!
5楼

电脑版 Page created in 0.0801 seconds with 4 queries.