-1

何よりもまず、私はプログラマーではないので、これは一部の人にとっては基本的なことかもしれませんが、私にとってはそうではありません!!

達成したいタスクは、サーバーから自動的にインポートされるデータ ファイルの文字を取得することです。データは CSV またはタブ付きの .txt ファイルに行単位で保存され、各行は日付といくつかの数値で構成されます。フォーマットは常に同じで、新しい値が入力されるたびにファイルが 1 行だけ大きくなります。

私がスクリプトで行う必要があるのは、そのファイルを開いて（アドレスは既知で一定です）、最後の行を検索し、その行から文字列を抽出して別の.TXTファイルに書き込むことです。そこからインポートできます生の値として別の特定のソフトウェアに。

真ん中の部分 (文字列の抽出) はかなり単純ですが、最後の行を開いて分離するのは私には難しすぎます。

助けてくれてありがとう！

4

1 に答える 1

1 
dim path 
path = "fileName.txt"
otherOption(path)
function otherOption(fileName)
    const read = 1
    dim arrFileLines()

    set objArgs = CreateObject("scripting.FileSystemObject")
    if objArgs.FileExists(fileName) then
        set objFile = objArgs.OpenTextFile(fileName,read)
        i=0
        do until objFile.AtEndOfStream          
            redim preserve arrFileLines(i)      
            arrFileLines(i) = objFile.ReadLine  
            i = i + 1                           
        loop
        objFile.Close
    end if  
    wscript.Echo arrFileLines(i-1)
end function
于 2013-10-29T00:14:21.140 に答える