找回密码
 加入
搜索
查看: 1774|回复: 4

[系统综合] 关于读取rar数据流的问题

[复制链接]
发表于 2010-3-28 22:32:00 | 显示全部楼层 |阅读模式

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2010-3-28 22:38:20 | 显示全部楼层
什么是rar数据流?如何读取?
 楼主| 发表于 2010-3-28 23:12:35 | 显示全部楼层
本帖最后由 xlcwxl 于 2010-3-28 23:38 编辑

回复 2# afan
Func findfile()
$readfiel =GUICtrlRead($Combo1)        
$foo = Run(@ComSpec & " /c rar vb "&$readfiel&"", @ScriptDir, @SW_HIDE, $STDOUT_CHILD)
$lines = ""
While 1
$line = StdoutRead($foo)
If @error Then ExitLoop
$lines &= $line
Wend
MsgBox(0,"test",$lines)
EndFunc
发表于 2010-3-28 23:12:51 | 显示全部楼层
rar数据流?? 什么来着?
发表于 2010-3-28 23:56:26 | 显示全部楼层
Func findfile()
        $readfiel =GUICtrlRead($Combo1)
        $foo = Run(@ComSpec & ' /c rar vb "' & $readfiel & '"', @ScriptDir, 0, 2)
        $lines = ""
        While 1
                Sleep(1)
                $line = StdoutRead($foo)
                If @error Then ExitLoop
                $lines &= $line
        WEnd
        $lines = StringRegExpReplace(String($lines), '\s+$', '')
        $lines = StringRegExpReplace($lines, '\r\n', '\|')
        MsgBox(0, "test", $lines)
EndFunc   ;==>findfile
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-16 17:31 , Processed in 0.073848 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表