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

[AU3基础] 保存文件问题

[复制链接]
发表于 2010-11-29 17:04:40 | 显示全部楼层 |阅读模式
偶是菜鸟,在别处搜来一个截图的,保存位置和命名很不爽,  

_ScreenCapture_SaveImage(@ScriptDir & '\截图-' & $counts & '.jpg', $hBitmap)



可以帮我改到(我的文档\图片\)下按年月日后面递增01,02,03吗,有同名文件就递增
 楼主| 发表于 2010-11-29 17:59:16 | 显示全部楼层
没人帮帮我吗
发表于 2010-11-29 17:59:57 | 显示全部楼层
楼主,截图的时候就可以直接保存了啊,在我这里试的时候发现创建文件夹“我的文档\图片\”时 “图片” 两个字是乱码,不知道什么原因。

#Include <File.au3>
#Include <Array.au3>
#include <ScreenCapture.au3>

$Dir = @MyDocumentsDir & "\截图"

If FileExists($Dir) = 0 Then DirCreate($Dir)

For $i = 1 To 5
        $FileList = _FileListToArray($Dir, @YEAR & @MON & @MDAY & "*.jpg")

        If @Error = 1 Or @Error = 4 Then
                $Num = 1
        Else
                $Num = UBound($FileList)
        EndIf
        _ScreenCapture_Capture($Dir & "\" & @YEAR & @MON & @MDAY & StringFormat("%02i", $Num) & ".jpg", 0, 0, 200, 200)
Next

ShellExecute($Dir)
 楼主| 发表于 2010-11-29 18:09:45 | 显示全部楼层
没事,我先创建好就行了,谢了
 楼主| 发表于 2010-11-29 18:18:34 | 显示全部楼层
没事,我先创建好就行了,谢了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-14 20:03 , Processed in 0.076772 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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