request() ???

大雨 2006-11-15 03:03:28
<%
Dim dtDate As date,intDiffDay as Integer,strdate as string
dtDate=Cdate(request("date")) //有问题 。。
intDiffDay=DateDiff(DateInterval.Day,Now(),dtDate)
Response.Write("date is :" & CStr(Now()))
Response.Write("<br>the interval is :")
Response.Write(CStr(intDiffDay))
%>
希望大家看看,把小虫子找出来。。。。
期望的运行结果:
htpp:/local/................aspx?date=2006/111/15 entry
...全文
77 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
大雨 2006-11-15
  • 打赏
  • 举报
回复
楼上的兄弟,说的是;
但是,编译中。。。。
具体怎么处理阿?
peilianhai 2006-11-15
  • 打赏
  • 举报
回复
第一次加载页面request("date")为空
所以cdate(空)出错

你在页面后边加上?date=2006/11/15
就不出错
大雨 2006-11-15
  • 打赏
  • 举报
回复
哈哈,别着急啊,那个注释: 我没有在程序中加入。。。
我只是提示大家,那个地方有错误。。。。。
<%
Dim dtDate As date,intDiffDay as Integer,strdate as string
dtDate=Cdate(request("date"))
intDiffDay=DateDiff(DateInterval.Day,Now(),dtDate)
Response.Write("date is :" & CStr(Now()))
Response.Write("<br>the interval is :")
Response.Write(CStr(intDiffDay))
%>
大家,帮忙看看吧,由地址栏,输入 一个 string 型的 时间,作为 cdate( 参数) ,但是。。。编译,提示有问题,如果 ,直接 写入 cdate("2006/11/15") ,就不会有错。
为什么阿。。。。。。。。。。wait for you
peilianhai 2006-11-15
  • 打赏
  • 举报
回复
1
dtDate=Cdate(request("date")) //有问题 。。
注释应'//有问题 。。

2
htpp:/local/................aspx?date=2006/111/15 entry
应该htpp:/local/................aspx?date=2006/11/15 entry

运行结果:
date is :2006-11-15 15:14:37
the interval is :0

赶紧结贴!

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