| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 5331 人关注过本帖
标题:VB运行exe文件(文件已捆绑木马)
取消只看楼主 加入收藏
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
 问题点数:0 回复次数:5 
VB运行exe文件(文件已捆绑木马)
各位朋友大家好啊~~刚刚我做叫朋友帮我写了个免杀马~~

现在正愁~小马的宣传哦~~ 我就想出一个思路~~可能有点幼稚~


就是需要用到 commond 控件~~ 其他的用label text 等等的我自己会去装饰一下的了~~

我现在就是不知道怎么用commond 去运行自己的木马~~


例如现在有一个文件夹 123456 里面有一个叫ABC.exe的文件(这个就是我自己的小马了)

我应该怎么去打开它?(用shell????)

我现在想问的问题呢~~

问题一:

就是如果把123456这个文件夹隐藏了~~应该怎么去打开~

问题二:
在我的机子上 ~~这个小马是绝对路径了~~但是到别人的机子上是什么路径我也不清楚~~ 这样子会造成运行错误~~~ 所以我想问~如果要生成exe文件 应该怎么去安放我小马的位置呢???

还有......暂时没想到~~~有待发现~嘿嘿~~~~

先谢谢大家了~~

[此贴子已经被作者于2007-10-31 8:52:57编辑过]

搜索更多相关主题的帖子: 木马 exe 文件 捆绑 shell 
2007-10-31 08:50
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
得分:0 
我是刚学VB没多久~~~嘿嘿~~~现在只是看看书本~自学~~~

所以请各位大虾指点一下迷津~~
2007-10-31 08:52
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
得分:0 

以下是引用随风逐流在2007-10-31 8:53:58的发言:
.................
在百度搜索到了~~app.path的用法~~


程 序 开 启 文 件 时 , 若 没 有 指 定 文 件 的 目 录 , 则 所 开 启的
将 是 「 目 前 目 录 」 的 文 件 , 但 目 前 目 录 是 经 常 改 变 的,
如 果 指 定 目 录 , 则 将 来 安 装 程 序 时 , 被 开 启 的 文 件 必须
安 装 于 指 定 目 录 中 , 比 较 没 有 弹 性 。
解 决 以 上 问 题 的 方 法 利 用 以 下 方 法 开 启 文 件 :
Open App.Path + "\" + "文件名称" For ┅
并 且 将 被 开 启 的 文 件 与 可 执 行 文 件 放 在 同 一 目 录 即 可 ,
因为 App.Path 所 代 表 的 就 是 应 用 程 序 所 在 的 目 录 。
不 过 使 用 App.Path 有 一 件 事 情 要 特 别 注 意 , 当 App.Path 位于
根 目 录 时 , 则 App.Path 最 右 边 的 字 符 为 "\", 例 如 "c:\", 但
如 果 App.Path 不 在 根 目 录 , 则 App.Path 最 右边 的 字 符 不 为 "\",
例 如 "d:\kj\app1", 因 此欲 求 取 应 用 程 序 所 在 目 录 某 一 文 件
的 完 整 路 径 名 称 , 应该 使 用 以 下 方 法 :
Dim fullpath As String
If Right(App.Path, 1) = "\" Then ' 若 App.Path 为根目录
fullpath = App.Path + "文件名称"
Else
fullpath = App.Path + "\" + "文件名称"
End If
' fullpath 等于 "文件名称" 的完整路径名称

但是有点不是很明白`~~~


这句话~~
当 App.Path 位于
根 目 录 时 , 则 App.Path 最 右 边 的 字 符 为 "\", 例 如 "c:\", 但
如 果 App.Path 不 在 根 目 录 , 则 App.Path 最 右边 的 字 符 不 为 "\",
例 如 "d:\kj\app1", 因 此欲 求 取 应 用 程 序 所 在 目 录 某 一 文 件
的 完 整 路 径 名 称 ,

如果生成的EXE文件在 d:\56789\45678

呢~~~上面的"If Right(App.Path, 1) = "\" Then ' 若 App.Path 为根目录"
偶没看懂

2007-10-31 09:15
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
得分:0 

Dim fullpath As String
If Right(App.Path, 1) = "\" Then ' 若 App.Path 为根目录
fullpath = App.Path + "文件名称"
Else
fullpath = App.Path + "\" + "文件名称"
End If
' fullpath 等于 "文件名称" 的完整路径名称


现在看了看这个~~~~

fullpath = App.Path + "文件名称 '这个是运行 c:\文件名称(不包含\的路径)

Else

fullpath = App.Path + "\" + "文件名称" '这个是 c:\("文件名称"包含\的路径)

如果我上面的理解正确的话~~那我就是了解了~~~

如果不正确...........

现在在学校的网络机房~~~没下载VB 郁闷~~没有时间~~~~~

2007-10-31 09:30
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
得分:0 
以下是引用purana在2007-10-31 10:16:54的发言:
App.Path就是你保存工程的目录..不就完事了?..

哈哈~~真的吖?? 那我等等去试试~~



论坛其实可以搞点编程的比赛 或者是出点题目给我们做哦~~~

记得要分等级~~~~

2007-11-01 08:24
happiness520
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-10-17
收藏
得分:0 

哈哈~其实也就是学学抓鸡鸡~~135 1433  3389  抓都不怎么好玩~~

出去试其他的玩玩嘛

2007-11-05 19:45
快速回复:VB运行exe文件(文件已捆绑木马)
数据加载中...
 
   



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

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