vb网络编程高手:请看csdn中的这个问题如何解决?

hkdavis 2000-07-02 05:08:00
http://expert.csdn.net/TopicView.asp?id=13513
...全文
225 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
skt985 2001-06-01
  • 打赏
  • 举报
回复
19869关注!
hkdavis 2000-07-04
  • 打赏
  • 举报
回复
这个vb程序为何导致死机?
程序的功能是每隔半分钟就运行一次webbrowser.exe(浏览一个网址),5秒钟后关闭浏览器,这个程序从8:00到17:00一直在运行,但运行六个小时后死机了?请问是什么原因?没有真正结束webbrowser.exe?

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Dim num As Integer
Private Sub Form_Load()
Timer1.Interval = 5000
Timer1_Timer
End Sub

Private Sub Timer1_Timer()
Static sngOldTime As Single
Dim sngt As Single
sngt = Timer
If sngt >= 8 * 3600! Then



If sngt < 18 * 3600! Then

If Abs(sngt - sngOldTime) >= 30 Then

sngOldTime = sngt
num = num + 1
Label1.Caption = num
i = Shell("f:\webbrowser.exe", 1)
'执行webbrowser.exe这个程序
Sleep 50000
pausetask "webbrowser"
'关闭这个程序
End If

End If
End If


hkdavis 2000-07-04
  • 打赏
  • 举报
回复
http://expert.csdn.net/TopicView.asp?id=13411

1,502

社区成员

发帖
与我相关
我的任务
社区描述
VB 网络编程
社区管理员
  • 网络编程
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