Оптимизация скрипта

necrobit · 28 Авг 2016

есть скрипт для работы с текстом , тхт файлы имеют достаточно большой объём по 300-400мб
с мелкими фаликами скрипт справляется на ура но при попытке работы с большими это невозможно , потребление озу будет расти до тех пор пока забьётся полностью и покажет ошибку "error allock memory"
есть ли этому какое то решение

Prog · 28 Авг 2016

necrobit [?]

есть ли этому какое то решение

Без модификации кода, собираете 64 битную прогу и запускаете ее на компе с как можно большим количеством оперативки. 32 ГБ думаю хватит.

А если нужна оптимизация, то нужно знать что оптимизировать. Без кода могу только посоветовать загружать файл не целиком, а частями, допустим по 10 МБ.

necrobit · 28 Авг 2016

Prog сказал(а):
necrobit [?]

есть ли этому какое то решение

Нажмите, чтобы раскрыть...

Без модификации кода, собираете 64 битную прогу и запускаете ее на компе с как можно большим количеством оперативки. 32 ГБ думаю хватит.

А если нужна оптимизация, то нужно знать что оптимизировать. Без кода могу только посоветовать загружать файл не целиком, а частями, допустим по 10 МБ.

64 битная версия так же не отрабатывает , грузить файлы по 10 мб вообще не вариант
сам код

Код:

#include <SQLite.au3>
#include <SQLite.dll.au3>

$file=FileRead(@ScriptDir&'\1.txt')
$str=StringRegExp($file,'[^;:\r\n]+',3)


Local $aResults, $iRows, $iColumns

            _SQLite_Startup()
            Select
                Case @error
                    MsgBox(32, '', 'невозможно работать с db')
                    Exit 1111
            EndSelect
            $hDb_mem = _SQLite_Open()


    _SQLite_Exec($hDb_mem, 'create table if not exists t1 (a,b,c text);')
    _SQLite_Exec($hDb_mem, 'create table if not exists t2 (a,b,c text);')
    $zzz=''
    For $i = 0 To UBound($str)-1 Step 3
        $zzz&='insert into t1 values ("' & $str[$i] & '","' & $str[$i+1] & '","' & $str[$i+2]& '");'
    Next
    $file=FileRead(@ScriptDir&'\2.txt')
    $str1=StringRegExp($file,'[^;:\r\n]+',3)
    For $i = 0 To UBound($str1)-1 Step 3
        $zzz&='insert into t2 values ("' & $str1[$i] & '","' & $str1[$i+1] & '","' & $str1[$i+2]& '");'
    Next
    _SQLite_Exec($hDb_mem, "begin;")
    _SQLite_Exec($hDb_mem, $zzz)
    _SQLite_Exec($hDb_mem, "commit;")

    _SQLite_GetTable2d($hDb_mem, 'select t1.a,t2.c from t1,t2 where t1.b=t2.a and t1.c=t2.b;', $aResults, $iRows, $iColumns)
    $zzz=''
    For $i = 1 To  UBound($aResults)-1
        $zzz&=$aResults[$i][0]&':'&$aResults[$i][1]& @CRLF
    Next
    FileWrite(@ScriptDir&'\result.txt',$zzz)
_SQLite_Close($hDb_mem)
_SQLite_Shutdown()

sngr · 28 Авг 2016

Код:

#include <SQLite.au3>
#include <SQLite.dll.au3>

$file=FileRead(@ScriptDir&'\1.txt')
$str=StringRegExp($file,'[^;:\r\n]+',3)
$file=0

Local $aResults, $iRows, $iColumns

            _SQLite_Startup()
            Select
                Case @error
                    MsgBox(32, '', 'невозможно работать с db')
                    Exit 1111
            EndSelect
            $hDb_mem = _SQLite_Open()


    _SQLite_Exec($hDb_mem, 'create table if not exists t1 (a,b,c text);')
    _SQLite_Exec($hDb_mem, 'create table if not exists t2 (a,b,c text);')
    $zzz=''
    For $i = 0 To UBound($str)-1 Step 3
        $zzz&='insert into t1 values ("' & $str[$i] & '","' & $str[$i+1] & '","' & $str[$i+2]& '");'
    Next
	$str=0
    $file=FileRead(@ScriptDir&'\2.txt')
    $str1=StringRegExp($file,'[^;:\r\n]+',3)
    For $i = 0 To UBound($str1)-1 Step 3
        $zzz&='insert into t2 values ("' & $str1[$i] & '","' & $str1[$i+1] & '","' & $str1[$i+2]& '");'
    Next
	$str1=0
	$file=0
    _SQLite_Exec($hDb_mem, "begin;")
    _SQLite_Exec($hDb_mem, $zzz)
    _SQLite_Exec($hDb_mem, "commit;")

    _SQLite_GetTable2d($hDb_mem, 'select t1.a,t2.c from t1,t2 where t1.b=t2.a and t1.c=t2.b;', $aResults, $iRows, $iColumns)
    $zzz=''
    For $i = 1 To  UBound($aResults)-1
        $zzz&=$aResults[$i][0]&':'&$aResults[$i][1]& @CRLF
    Next
