parser

Написать ответ на текущее сообщение

 

 
   команды управления поиском

Ответ

mack 27.09.2005 14:22

Весь код
@auto[]
$connect-string[mysql://user:pass@localhost/tbl]
$MAIN:pSQL[^mysql::init[$connect-string;$.cache_dir[/../data/sql_cache]]]

@postprocess[body]
$result[$body]
^if(def $MAIN:pSQL){
	^if(def $form:mode && ^form:tables.mode.locate[field;debug]){
		^MAIN:pSQL.print_statistic[$.file[/../data/sql.txt]]
	}{
		^MAIN:pSQL.print_statistic[
			$.file[/../data/sql.log]
			$.debug_time_limit(500)
			$.debug_queries_limit(25)
#			$.debug_result_limit(3000)
#			$.is_expand_exceeded_queries_to_log(1)
		]
	}
}

@main[]
^MAIN:pSQL.server{
$tmp[^MAIN:pSQL.hash{
	SELECT object_id, title FROM object
}[][
	$.file[tbl.cfg]
]]
}
Ошибка
z:/home/test.ru/www/
write failed: Permission denied (13), actual filename 'z:/home/test.ru/www/'
z:/home/test.ru/www/../sql.p(439:8) 
--------------------------------------------------------------------------------
save z:/home/test.ru/www/../sql.p(439:8) 
_table_save z:/home/test.ru/www/../sql.p(457:2) 
_hash_save z:/home/test.ru/www/../sql.p(115:145) 
save_code z:/home/test.ru/www/../sql.p(266:34) 
if z:/home/test.ru/www/../sql.p(265:26) 
try z:/home/test.ru/www/../sql.p(253:18) 
if z:/home/test.ru/www/../sql.p(250:10) 
if z:/home/test.ru/www/../sql.p(248:2) 
_sql z:/home/test.ru/www/../sql.p(115:26) 
switch z:/home/test.ru/www/../sql.p(110:10) 
code z:/home/test.ru/www/../lib.p(373:18) 
if z:/home/test.ru/www/../lib.p(345:2) 
run_time z:/home/test.ru/www/../sql.p(109:2) 
sql z:/home/test.ru/www/../sql.p(180:10) 
hash z:/home/test.ru/www/auto.p(31:17) 
body z:/home/test.ru/www/../sql.p(76:28) 
connect z:/home/test.ru/www/../sql.p(76:2) 
server z:/home/test.ru/www/auto.p(30:12) 
Какуже говорил с table все хорошо...
^MAIN:pSQL.server{
$tmp[^MAIN:pSQL.table{
	SELECT object_id, title FROM object
}[][
	$.file[tbl.cfg]
]]
}