FileReadToArray

首页  后退  前进

FileReadToArray
down2

FileReadToArray

读取指定文件到一个数组中.

 

FileReadToArray ( "filehandle/filename" )

参数

filehandle/filename

由先前调用 FileOpen() 返回的句柄. 也可以使用一个文件名作为参数.

返回值

成功:

返回一个 1 维数组, 每个元素包含文件的一个文本行并设置 @extended 为读取的行的数量

失败:

设置 @error 为非 0 值:

@error:

1 = 打开指定文件时出错.

2 = 空文件.

备注

使用 @extended 或 UBound() 检索读取的行数.

 

函数示例

#include <MsgBoxConstants.au3>
Example()
Func Example()
    ; Read the current script file into an array using the filepath.
    Local $aArray = FileReadToArray(@ScriptFullPath)
    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "There was an error reading the file. @error: " & @error) ; An error occurred reading the current script file.
    Else
        For $i = 0 To UBound($aArray) - 1 ; Loop through the array.
            MsgBox($MB_SYSTEMMODAL, "", $aArray[$i]) ; Display the contents of the array.
        Next
    EndIf
EndFunc   ;==>Example

----------------------------------------

 

该函数可以通过命令 exect 调用

参见:

FileOpen, FileReadLine, FileWrite, FileWriteLine, UBound, stringSplit

例子
copy

exect=$var_a1=FileReadToArray('%L') GLOBALEXECT<a> ;; 创建数组所选对象的示例

 

exect=$var_a1=FileReadToArray('%P%N') GLOBALEXECT<a> ;; 在光标下创建数组本本示例示例示例

 

imgpr=1 exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2),'"''"',1)||$var_af=FileReadToArray('C:\dictionary.txt')||$var_ae=_ArrayDublElem($var_ ap,$var_af,1)||$var_s=_ArrayToString($var_ae,@CRLF) bufsr=##$var_s ;; 发送到剪贴板在对话框中输入的作为字典dictionary.txt的一部分的单词的所有单词(该列表包括单词,具有给定单词的所有字母的排列而不重复字母和精确长度)

exect=$var_af=FileReadToArray('%P%N')||_ViewValues($var_af) ;; 在光标下创建数组文本文件的一个示例,并显示所有元素数组a $var_af

 

exect=$var_af=FileReadToArray('%P%N')||ClipPut($var_af[5-1]) ;; 将光标下的文件的第5行写入剪贴板

 

exect=$var_af=FileReadToArray('C:\test.txt')||ClipPut($var_af[5-1]) ;; 将c:\test.txt文件的第5行写入剪贴板

 

exect=$var_af=FileReadToArray('%P%N') GLOBALEXECT<a> ;; 在光标下创建数组一行文本文件并显示变量GLOBALEXECT的示例

 

exect=$var_af=FileReadToArray('%P%N') GLOBALEXECT<c5> ;; 将光标下的文件的第5行写入剪贴板

 

exect=$var_af=FileReadToArray('C:\test.txt') GLOBALEXECT<c5> ;; 将c:\test.txt文件的第5行写入剪贴板

up2

tcimage © Аверин Андрей для Total Commander Image Averin-And@yandex.ru