求助如何获取当前目录

haijie1223 · 发表于 2012-3-20 14:56:16

这个问题曾经想过，不过一直没研究出接过来。

user3000 · 发表于 2012-3-20 17:47:55

小龙的仍是获取地址栏，在地址栏随便编辑下就无意义了，其它诸如“桌面”等就不多说了
3000 的需要“标 ...
afan 发表于 2012-3-20 00:38

"后宫"...."不走寻常道的佳丽"
嗯, 我已经百分百的肯定 A大贪快手误打了好多个错字....
嗯, 一定是, 肯定是, 绝对是!

lixiaolong · 发表于 2012-3-20 19:10:36

回复 15# kxing

今天研究了一天

获取文件夹是没问题的，在地址栏编辑也没事.
就是有些，比如本地磁盘，我的文档...那些不能获取.


HotKeySet('{ESC}', 'ex')
AdlibRegister('_GetRmCurrentOpenedAddress')

While 1
        Sleep(100)
WEnd

Func _GetRmCurrentOpenedAddress()
        Local $IE, $CabinetWClass = '[CLASS:CabinetWClass]'
        Local $Shell = ObjCreate("Shell.Application")
        Local $CabinetWClass, $error, $win, $LocationURL

        If WinGetState($CabinetWClass) = 15 Then
                For $IE In $Shell.Windows()
                        ConsoleWrite($IE.LocationURL & @CRLF)
                        If StringInStr($IE.LocationURL, 'file:///') Then
                                $LocationURL = StringRegExpReplace($IE.LocationURL, 'file:///([^\r\n]+)', '\1')
                                $win = StringReplace(StringReplace($LocationURL, '%20', ' '), '/', '\')

                                        If WinActive(StringRegExpReplace($win, '.+\\([^\r\n]+)', '\1')) Then
                                                ToolTip($win)
                                                ExitLoop
                                        EndIf

                        EndIf
                        Sleep(10)
                Next
        Else
                ToolTip('')
        EndIf
EndFunc   ;==>_GetRmCurrentOpenedAddress

Func ex()
        Exit
EndFunc   ;==>ex

flyflykao · 发表于 2012-3-21 18:52:52

你们竟然无视我的回复，明显我给了正确答案

afan · 发表于 2012-3-21 19:42:13

你们竟然无视我的回复，明显我给了正确答案
flyflykao 发表于 2012-3-21 18:52

你那是脚本当前的工作目录… 并非任意打开的一个文件夹，看清楼主的意思~

netegg · 发表于 2012-3-22 15:28:45

_winapi_getprocesscommandline应该可以吧

pigWoWo · 发表于 2012-3-25 01:34:59

路过，帮顶
路过，帮顶
路过，帮顶

netegg · 发表于 2012-3-25 02:31:41

回复 19# flyflykao

你那个答案明显错了，要的不是工作目录

星雨朝霞 · 发表于 2012-3-25 11:52:59

回复 18# lixiaolong

不错!顶了!

lixiaolong · 发表于 2012-3-25 12:01:02

本帖最后由 lixiaolong 于 2012-3-25 12:23 编辑

回复 24# 星雨朝霞

刚刚发现，我那个脚本如果窗口最大化就获取不了.

知道了原因~

xz00311 · 发表于 2012-3-26 09:03:11

如果你的脚本是在当前目录的就@ScriptDir

pp648852 · 发表于 2012-3-26 20:31:52

回复 26# xz00311

看清楚，楼主不是问那么菜的问题！

		自动登录	找回密码
密码			加入

[系统综合] 求助如何获取当前目录

评分