awfymwvf 发表于 2010-5-21 08:37:05

（已解决）求助，AU3是不是不能创建一个文件啊？

本帖最后由 awfymwvf 于 2010-5-21 09:01 编辑

我想让程序在点一下“创建”后。在C盘根目录下创建一个A.BAT文件，可是我看了很久帮助。也没找到创建的函数，是不能还是怎么做呢。谢谢大家了#include <GUIConstants.au3>
#include <WindowsConstants.au3>

dim $Form1,$check4

Opt("GUIOnEventMode", 1)
OnAutoItExitRegister("Quit")

$Form1=GUICreate ( "建立文件测试", 484, 273,-1,-1,BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")
GUISetState (@SW_SHOW,$Form1)

$check4=GUICtrlCreateCheckbox("创建", 20,235,50,25)
GUICtrlSetOnEvent($check4, "check4")

While 1
Sleep(1000)
WEnd

Func check4()
      ;在这添加创建文件的代码
EndFunc

Func Quit()
    GUISetState(@SW_HIDE)
    Exit
EndFunc在二楼兄弟的帮助下，已成功解决。可用filewrite来创建。谢谢了。

kxing 发表于 2010-5-21 08:47:05

bat的不就是纯文本吗?
会不会创建记事本呢?
filewrite("a.bat","echo hello!"&@lf&"pause")

awfymwvf 发表于 2010-5-21 08:57:37

回复 2# kxing

要是用FILEWRITE之前。这个A。BAT文件不存在，能自动创建吗？

水木子 发表于 2010-5-21 09:04:42

笨办法！FileWrite(@ScriptDir & '\批处理.txt', '这里是的批处理内容')
FileMove(@ScriptDir & '\批处理.txt', @ScriptDir & '\批处理.bat')

qj395202409 发表于 2010-5-21 09:08:32

又学了一招啊~~~~~

lynfr8 发表于 2010-5-21 12:20:37

本帖最后由 lynfr8 于 2010-5-21 12:21 编辑

_FileCreate 即可轻松解决楼主创建文件的问题#include <File.au3>
If Not _FileCreate("error.bat") Then
   MsgBox(4096,"Error", " Error Creating error.bat.      error:" & @error)
EndIf
$file = FileOpen("error.bat", 1)
If $file = -1 Then
    MsgBox(0, "错误", "不能打开error.bat.")
    Exit
EndIf
FileWrite($file, "Line1")
FileWrite($file, "Still Line1" & @CRLF)
FileWrite($file, "Line2")
FileClose($file)
页: [1]
查看完整版本: （已解决）求助，AU3是不是不能创建一个文件啊？