function [db, nameField]=web_db_load(dbname_txt)	

file = textread(dbname_txt,'%s','delimiter','\n','whitespace','');
numFields=str2num(file{1}); file=file(2:end);

for iField=1:numFields
	nameField{iField}=file{iField};
end
file=file(iField+2:end);

numRec=length(file)/(numFields+1);

irec=0;
for n=1:numRec
  for iField=1:numFields
	irec=irec+1; 
	str=['db(n).',nameField{iField},'=file (irec );'];
	eval(str);
  end
  irec=irec+1;  % skip empty line between records
end