乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 92|回复: 6

取得本dll路径的方法及按键Hook的方法

[复制链接]

14

主题

43

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
99
发表于 2012-8-4 10:46:00 | 显示全部楼层 |阅读模式
[code]
  public static class Xsys
  {
    ///
    /// 取得本dll的路径
    ///
    ///
    public static string GetAssemblyPath()
    {
      string _CodeBase = System.Reflection.Assembly.GetExecutingAssembly().CodeBase;
      _CodeBase = _CodeBase.Substring(8, _CodeBase.Length - 8);    // 8是 file:// 的长度
      string[] arrSection = _CodeBase.Split(new char[] { '/' });
      string _FolderPath = "";
      for (int i = 0; i 复制代码
回复

使用道具 举报

84

主题

543

帖子

12

银币

中流砥柱

Rank: 25

铜币
886
发表于 2012-8-4 16:50:00 | 显示全部楼层
获取的路径没有程序名称
回复

使用道具 举报

14

主题

43

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
99
发表于 2012-8-4 22:10:00 | 显示全部楼层
第11行时,已取得成功。只是我故意做的过滤,只取路径
回复

使用道具 举报

14

主题

80

帖子

7

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
136
发表于 2012-8-5 23:15:00 | 显示全部楼层
这样行不行
string _CodeBase = System.Reflection.Assembly.GetExecutingAssembly().CodeBase
_CodeBase.Substring(0 , _CodeBase.LastIndexOf('\') )
回复

使用道具 举报

14

主题

43

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
99
发表于 2012-8-7 08:37:00 | 显示全部楼层
可能更好,
回复

使用道具 举报

10

主题

45

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
85
发表于 2012-9-6 12:57:00 | 显示全部楼层
Dim Mnetp As String = Microsoft.VisualBasic.Compatibility.VB6.Support.GetPath()
        Dim Mnetn As String = Microsoft.VisualBasic.Compatibility.VB6.Support.GetEXEName()
simple and work well! Though old.
回复

使用道具 举报

5

主题

14

帖子

1

银币

初来乍到

Rank: 1

铜币
34
发表于 2012-9-17 14:31:00 | 显示全部楼层
请问一下您是CAD200几的,我2008的好像不行!
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-6-29 14:12 , Processed in 1.113039 second(s), 66 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表