博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

12 2009 档案

摘要:1.下载regtop:http://download.csdn.net/source/19179252.写一个批处理文件,内容如下:regtop -g "-w:http://forum.csdn.net/BList/Other" "csdn.txt" "href="(http://topic.csdn.net/u/.*?)"[\s\S]*?color_silver[\s\S]*?/td\s*?td\s*(\d\d\d)\s*?/td" 0,0,1type csdn.txtpause3.将上述批处理放在regtop.exe的旁边,然后双击运行4.效果图:AdWare should s 阅读全文

posted @ 2009-12-17 17:40 随风飘零0 阅读(144) 评论(0) 推荐(0)

摘要:Option ExplicitConst SETFILE = "C:\Documents and Settings\Administrator\Application Data\Pandion\Profiles\{USER}@messiahrpe\settings.xml"Dim strSetFile As StringDim objTimer As New clsWaitableTimerDim strLastWeatherInfo As StringSub Main() Dim strData$, strWeather$, strLog$ Dim reg As Object Dim mat 阅读全文

posted @ 2009-12-14 12:50 随风飘零0 阅读(281) 评论(0) 推荐(0)

摘要:DSC-TX1IXUS870IXUS110IXUS95F75驱动,office软件,Winrar解压缩软件,360,一键恢复,Winamp播放器,千千静听,暴风影音,PPS网络电视,迅雷,搜狗拼音,万能五笔,QQ2009,连连看,祖玛越狱 24(反恐24小时) sex and the city[10:41] gossip girl[10:41] desperate housewives 阅读全文

posted @ 2009-12-07 00:04 随风飘零0 阅读(119) 评论(0) 推荐(0)

摘要:Option ExplicitPrivate Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As LongPrivate Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, Optional ByVal wFlags As Long = 0&) As LongPrivate Declare Function DrawMenuBar Lib "u 阅读全文

posted @ 2009-12-03 10:53 随风飘零0 阅读(746) 评论(0) 推荐(0)

摘要:Option ExplicitPrivate Declare Function ReleaseCapture Lib "user32" () As LongPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As LongConst HTCAPTION = 2Const WM_NCLBUTTONDOWN = &HA1Private Sub Form_ 阅读全文

posted @ 2009-12-03 08:54 随风飘零0 阅读(1347) 评论(0) 推荐(0)