标题:[原创]半成品,感兴趣的可以捧个场
只看楼主
freeforever
Rank: 4
等 级:业余侠客
威 望:3
帖 子:368
专家分:201
注 册:2005-11-2
得分:0 
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Append As #1
'Close #1
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Input As #1
'Do While Not EOF(1)
'Line Input #1, a
'Loop
'Text4.Text = a
'Close #1

请问这段是做什么用的?

Shell "rundll32 shell32,Control_RunDLL", vbNormalFocus
那个是什么


[此贴子已经被作者于2005-11-12 15:24:54编辑过]


其实我也很无聊!
2005-11-12 15:06
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
得分:0 

IP.DRV 应该是一个 IP 地址存储表,用以存储上次成功攻击的 IP 地址。

2005-11-12 15:22
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
以下是引用freeforever在2005-11-12 15:06:38的发言:
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Append As #1
'Close #1
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Input As #1
'Do While Not EOF(1)
'Line Input #1, a
'Loop
'Text4.Text = a
'Close #1

请问这段是做什么用的?

Shell "rundll32 shell32,Control_RunDLL", vbNormalFocus
那个是什么



'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Append As #1
'Close #1
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Input As #1
'Do While Not EOF(1)
'Line Input #1, a
'Loop
'Text4.Text = a
'Close #1
这个应该是写入文件的操作,将a变量的信息写入了IP.DRV。

Shell "rundll32 shell32,Control_RunDLL", vbNormalFocus
shell函数的作用是调用其他应用程序,这里应该调用了一个rundll32的应用程序。后面应该是应用程序的参数。

2005-11-12 15:32
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
得分:0 
以下是引用yms123在2005-11-12 15:32:02的发言:

'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Append As #1
'Close #1
'Open "C:\WINDOWS\SYSTEM32\IP.DRV" For Input As #1
'Do While Not EOF(1)
'Line Input #1, a
'Loop
'Text4.Text = a
'Close #1
这个应该是写入文件的操作,将a变量的信息写入了IP.DRV。

Shell "rundll32 shell32,Control_RunDLL", vbNormalFocus
shell函数的作用是调用其他应用程序,这里应该调用了一个rundll32的应用程序。后面应该是应用程序的参数。

打开控制面板.
其实直接shell这个control就可以.


快上课了……
2005-11-12 18:34
freeforever
Rank: 4
等 级:业余侠客
威 望:3
帖 子:368
专家分:201
注 册:2005-11-2
得分:0 
谢谢大家了

[Append:]是我在跟贴时违反规定了吗?这张贴的第二页怎么没了?

求邮箱发送代码,有SMTP认证的,谢谢.

[此贴子已经被作者于2005-11-17 11:35:39编辑过]


其实我也很无聊!
2005-11-12 18:55
freeforever
Rank: 4
等 级:业余侠客
威 望:3
帖 子:368
专家分:201
注 册:2005-11-2
得分:0 
怎么我这帖子的第二页没了????

其实我也很无聊!
2005-11-17 14:47



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-33435-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.989041 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved