账号通
    

账号  

密码  

7116

查看

17

回复
主题:[分享]10行代码=132行代码:非常简单就可以实现ASP时间格式化的函数分享 [收藏主题] 转到:  
曾铃军 当前离线

119

主题

2

广播

0

粉丝
添加关注
级别:一年级

用户积分:295 分
登录次数:152 次
注册时间:2010/4/5
最后登录:2014/4/11
曾铃军 发表于:2010/7/30 9:24:09   | 只看该作者 查看该作者主题 11楼 
科汛在线商城系统(NET)
以下是引用 科汛官方在2010-7-30 9:21:41的发言:

再说单从上面官方的那个时间函数来说代码虽长,但执行效率不会比你写的那个低。原因在于这里用的是select,select只跳到符合条件里块里执行,





Case 1,21,41

DateString=Year(DateStr) & "-" & Right("0" & Month(DateStr), 2) & "-" & Right("0" & Day(DateStr), 2)

if Types=21 then

DateString = "(" & DateString &")"

elseIf Types=41 then

DateString = "[" & DateString &"]"

end if






当用户在系统函数标签里选择样式1时,只需要执行一句代码

复制代码

  1. DateString=Year(DateStr) & "-" & Right("0" & Month(DateStr), 2) & "-" &
  2. Right("0" & Day(DateStr), 2)








有用户选择带括号或中括号输出时,只需执行两句

DateString=Year(DateStr) & "-" & Right("0" & Month(DateStr), 2) & "-" & Right("0" & Day(DateStr), 2)

if Types=21 then

DateString = "(" & DateString &")"

elseIf Types=41 then

DateString = "[" & DateString &"]"

end if








再者这些都不是访问数据库操作的,都是不占用资源的。



赞同你的认真学习进取态度,但也别太研牛角尖了!





站在别人原有的代码上分析做二次开发,当然是简单得多。





到底是研究的是简洁还是研究的是复杂,关键是科讯官方多次不接受用户的建议,始终认为是最好的思路,当时缓存机制不是也改了吗?这个事实不假吧,也许你还记得当时我们的qq对话,结果打印结果你们一看,最后是怎么说的还记得吗?“哦,确实是有问题.....”







 
<a href=http://www.52-game.com title=单机游戏下载基地>单机游戏下载基地</a>—<a href=http://www.dacheng86.com title=seo培训>seo培训</a>—<a href=http://www.1366.me title=插件网>插件网</a>
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
曾铃军 当前离线

119

主题

2

广播

0

粉丝
添加关注
级别:一年级

用户积分:295 分
登录次数:152 次
注册时间:2010/4/5
最后登录:2014/4/11
曾铃军 发表于:2010/7/30 9:31:17   | 只看该作者 查看该作者主题 12楼 
科汛在线考试系统(NET)
如果按照你说的效率,那么我来加几个代码你看看比较谁能比效率
Public Function DateTimeFormat(ByVal DateTime, ByVal Format)
     If Not IsDate(DateTime) Then DateTime = Now()
     If Instr(Format, "YY") Then Format = Replace(Format, "YY", Year(DateTime))
     If Instr(Format, "MM") Then Format = Replace(Format, "MM", Right("0"&Month(DateTime), 2))
     If Instr(Format, "DD") Then Format = Replace(Format, "DD", Right("0"&Day(DateTime), 2))
     If Instr(Format, "hh") Then Format = Replace(Format, "hh", Right("0"&Hour(DateTime), 2))
     If Instr(Format, "ff") Then Format = Replace(Format, "ff", Right("0"&Minute(DateTime), 2))
     If Instr(Format, "ss") Then Format = Replace(Format, "ss", Right("0"&Second(DateTime), 2))
     DateTimeFormat = Format
  End Function
 
<a href=http://www.52-game.com title=单机游戏下载基地>单机游戏下载基地</a>—<a href=http://www.dacheng86.com title=seo培训>seo培训</a>—<a href=http://www.1366.me title=插件网>插件网</a>
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
人间无道 当前离线

1011

主题

0

广播

1

粉丝
添加关注
级别:八年级

用户积分:707 分
登录次数:126 次
注册时间:2010/6/22
最后登录:2012/7/2
人间无道 发表于:2010/7/30 9:37:01   | 只看该作者 查看该作者主题 13楼 
科汛智能建站系统
lz已经到达了不需要用cms了,完全可以自己开发了。



快去开发一个吧,到时我用你的CMS
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
曾铃军 当前离线

119

主题

2

广播

0

粉丝
添加关注
级别:一年级

用户积分:295 分
登录次数:152 次
注册时间:2010/4/5
最后登录:2014/4/11
曾铃军 发表于:2010/7/30 9:46:00   | 只看该作者 查看该作者主题 14楼 
科汛智能建站系统
我发现你期中用到一个标签很多时候容易出错,所以这个是我估计没有实用的一个原因,Get_Date_Field=Replace(Get_Date_Field,"mm",Right("0" & minute(FieldValue), 2)) ,很容易在MM这个位置就被替换(尽管替换区分大小写),这个我在测试的时候出现过,后来改成fenfen的ff标签就将问题解决
 
<a href=http://www.52-game.com title=单机游戏下载基地>单机游戏下载基地</a>—<a href=http://www.dacheng86.com title=seo培训>seo培训</a>—<a href=http://www.1366.me title=插件网>插件网</a>
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
137103161 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:5 分
登录次数:2 次
注册时间:2010/7/29
最后登录:2010/7/30
137103161 发表于:2010/7/30 11:03:37   | 只看该作者 查看该作者主题 15楼 
科汛在线考试系统(NET)
新人没办法,拿分走人。。。。。
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
曾铃军 当前离线

119

主题

2

广播

0

粉丝
添加关注
级别:一年级

用户积分:295 分
登录次数:152 次
注册时间:2010/4/5
最后登录:2014/4/11
曾铃军 发表于:2010/7/30 12:49:07   | 只看该作者 查看该作者主题 16楼 
科汛智能建站系统
其实我更加希望的是理性争执问题,然后得到最优化的东西,希望加大别误解我的本意。要不我做收费的东西也有部分朋友愿意,当前加我qq的100多个朋友之中,我问了下,大部分愿意支付我开发插件的费用,但是大家都是草根站长,我也是在开发出来自己使用之余与大家分享的,所以没有想过收费。希望科讯进步,希望科讯的用户能建设出一个个优秀的站点。
 
<a href=http://www.52-game.com title=单机游戏下载基地>单机游戏下载基地</a>—<a href=http://www.dacheng86.com title=seo培训>seo培训</a>—<a href=http://www.1366.me title=插件网>插件网</a>
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
kingseok 当前离线

354

主题

17

广播

1

粉丝
添加关注
级别:三年级

用户积分:7575 分
登录次数:261 次
注册时间:2010/7/26
最后登录:2017/6/7
kingseok 发表于:2011/5/5 9:48:24   | 只看该作者 查看该作者主题 17楼 
恩,讨论的十分深切,不错不错
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
sffwzt 当前离线

449

主题

0

广播

0

粉丝
添加关注
级别:四年级

用户积分:450 分
登录次数:14 次
注册时间:2011/6/22
最后登录:2011/8/5
sffwzt 发表于:2011/6/29 10:38:42   | 只看该作者 查看该作者主题 18楼 
科汛在线商城系统(NET)
谢谢楼主分享学习了
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.23438秒 powered by KesionCMS 9.0