| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 549 人关注过本帖
标题:日期的问题
只看楼主 加入收藏
skytiankong
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2005-5-20
收藏
 问题点数:0 回复次数:5 
日期的问题
Dim rs
dim nian
dim yue
dim tian
dim riqi
nian=request("nian")
yue=request("yue")
tian=request("tian")
riqi=dateserial( nian,yue,tian)
set rs=server.CreateObject("ADODB.Recordset")
mySql = "select * from  rpdan "
rs.Open  mysql,conn,1
 rs.filter=" rprushijian='"&riqi&"' "
最后一行代码是有问题吗?
如果要是链接日期型的过滤怎么写呀?

搜索更多相关主题的帖子: request yue 
2005-06-02 02:58
skytiankong
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2005-5-20
收藏
得分:0 
我测试了不是最后代码的问题是这句问题riqi=dateserial( nian,yue,tian)
nian=cint(request("nian"))
yue=cint(request("yue"))
tian=cint(request("tian"))
riqi=dateserial( nian,yue,riqi)
我加上了cint函数也不好用

然后我在nian的这个文本框直接写2005-6-2然后用了下面的方法也不行
nian=year(request("nian"))
yue=month(request("nian"))
tian=day(request("nian"))
riqi=dateserial( nian,yue,riqi)
应该怎么用哪要是想提交日期给ripi 这个变量
2005-06-02 10:35
hxfly
Rank: 5Rank: 5
等 级:贵宾
威 望:17
帖 子:5810
专家分:118
注 册:2005-4-7
收藏
得分:0 
把错误信息贴出来

2005-06-02 11:04
skytiankong
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2005-5-20
收藏
得分:0 
没有错误信息.
但是就是不能根据根据我在三个文本框添加的信息得到信息
我要是用dateserial(2005,6,1)
2005-06-02 11:10
无根泉
Rank: 2
等 级:新手上路
威 望:4
帖 子:853
专家分:0
注 册:2004-11-4
收藏
得分:0 
<form name="form1" method="post" action="">
  <select name="ny" id="ny">
  <% for i=2000 to 2008
  response.Write"<option value='"&i&"'"
  if year(date())=i then response.Write"selected"
  response.Write">"&i&"</option>"
  next%>
  </select>
  
  <select name="nm" id="nm">
    <% for i=1 to 12
 if i<10 then
 b="0"&i
 else
 b=i
 end if
  response.Write"<option value='"&b&"'"
  if month(date())=i then response.Write"selected"
  response.Write">"&b&"</option>"
  next%>
  </select>
  
  <select name="nd" id="nd">
    <% for i=1 to 31
 if i<10 then
 b="0"&i
 else
 b=i
 end if
  response.Write"<option value='"&b&"'"
  if day(date())=i then response.Write"selected"
  response.Write">"&b&"</option>"
  next%>
  </select>
  
  <input type="submit" name="bt" value="提交">
</form>
<% bt=request.Form("bt")
today=request("ny")&","&request("nm")&","&request("nd")
if bt<>"" then
 if isdate(today)=false then
  response.Write "日期有误!"
 else
  response.Write today
 end if
end if
 %>

我很菜,但我很努力!
2005-06-02 11:22
skytiankong
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2005-5-20
收藏
得分:0 
dateserial(ny,nm,nd)得到的日期为什么不是输入的日期哪?
2005-06-05 10:57
快速回复:日期的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016852 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved