<%
    dim a,b
      set a=server.CreateObject("adodb.connection")
      a.connectionstring="driver=microsoft access driver (*.mdb); dbq="&server.MapPath("denglu.mdb")
      a.open
          b="insert into dl(yhm,mm)values('"&xm&"','"&mm&"')"
      a.execute(b)
      response.Write "已经成功添加记录!"

if xm="" or mm="" then
%>



错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 字段 'denglu.yhm' 不能是零长度的字符串。
/hanzhu3366/登陆框/denglu1.asp, 第 18 行→“a.execute(b)”

该怎么改？

你取到的这个值"&xm&"应该是空的吧，所以才会报这个错误
要不你把数据库里面yhm这个字段改成可以为null应该就好了吧，看一下你的字段定义有什么限制

谢谢~你的提示！