nesco писал(а):
Может с паролем что-то не так ? Открываешь этот файл БД в DBD32.EXE и там тоже команды Insert и Delete недоступны.
[url]http://pixs.ru/showimage/insdelpng_4940518_5778959.png [/url]
(Сегодня и у меня форум файлы не принимает

BNdik, любой запрос на чтение (чтобы не мучиться с запросами, поставил ComboBox) выполняется без проблем.
Add(SimpleForm,2953706,28,224)
{
Width=911
Height=533
Point(onClose)
link(onCreate,10586663:doEvent1,[(82,230)(82,209)])
link(onClose,7454095:doDisconnect,[])
}
Add(Button,4507359,28,350)
{
Left=560
Top=35
Caption="Exec"
link(onClick,14409911:doData,[])
}
Add(Edit,10171108,98,301)
{
Left=140
Top=35
Width=390
Text="INSERT INTO opert(ID1) values(21.12)"
}
Add(Button,991993,28,168)
{
Left=560
Caption="Query"
link(onClick,3400235:doData,[])
}
Add(DoData,3400235,98,168)
{
link(onEventData,10943332:doEvent1,[])
link(Data,15041653:EditText,[])
}
Add(DoData,14409911,98,350)
{
link(onEventData,7454095:doExec,[(163,356)(163,230)])
link(Data,10171108:Text,[])
}
Add(Hub,10943332,147,168)
{
link(onEvent1,11851081:doClear,[(312,174)(312,293)])
link(onEvent2,7454095:doQuery,[(178,181)(178,223)])
}
Add(StringTable,11851081,329,280)
{
Left=10
Top=60
Width=875
Height=300
Grid=0
ClearAll=0
Point(doAddColumn)
}
Add(ODBC,7454095,196,210)
{
DSN_Name="para"
User_ID="Tad"
Password="jIGGAe"
Driver="Microsoft Paradox Driver (*.db )"
FileDB="opert"
Exclusive=1
Point(onError)
Point(doSetup)
Point(ColumnsCount)
Point(FieldName)
Point(FieldType)
Point(onColumnsInfo)
link(onStreamString,14475914:doEvent1,[(257,216)(257,286)])
link(onColumnsInfo,11851081:doAddColumn,[(239,244)(239,321)])
}
Add(Hub,10586663,105,203)
{
link(onEvent1,7454095:doSetup,[(130,209)(130,244)])
link(onEvent2,7454095:doConnectDSN,[])
}
Add(MultiElementEx,14475914,273,280)
{
link(onDelete,11851081:doAdd,[])
link(Op2,7454095:ColumnsCount,[(279,253)(202,253)])
}
BEGIN_SDK
Add(EditMultiEx,6098214,21,21)
{
WorkCount=#8:doEvent1|
EventCount=#8:onDelete|
DataCount=#3:Op2|
Width=440
link(doEvent1,13224225:doConvert,[(35,27)(35,55)])
}
Add(StrCatDelim,11660386,294,49)
{
Delimiter=";"
Point(doClear)
link(Str1,2358694:Var3,[(300,37)(333,37)(333,93)])
}
Add(Hub,7912242,98,49)
{
link(onEvent1,11660386:doStrCatDlm,[])
link(onEvent2,7968701:doOperation,[(150,62)(150,125)])
}
Add(GetDataEx,2358694,294,88)
{
link(Data,11660386:Result,[])
}
Add(Hub,7948390,259,119)
{
OutCount=3
link(onEvent1,13875000:doDelete,[])
link(onEvent2,11660386:doClear,[(283,132)(283,62)])
link(onEvent3,7968701:doClear,[(278,139)(278,156)(156,156)(156,132)])
}
Add(Delete,13875000,294,119)
{
Count=1
link(onDelete,6098214:onDelete,[(348,125)(348,27)])
link(Str,2358694:Var2,[])
}
Add(Math,7968701,168,119)
{
Op2=1
ResultType=0
Point(doClear)
link(onResult,757814:doCompare,[])
link(Op1,7968701:Result,[(174,107)(162,107)(162,163)(174,163)])
}
Add(If_else,757814,210,119)
{
link(onTrue,7948390:doEvent1,[])
link(Op2,6098214:Op2,[(223,70)(27,70)])
}
Add(StreamConvertor,13224225,49,49)
{
Mode=6
Symbol=""
link(onResult,7912242:doEvent1,[])
}
END_SDK
Add(ComboBox,15041653,84,108)
{
Left=140
Width=390
Ctl3D=0
Strings=#0:|19:SELECT * FROM opert|34:SELECT * FROM opert WHERE Codop=15|34:SELECT * FROM opert WHERE Codop=16|44:SELECT * FROM opert WHERE Codop=16 AND VID=5|45:SELECT * FROM opert WHERE Codop=16 AND VID<>5|35:SELECT Codop,id1,id2,vid FROM opert|
Text="SELECT * FROM opert"
Point(EditText)
}