定时打开网页或者文件

软件简介：
个人广告时间
vb编程爱好者群：33688827 vb黑客群：37498778
+ X, l$ R: ?0 r+ z% |欢迎大家交流，现在正在招集vb狂热爱好者若干（十人左右，多名成员及一名队长)
6 I# U3 T6 l0 Y  Q. O8 f3 i条件如下：1.在校大学生（无论专科还是本科，最好是计算机相关专业）2.有团队精神和团队意识，以团队合作为大局3.有个人电脑，充足的上网时间（一周在10小时以上）4.以vb编程为主（有一定vb基础，各个成员可根据自身要求掌握其他编程语言），交流vb编程经验，合作编程和黑客技术 5.有意者请将个人详细网络信息（包括网名，QQ，电子邮箱，上网时间和上网时段，擅长何种编程语言）及所在大学（不要求真实姓名，其他资料一定要真实）发送到我的邮箱fitgore@126.com 6.队长要求：有稳定工作，有远大抱负，有组织交流沟通能力，有团队精神，吃苦耐劳，有深厚的vb编程经验 7.最重要的就是有诚信，没诚信不要来 8.团队运作时间：暑假
1 W9 n$ U$ x/ T/ G; t7 l+ x－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
9 {& T  t8 A1 w% G9 Q. G vb定时打开网页或者文件
大家好，我是fitgore，QQ564657791，
很久没有写过教程了，今天心血来潮，随便写写吧了
大家应该都知道有种病毒是定期发作，例如情人节2月14，又或者愚人节4月1日发作，
6 a2 ~. O8 c3 X7 t( ^6 \总之就是的特定时间或者特定时段病毒就会爆发，今天我们教程就是利用到这个原理。
! r4 @, {8 ^; u6 O说了出来大家都明白了吧，其实很简单，用到timer控件就行了，
9 z* s2 g" u- j. P6 o/ r大家看到这里应该都明白了吧，闲话少说，打开vb6，新建标准exe 添加timer控件
好，，刚才忘了设置interval 郁闷啊，设置成1000吧，
8 Z' q. o$ u0 G. q- I" }要记住，忘了就没效果呵呵，打开了吧，
api函数声明
Private Declare Function ShellExecute Lib shell32.dll Alias ShellExecuteA (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
0 B7 r9 @) \) R这是打开网页，用到shellexecute函数，打开文件也是用到shellexecute函数
Private Sub Timer1_Timer()
Dim xianzai As Date
# l' ~4 b+ l2 F/ S( O! y' Exianzai = 发作时间
If Time() = xianzai Then
ShellExecute hWnd, open, http://www.baidu.com, vbNullString, vbNullString, conSwNormal
& ]( n# V" [" ^! fEnd If
+ g$ X  w* n: B4 P, ?" _End Sub
2 n% I4 V+ G. x9 R) u4 U/ M, Q6 k等他发作吧，网页打开了，定时打开网页就是这样简单
7 f# K# A/ F. L7 D8 i换成打开程序也一样，这里就不在演示了，好教程就到这里，我是fitgore QQ564657791
1 R- m; x1 V' l& ~, X' AShellExecute Me.hWnd, open, C:\Program Files\Maxthon2\Maxthon.exe, , , 1
& H  }/ O! U9 ?  @6 C: u5 @
888888888888888888888888
下载地址：

2008-8-18 15:40 上传 定时打开网页或者文件.rar

下载权限:

版本vip会员

本地下载 检测资源   提取码: 需要终身vip或更高权限

有些游戏资源需要vip下载开通请点击开通vip