$aResults=0
	_SQLite_Exec($hDb_mem, 'drop table if exists t1;')
	_SQLite_Exec($hDb_mem, 'drop table if exists t2;')
    FileWrite(@ScriptDir&'\result.txt',$zzz)
	$zzz=''
_SQLite_Close($hDb_mem)
_SQLite_Shutdown()

necrobit · 28 Авг 2016

sngr сказал(а):

Код:

#include <SQLite.au3>
#include <SQLite.dll.au3>

$file=FileRead(@ScriptDir&'\1.txt')
$str=StringRegExp($file,'[^;:\r\n]+',3)
$file=0

Local $aResults, $iRows, $iColumns

            _SQLite_Startup()
            Select
                Case @error
                    MsgBox(32, '', 'невозможно работать с db')
                    Exit 1111
            EndSelect
            $hDb_mem = _SQLite_Open()


    _SQLite_Exec($hDb_mem, 'create table if not exists t1 (a,b,c text);')
    _SQLite_Exec($hDb_mem, 'create table if not exists t2 (a,b,c text);')
    $zzz=''
    For $i = 0 To UBound($str)-1 Step 3
        $zzz&='insert into t1 values ("' & $str[$i] & '","' & $str[$i+1] & '","' & $str[$i+2]& '");'
    Next
	$str=0
    $file=FileRead(@ScriptDir&'\2.txt')
    $str1=StringRegExp($file,'[^;:\r\n]+',3)
    For $i = 0 To UBound($str1)-1 Step 3
        $zzz&='insert into t2 values ("' & $str1[$i] & '","' & $str1[$i+1] & '","' & $str1[$i+2]& '");'
    Next
	$str1=0
	$file=0
    _SQLite_Exec($hDb_mem, "begin;")
    _SQLite_Exec($hDb_mem, $zzz)
    _SQLite_Exec($hDb_mem, "commit;")

    _SQLite_GetTable2d($hDb_mem, 'select t1.a,t2.c from t1,t2 where t1.b=t2.a and t1.c=t2.b;', $aResults, $iRows, $iColumns)
    $zzz=''
    For $i = 1 To  UBound($aResults)-1
        $zzz&=$aResults[$i][0]&':'&$aResults[$i][1]& @CRLF
    Next
$aResults=0
	_SQLite_Exec($hDb_mem, 'drop table if exists t1;')
	_SQLite_Exec($hDb_mem, 'drop table if exists t2;')
    FileWrite(@ScriptDir&'\result.txt',$zzz)
	$zzz=''
_SQLite_Close($hDb_mem)
_SQLite_Shutdown()

32 битный также ругается на нехватку памяти , 64 битный пишет что невозможно работать с db

sngr · 28 Авг 2016

Код:

#include <SQLite.au3>
#include <SQLite.dll.au3>

$file=FileRead(@ScriptDir&'\1.txt')
$str=StringRegExp($file,'[^;:\r\n]+',3)
$file=0

Local $aResults, $iRows, $iColumns

            _SQLite_Startup()
            Select
                Case @error
                    MsgBox(32, '', 'невозможно работать с db')
                    Exit 1111
            EndSelect
            $hDb_mem = _SQLite_Open(@ScriptDir & '\zzz.db')


    _SQLite_Exec($hDb_mem, 'create table if not exists t1 (a,b,c text);')
    _SQLite_Exec($hDb_mem, 'create table if not exists t2 (a,b,c text);')
    $zzz=''
    For $i = 0 To UBound($str)-1 Step 3
        $zzz&='insert into t1 values ("' & $str[$i] & '","' & $str[$i+1] & '","' & $str[$i+2]& '");'
    Next
	$str=0
    $file=FileRead(@ScriptDir&'\2.txt')
    $str1=StringRegExp($file,'[^;:\r\n]+',3)
    For $i = 0 To UBound($str1)-1 Step 3
        $zzz&='insert into t2 values ("' & $str1[$i] & '","' & $str1[$i+1] & '","' & $str1[$i+2]& '");'
    Next
	$str1=0
	$file=0
    _SQLite_Exec($hDb_mem, "begin;")
    _SQLite_Exec($hDb_mem, $zzz)
    _SQLite_Exec($hDb_mem, "commit;")

    _SQLite_GetTable2d($hDb_mem, 'select t1.a,t2.c from t1,t2 where t1.b=t2.a and t1.c=t2.b;', $aResults, $iRows, $iColumns)
    $zzz=''
    For $i = 1 To  UBound($aResults)-1
        $zzz&=$aResults[$i][0]&':'&$aResults[$i][1]& @CRLF
    Next
	_SQLite_Exec($hDb_mem, 'drop table if exists t1;')
	_SQLite_Exec($hDb_mem, 'drop table if exists t2;')
    FileWrite(@ScriptDir&'\result.txt',$zzz)
	$zzz=''
