注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

翱翔的板儿砖

——燃烧吧,小宇宙!

 
 
 

日志

 
 

【AU3】淘宝截止时间计算器II  

2008-12-11 16:05:35|  分类: 编程 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

人的精力是有限的,而偷懒的精神却是无限的,我要把有限的精力放到无限的偷懒事业中……

前一篇文章制作的计算器还需要手工输入“天”、“时”、“分”等信息,也不是很方便,于是制作了这个小工具,只要粘贴上淘宝商品页面的URL,就可以计算出截止日期了。

不了解怎么用的同学可以查找一下“AutoIt”关键字。多余的不说,上图上源码:

源代码:

#Include <Date.au3>
#include
<ButtonConstants.au3>
#include
<EditConstants.au3>
#include
<GUIConstantsEx.au3>
#include
<StaticConstants.au3>
#include
<WindowsConstants.au3>

Opt("GUIOnEventMode",
1
)
$formMain = GUICreate("淘宝商品剩余时间", 483, 107, -1, -1
)
GUISetOnEvent($GUI_EVENT_CLOSE,
"formMainClose"
)
$Group1 = GUICtrlCreateGroup("商品信息", 8, 8, 465, 89
)
$iptUrl = GUICtrlCreateInput("", 104, 28, 353, 21
)
$Label1 = GUICtrlCreateLabel("请输入商品网址", 16, 32, 88, 13
)
$btnCal = GUICtrlCreateButton("计算(&C)", 376, 64, 75, 25, 0
)
GUICtrlSetOnEvent(-1,
"btnCalClick"
)
GUICtrlCreateGroup("",
-99, -99, 1, 1
)
GUISetState(@SW_SHOW
)

While
1
    Sleep(100
)
WEnd

Func
btnCalClick
()
    $Url = GUICtrlRead($iptUrl
)
    CalExpDay($Url
)
    GUICtrlSetData($iptUrl, ""
)
EndFunc
Func
formMainClose
()
   
Exit
EndFunc

Func
CalExpDay($Url
)
    $TmpFile =
"tmp.txt"
    $SearchString =
"TB.util.CountdownTimer.attach('leftTime1', "
    InetGet($URL, $TmpFile
)
    $FileContext = FileRead($TmpFile
)
    FileDelete($TmpFile
)
    $Pos = StringInStr($FileContext, $SearchString
)
    $FileContext = StringTrimLeft($FileContext, $Pos + StringLen($SearchString)
-1)
    $Pos = StringInStr($FileContext, ",")
    $Time = StringLeft($FileContext, $Pos -
1)

    $Date = _DateAdd("s", $Time, _Now())
    MsgBox(64,"提示","商品的拍卖截止时间是:" & $Date
)
EndFunc


P.S. 代码中可以使用正则表达式来提取剩余时间,同时还可以提取出网页标题,与截止时间一起显示,效果更好,如果需要的话,自己动手吧~

另外,我的 Google 站点上说什么也传不上去文件了,如果需要编译好的程序请把电子信箱留下。

  评论这张
 
阅读(1092)| 评论(8)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017