新微赢技术网

标题: [求助]提取系统时间入库的问题 [打印本页]

作者: 怎么可能 时间: 2010-1-9 03:38
标题: [求助]提取系统时间入库的问题
我作的考勤登录系统，需提取登录年、月、日、时，但我入库的时间：年一栏为1905-6-29，月一栏为：1900-1-11，时一栏为：1900-1-17。只有时间一栏是正确的。我改了N遍了，总是不正确，又怀疑是我的系统时间错误，反复检查也没错，特请教各位前辈高手。指出我错哪儿了？我的代码如下：
<%
if Request.Form("action")="true" then
 username=trim(Request.Form("username")) '登录用户名
 password=trim(Request.Form("password")) '登录密码
 otherpwd = Trim(Request.form("otherpwd")) '附加码
 reotherpwd = Trim(Request.form("reotherpwd"))'生成的附加码

 legalTag=checkenter()

 If legalTag=TRUE then '如果没有非法输入，则进行用户验证
if otherpwd = reotherpwd then '附加码比较
 legalUserTag=checksysUser() '系统用户验证
 if legalUserTag=true then
 If Session("level")=1 and Session("admin")="True" Then
 Response.Redirect("manage.asp")
 Response.End
 End If
 If Session("level")=2 Then
 Response.Redirect("main.asp")
 Response.End
 End If
 If Session("level")=3 Then
 set rs=server.createobject("adodb.recordset")
 insertsql="select * from kaoqing_table"
 rs.open insertsql,db,1,3
 rs.addnew
 rs("user")=username
 rs("recordYear")=Year(Now)
 rs("recordMonth")=Month(Now)
 rs("recordDay")=Day(Now)
 rs("recordTime")=Time
 rs("note")=note

 rs.update

 rs.close
 set rs=nothing
 Response.Redirect("normal.asp")
 Response.End
 End If

 else
 errmsg="用户名或者用户密码错误，请重新输入！"
 end if
else
 errmsg="附加码输入错误，请重新输入！"
end if
 else
errmsg="用户名输入有误，请重新输入！"
 end if
end if
%>

[[italic] 本帖最后由林中泉水于 2007-12-19 08:02 编辑 [/italic]]

作者: 熾天使rose 时间: 2010-1-9 03:38
关于年月日的问题可以用函数来处理：year(now())这是年。month(now())这是月， day(now())这是日.如果还是不明白的话可以联系我，QQ：308046190。个人网址：www.yckjsoft.cn

作者: 青松 时间: 2010-1-9 03:38
问题已解决,是因为数据库字段属性设置错误,修改后已正常.谢谢各位了.

作者: ︶ㄣ⒏懂緈諨 时间: 2010-1-9 03:39
楼主贴出的并不是出错的页面吧？

作者: 爲眀天活着 时间: 2010-1-9 03:39
页面没出错,就是年月日都分别得到的是时期,且年一栏的年是1905,而月和日一栏得到的是1900年。我真的感到郁闷。另外第一部分的表单取得时间可不要，我已经删了。谢谢各位再帮我看看，究竟问题在哪？

[[italic] 本帖最后由林中泉水于 2007-12-19 08:08 编辑 [/italic]]

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)