代码如下:
'生成当前时间
  vCreateTime = year(now())&"-"&right(("0"&month(now())),2)&"-"&right(("0"&day(now())),2)&" "&right(("0"&Hour(now())),2)&":"&right(("0"&Minute(now())),2)&":"&right(("0"&Second(now())),2)
'  vPwd=rs("Pwd")
 ' vFace=rs("Face")
'  vQQ=rs("QQ")
'  vEmail=rs("Email")
'  vHomepage=rs("Homepage")
'  vUpperId=rs("UpperId")
  
  '插入新数据
    rs.addnew
 rs("Subject")=vSubject
 rs("Words")=vWords
 rs("UserName")=UserName
' rs("Pwd")=vPwd
  '  rs(Face)=vFace
'    rs(QQ)=vQQ
'    rs(Email)=vEmail
'    rs(Homepage)=vHomepage
'    rs(UpperId)=vUpperId
'    rs(CreateTime)=vCreateTime
 rs.update
rs.close
 set rs = nothing
 conn.close
 set conn = nothing
我想把用户数据插入数据库
只有
 rs("Subject")=vSubject
 rs("Words")=vWords
 rs("UserName")=UserName
变了,别的没变 可是有一定的问题
去掉单引号后就会有错
我想要达到的要求就是我写的这样,可我不知道怎么写
高手指教

你的vpwd,vface,vqq...都是哪来的啊?或者是提交的表单里有没有这个文本框啊?
你好好查查看看是不是有的参数没传过来啊.

当然是数据库里的
问题解决了
rs(Face)=vFace
'    rs(QQ)=vQQ
'    rs(Email)=vEmail
'    rs(Homepage)=vHomepage
'    rs(UpperId)=vUpperId
'    rs(CreateTime)=vCreateTime
这几行的rs里面没有加引号
还有代码前的撇肯定是要去掉的
我测试的 所以才加上的
有另一种方法
vCreateTime = year(now())&"-"&right(("0"&month(now())),2)&"-"&right(("0"&day(now())),2)&" "&right(("0"&Hour(now())),2)&":"&right(("0"&Minute(now())),2)&":"&right(("0"&Second(now())),2)
  sql = "insert into content (Pwd,Face,QQ,Email,Homepage,UpperId,Subject,Words,UserName,CreateTime) select top 1 Pwd,Face,QQ,Email,Homepage,UpperId,'" & vSubject & "','" & vWords & "','"_
   & UserName & "','"& vCreateTime & "' from content where UserName='" & UserName & "'"
   conn.Execute sql
   rs.close
      set rs = nothing
    conn.close
    set conn = nothing
怎么现在的论坛都是自问自答啊

哈  自己把问题给解决了就可以从中学到很多`````所以应该高兴才对嘛！

有别的提示 就会很快啊 不浪费时间啊

在解决问题的过程中可以学到更多的知识，等别人解决问题的时间，可能自己已经解决了。楼主继续加油。
这个论坛还是很不错的，楼主可以慢慢体会。

vPwd等变量没有定义

有些问题还是要自己先解决
不行去问百度，google，论坛搜索
再不行问论坛

这样可以提高你的效率
而且可以让你更快的进步

这只是我的看法，我的经验
不针对任何人

谢谢各位的提醒啊 不过总是觉的
程序错的时候 不知道错在哪 怎么上百度啊

问题解决