_SQLite_Close($hDb_mem)
_SQLite_Shutdown()
FileDelete(@ScriptDir & '\zzz.db')

necrobit · 29 Авг 2016

sngr сказал(а):

Код:

#include <SQLite.au3>
#include <SQLite.dll.au3>

$file=FileRead(@ScriptDir&'\1.txt')
$str=StringRegExp($file,'[^;:\r\n]+',3)
$file=0

Local $aResults, $iRows, $iColumns

            _SQLite_Startup()
            Select
                Case @error
                    MsgBox(32, '', 'невозможно работать с db')
                    Exit 1111
            EndSelect
            $hDb_mem = _SQLite_Open(@ScriptDir & '\zzz.db')


    _SQLite_Exec($hDb_mem, 'create table if not exists t1 (a,b,c text);')
    _SQLite_Exec($hDb_mem, 'create table if not exists t2 (a,b,c text);')
    $zzz=''
    For $i = 0 To UBound($str)-1 Step 3
        $zzz&='insert into t1 values ("' & $str[$i] & '","' & $str[$i+1] & '","' & $str[$i+2]& '");'
    Next
	$str=0
    $file=FileRead(@ScriptDir&'\2.txt')
    $str1=StringRegExp($file,'[^;:\r\n]+',3)
    For $i = 0 To UBound($str1)-1 Step 3
        $zzz&='insert into t2 values ("' & $str1[$i] & '","' & $str1[$i+1] & '","' & $str1[$i+2]& '");'
    Next
	$str1=0
	$file=0
    _SQLite_Exec($hDb_mem, "begin;")
    _SQLite_Exec($hDb_mem, $zzz)
    _SQLite_Exec($hDb_mem, "commit;")

    _SQLite_GetTable2d($hDb_mem, 'select t1.a,t2.c from t1,t2 where t1.b=t2.a and t1.c=t2.b;', $aResults, $iRows, $iColumns)
    $zzz=''
    For $i = 1 To  UBound($aResults)-1
        $zzz&=$aResults[$i][0]&':'&$aResults[$i][1]& @CRLF
    Next
	_SQLite_Exec($hDb_mem, 'drop table if exists t1;')
	_SQLite_Exec($hDb_mem, 'drop table if exists t2;')
    FileWrite(@ScriptDir&'\result.txt',$zzz)
	$zzz=''
_SQLite_Close($hDb_mem)
_SQLite_Shutdown()
FileDelete(@ScriptDir & '\zzz.db')

оба варианта скомпилированного скрипта выдают невозможно работать с db

Skif_off · 3 Сен 2016

necrobit сказал(а):
оба варианта скомпилированного скрипта выдают невозможно работать с db

Положите рядом со скриптом SQLite3.dll и SQLite3_x64.dll.

Автор темы	Похожие темы	Форум	Ответы	Дата
R	Оптимизация скрипта.	Общие вопросы по AutoIt	2	31 Июл 2024
G	Оптимизация и повышение скорости работы скрипта	Общие вопросы по AutoIt	4	3 Янв 2021
G	Попытка оптимизация скрипта	Общие вопросы по AutoIt	8	3 Ноя 2016
D	Оптимизация скрипта с использованием Excel функций	Общие вопросы по AutoIt	0	28 Авг 2015
D	Оптимизация скрипта с функцией PixelSearch	Общие вопросы по AutoIt	6	12 Авг 2015

Поиск

Поиск

Оптимизация скрипта

necrobit

Новичок

Prog

Продвинутый

necrobit

Новичок

sngr

AutoIT Гуру

necrobit

Новичок

sngr

AutoIT Гуру

necrobit

Новичок

Skif_off

Знающий