数据插入数据数据库或者是rs.update的问题

zmhdxy 发布于 2007-11-27 08:28， 1377 次点击

代码如下:
'生成当前时间
  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
变了,别的没变可是有一定的问题
去掉单引号后就会有错
我想要达到的要求就是我写的这样,可我不知道怎么写
高手指教

9 回复

384745732007-11-27 09:07

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

zmhdxy2007-11-29 21:40

当然是数据库里的
问题解决了
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
怎么现在的论坛都是自问自答啊

邪之舞2007-11-30 00:03

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

zmhdxy2007-11-30 12:07

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

madpbpl2007-11-30 12:17

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

jiangzixuan2007-11-30 13:25

vPwd等变量没有定义

xiang5882007-11-30 14:48

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

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

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

zmhdxy2007-11-30 20:36

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

#10

zmhdxy2007-12-04 10:04

问题解决

数据插入数据数据库 或者是rs.update的问题

数据插入数据数据库或者是rs.update的问题