首页
社区
课程
招聘
[旧帖] [原创]自己用汇编写的网页刷新器 0.00雪花
发表于: 2010-1-19 20:00 2962

[旧帖] [原创]自己用汇编写的网页刷新器 0.00雪花

2010-1-19 20:00
2962

闷 我太粗心了 改了下  

                .386
                .model flat, stdcall
                option casemap :none

include                windows.inc
include         shell32.inc
includelib      shell32.lib
include                user32.inc
includelib        user32.lib
include                kernel32.inc
includelib        kernel32.lib
include         comdlg32.inc
includelib      comdlg32.lib

ICO_MAIN        equ                1000h        ;图标
DLG_MAIN        equ                1
IDC_TIME        equ               2
IDC_WEB         equ                 3
IDC_END         equ                4
IDC_TIMER1       equ             5
IDC_ON          equ            100
IDC_OFF          equ          101
                .data?

hInstance       dd           ?
dwTime          dd           ?
hIDOK           dd           ?
szBuffer       db    256 dup(?)
szBuff         db    256 dup(?)            
IDC_FLAGS       dd      ?                      
Every           dd      ?
hIDC_WEB       dd      ?
hIDC_TIME      dd      ?
               .const
sz1            dd         'wo',0
               .code

_ProcDlg       proc     uses   ebx edi esi hWnd,wMsg,wParam,lParam
       
                      
                        
                        
                        mov     eax,wMsg                        
                        .if     eax == WM_TIMER                            
                                mov eax,Every                            
                                xchg dwTime,esi
                                inc esi
                                xchg dwTime,esi
                                cmp eax,dwTime                            
                                jne  over                               
                                je  baidu
                           
                          baidu:
                         
                                      invoke ShellExecute,NULL,NULL ,addr szBuff,NULL,NULL,SW_SHOW
                                      mov  eax,30h
                                      mov  dwTime,eax
                               
                         over:   xor eax,eax
                        
                        .elseif     eax ==   WM_CLOSE
                                invoke   ExitProcess,NULL
                               
                        .elseif eax ==   WM_INITDIALOG
                                mov      esi,30h
                                mov      dwTime,esi
                                invoke   LoadIcon,hInstance,ICO_MAIN
                                invoke   SendMessage,hWnd,WM_SETICON,ICON_BIG,eax
                               
                               
                        .elseif eax ==   WM_COMMAND
                                mov      eax,wParam
                               
                                .if      ax ==  IDC_END
                                         invoke       EnableWindow,hIDOK,TRUE
                                         invoke  EnableWindow,hIDC_TIME,TRUE
                                          invoke  EnableWindow,hIDC_WEB,TRUE
                                         mov     eax,IDC_OFF
                                         mov     IDC_FLAGS,eax       
                                         mov     eax,30h
                                           mov     dwTime,eax                                                                                                                                                                                                                                                                                                                                                                                                                                                               
                                         invoke  KillTimer,hWnd,IDC_TIMER1
                                .elseif  ax ==   IDOK
                                         .if   IDC_FLAGS==IDC_ON
                                               xor  eax,eax                                              
                                               jmp  last
                                            .endif
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                
                                           mov     ebx,IDC_ON
                                           mov     IDC_FLAGS,ebx
                                         invoke  GetDlgItemText,hWnd,IDC_TIME,addr szBuffer,sizeof szBuffer
                                         invoke  GetDlgItemText,hWnd,IDC_WEB,addr szBuff,sizeof szBuff
                                         mov     eax,dword ptr szBuffer
                                        \
                                         mov     Every,eax
                                                                                  
                                         invoke  SetTimer,hWnd,IDC_TIMER1,60000,NULL
                                         invoke  GetDlgItem,hWnd,IDOK                                        
                                         mov     hIDOK,eax
                                         invoke  EnableWindow,hIDOK,FALSE
                                         invoke  GetDlgItem,hWnd,IDC_TIME                                       
                                         mov     hIDC_TIME,eax
                                         invoke  EnableWindow,hIDC_TIME,FALSE
                                         invoke  GetDlgItem,hWnd,IDC_WEB                                       
                                         mov     hIDC_WEB,eax                                        
                                         invoke  EnableWindow,hIDC_WEB,FALSE                                 
                                         invoke ShellExecute,NULL,NULL ,addr szBuff,NULL,NULL,SW_SHOW
                           
                               
                                .endif
                          
                           
                                .else
                         
                          last:
                                   mov        eax,FALSE
                        ret
                .endif
                mov        eax,TRUE
                ret                           
                     
     

_ProcDlg endp

               
               
start:         invoke   GetModuleHandle,NULL
               mov      hInstance,eax
               invoke   DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlg,NULL
               invoke   ExitProcess,NULL
               
               
               end      start

资源文件

//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
#include                <resource.h>
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
#define        ICO_MAIN                1000
#define        DLG_MAIN                1
#define IDC_TIME                2
#define IDC_END                      4
#define IDC_WEB                3
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
ICO_MAIN        ICON                "Main.ico"
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
DLG_MAIN DIALOG 111, 104, 201, 57
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "网页刷新器"
FONT 9, "宋体"
{
LTEXT "网站", -1, 7, 8, 25, 8
EDITTEXT IDC_WEB, 35, 5, 160, 12, ES_AUTOHSCROLL | WS_BORDER | WS_TABSTOP
LTEXT "时间m", -1, 7, 25, 25, 8
EDITTEXT IDC_TIME, 35, 22, 160, 12, ES_AUTOHSCROLL | WS_BORDER | WS_TABSTOP
PUSHBUTTON "取消", IDC_END, 115, 38, 40, 14
PUSHBUTTON "执行", IDOK, 155, 38, 40, 14,  WS_TABSTOP
}
//>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>


[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)

上传的附件:
收藏
免费 7
支持
分享
最新回复 (13)
雪    币: 21
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
帮你顶个 不过 我还是不下载了 分数贵
2010-1-19 20:21
0
雪    币: 2
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
支持下好东西。
2010-1-19 20:41
0
雪    币: 8
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
确实是个好东西,不过等有钱再来下载。
2010-1-20 03:46
0
雪    币: 78
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
好东西是好东西。。不过。。下不起啊。。
2010-1-20 04:04
0
雪    币: 28
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
6
呵呵 我来看看!分贵啊
2010-1-20 18:31
0
雪    币: 505
活跃值: (15)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
支持原创,支持楼主
2010-1-20 19:00
0
雪    币: 27
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
8
嘿嘿。。。。
2010-1-20 23:58
0
雪    币: 39
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
9
有没有汇编写的网站登录
2014-4-12 16:42
0
雪    币: 12176
活跃值: (3558)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
10
晋级不了会员组呀   哎
2014-4-12 18:18
0
雪    币: 6
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
你太有耐心了
2014-4-12 19:55
0
雪    币: 1
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
谢谢分享~~~~~
2014-4-12 19:59
0
雪    币: 1
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
13
高端大气上档次
2014-4-14 10:18
0
雪    币: 5
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
14
thanks for sharing!
2014-4-15 21:59
0
游客
登录 | 注册 方可回帖
返回
//