Я не буду ничего говорить про диапазон, формата A1 : D5, это -- действительно работает, но вот конкретное обращение к ячейке -- фиг вам
------------ Дoбавленo в 10.10:
И в любом случае -- ячейки с номером 1 отдадутся именам колонок. Можно попытаться дать запрос региона, вроде работает
select * from [Лист1$A2:A3]
тогда считается третья ячейка, но первая ячейка диапазона отдается колонкам и там бывает всякая пурга, если значение индекса не равно 1.
------------ Дoбавленo в 10.52:
Короче, нашел то, что для корректной работы в ODBC или ADO, таблицы Excel действительно должны быть именованными, те, первый индекс должен быть отдан именам столбцов
------------ Дoбавленo в 11.15:
Вот так можно попробовать использовать конкретное поле, но только, если оно -- текстовое
Add(MainForm,3171043,42,168)
{
Left=20
Top=105
Width=390
Height=415
Caption="tabExel_with_OLEDBDataSource"
Position=1
link(onCreate,11947023:doStrCat,[])
}
Add(Button,941652,245,322)
{
Left=305
Top=5
Width=75
TabOrder=-1
Caption="Подключить"
link(onClick,5366140:doOpen,[])
}
Add(StringTable,6078793,518,322)
{
Left=5
Top=165
Width=375
Height=210
Columns=#1:A|1:B|1:C|1:D|
Point(doAddColumn)
}
Add(MT_String,16321824,462,322)
{
link(onResult,6078793:doAdd,[])
}
Add(Edit,11108326,301,168)
{
Left=5
Top=5
Width=295
Text=""
link(onChange,7246550:doEvent1,[])
link(Str,12927216:Var3,[(307,156)(208,156)(208,233)])
}
Add(Dir,5145339,98,133)
{
}
Add(StrCat,11947023,98,182)
{
Str2="test.xls"
link(onStrCat,13359086:doFileExists,[])
link(Str1,5145339:CurrentDir,[])
}
Add(FormatStr,5564056,434,196)
{
Mask="Driver={Microsoft Excel Driver (*.xls)};
DriverID=22;
DBQ=%1;
DefaultDir=%2;
"
Point(FString)
link(onFString,14216946:doText,[])
link(Str2,1388409:Value,[])
}
Add(FormatStr,10216816,462,238)
{
Mask="select * from [Лист1$B3:B3]"
Point(FString)
link(onFString,15254124:doText,[])
}
Add(Memo,14216946,518,175)
{
Left=5
Top=30
Width=375
Height=105
}
Add(DS_OLEDB,5366140,301,322)
{
Name="ole_driver_1"
Point(onError)
link(onCreate,13233332:doQuery,[])
link(Driver,5564056:FString,[(307,275)(440,275)])
}
Add(DSC_Query,13233332,357,322)
{
DSManager="ole_driver_1"
link(onQuery,9583363:doWork2,[])
link(onColumns,9583363:doWork3,[(440,335)])
link(SQL,15254124:Text,[(363,279)(524,279)])
}
Add(Hub,7246550,350,168)
{
link(onEvent1,6971676:doPart,[])
link(onEvent2,5564056:doString,[(373,181)(373,202)])
}
Add(FilePart,6971676,378,168)
{
link(onPath,1388409:doValue,[(424,174)(424,153)])
link(onName,10216816:doString,[(424,181)(424,244)])
}
Add(MemoryStream,8873750,301,70)
{
Stream=[ZIP0038000078DAED5B6D6C1445187E776FEE6EAF77B4DB2F2C2DD6A3A00245BCBBBDEB5D296DAF7C0898902268C480C152AA103E4A0A261AA29E5F893F34D168626248947F12133F62C4C41002FF2448342A51893FAAC6C43F2A104D3002E733EFCEEDEDB57B488D060CFB6EE6E37DE67DE69D9D999DDD99DC7DF669FDF881F75ABFA309D24701BA548C50C8856908AD25C52494178B325B4A6720147DF95F49C4C0408682F445CBC9F0F1A3C80688BE239DDE15C710137D8FB0917653946860D796B1D19D235B8656AF8BFFE7B284DB30A4C9361CC5C4EBD542987F3A66E57EC4B5986BB2A481E3468EDF61DBC31CF7A2645CABA30D3DBFDC9E537377BD9E67BB1738EEE0B816B1461F32E7342349947C2CE7F1132FCAE94E9FCC8868033446DB688876509C96D2A3D0AE8ED51B7F6BD52E6EA7203593369B16D06C5C09D0F26221E21E0CE36D34196F17DD78C85BBD291B682D8DD016BABF2AB987C2D4E6262F44A8EEB5B2B45D2C27038DBF0CBD5A0B2656B49DE69345DA2618CD478D939B2A4BECD65CAEBCC4EF40DAE15196E758BA9BE7ED6E13289BD0BA6AEE2ACB2BDD4D2E2BB9DB077E8F97BBCA6EA8E6D4CBAAD2753FAEEA77BB8F3A2FE7FEEFEED9CB6AB2FB6A773F4E4DFC04FF5E8CBBDE4547E312D74AF86F5786EB53C4E93AC435F2EAE705B6FDF989F8FC2A78A40ADE59059FE789CBF598DB23CAF8CBBA20B3208A32AD2F8439A50271DA500872DA580870DA5408151FE0D5FD59BC11C622B286A0D6267262402C1149462FD656A229468559895AF43C1A11C6754C3310F00639A2D105FA519B0BBBD908783FDD24968A7EB108945E21486B406689181401D2B0502223EC4C4658224C5A078A178B3EB10C40B708D9F68BC0E81379614835C1C6BD80648D0C0D8A15800650901029496A83DA87D29C484B8B467073A8BF8FD36EE9A7912DF200251024DA35B26778344C944AA6AC74A60B95CC84C1007CA7506B8CA833DB9DCA59894C2A97CDDA6A572667A57350710BADA8270353BE9B3CB23D254E26D395ED4E24B3A8B11E25836896ACD5900E9602588CEA6D085D321B379E9095CC82F315A8D3AE2491B292D974D2B2F0E589EAD2560A99EE442E914D94BC7425B3563A9DB155CBB240CA65711B9443A65B9965BAAC6C36DB9549034F679299EE74D01EA05EEE63F4CB1CB85F0CBF3D0883F68064B8C39771870665CFC97EEB43CF1631D10DBA139D86DAE94858CE38A28441740EE96B4837624A9C47FA11D261A319A1FC1035ABF4740D22FB8BCBACF8E28AEA4D8EF134848530DC5C2BF3F2FB2486780BD571BE9ED72A138DB970F0ECE7AB37AFE9DFC4F87CC63B397E8A9102955B70B37C46A8484FA2E49868524D7A9AAD9FE1F800566169A1F1255C2BC0787F39BD07B6063DC69D40B42AD40C5DB02E59545BD6755CABCCB21EC0B56A9AAD935EEBDCA9FD681BBAA9F245B5D5A8634CF3C0740F2CE081090F2CE881853CB0B007667860110FACC6038B7A60B109D84566CA91B909B1AD69D0E28EA6439BE568016872CC1ED76BB89FE4889EE997651AF348596ACC8B399AE44D533CBD3439F3B24C679EA62C75E6D53A9AE4998A17503C837901E6E9CA32C0BC3A4793BC7AC5138A67324F302FA02C05F31A1CCDDDCEA0E235312FC83CA12C83CCBBC1D1DCBC90E2B5302FC4BCA0B20C31AFC5D124AF51F1C28A37937961E68594659879331CCDDD2F86E2C59967302FAC2C0DE6B53A9ABB9D11C5EB605E847986B28C30AFCDD1DCBC1AC59BC3BC1AE64594650DF3663A9AE435295E54F16E615E947935CA32CABC1B1D4DF29A152FA678739917635E5459C698D7EE6892371DDA57C0BEC5209FA15C95AB4F6FA0437CD09077AD3B37620E05ECC75D430723A7FF8A41085216C843462342D938C0D396B61AB722B861F54923546A2F4C52ABBE149B1507211FD45DCD6538E0B50CEBF6325C5A465D8736B223C9B323CB273852CA1D79A5DD70D8BCE6DE46FF76375C9772A928BF72F549B8ECA2F1675F3FF7C7E056F3AD970CEABCF5FD6F12C0DE4408ABF2BC7A7BAF946F023E27225EBF7793FD99F49C7AC7BFC26734C4E717D2D30F20B52B1BD7A152554CCEC4D5DB86C746F78C3EB837BEFC91E1911DF6C89EFEF9AECE83C735992FACBC705F02F900F9E28B2FBEF8E28B2FBEF8E28B2FBEF8E28B2F53D9FFEBA74E9EDABFB0CD7CF955ECFF17FCF1B6DCFF7F891051E56B10E439EF7A0479FEBA1521AAF6FF72CFFE88DAF71710A6BBCE035E54FBFC4313CE03E419C2DD233B46B68FEEE4939AAF5BA25C1FA97ABDD276D33EE593C787277E3A7B2EE9E4524ECEA298697B6A7759FEC93CFFBCC0175F7CF1C5175F7CF1C5175F7CF1C597EB4134B507B77F4147FCEB28B9430EABFDB8FC6F4F8DDA6FC7D4FEBD56EDFB4D55DEA0F6F9A55F724C57E7012DAAFC22C225FFAF36D7A4ACA5515C7B294ECB6917D2317A744AF3673A05B5525D721EC50DFB2CE9A85D7C87DB76CD86AD27AC83C7B5D2FFC5A4DC0BEF63B49D36733BB64F79FE3690AEB9EFE74A79D17A3B0DD23A7A9876E21AE27B5F855E7890DB2491BDB40DF95D97A9672EFC6BEAF9B952FFFC3374B3E47F193C0C731B467804A6D69EDC3FB8FF7A97FFBF003DC7E067]
}
Add(FileStream,7287210,350,105)
{
Mode=1
AutoCopy=0
Point(doCopyFromStream)
link(FileName,12927216:Var1,[(356,64)(29,64)(29,233)])
}
Add(FileTools,13359086,147,161)
{
link(onEnd,6019363:doEvent,[])
}
Add(IndexToChanel,6019363,196,161)
{
link(onEvent1,1529848:doEvent1,[(240,167)(240,125)])
link(onEvent2,1629790:doWork2,[])
}
Add(DoData,15940094,301,119)
{
link(onEventData,7287210:doCopyFromStream,[])
link(Data,8873750:Stream,[])
}
Add(Hub,1529848,252,119)
{
link(onEvent1,15940094:doData,[])
link(onEvent2,1629790:doWork1,[(277,132)])
}
Add(HubEx,1629790,273,168)
{
link(onEvent,11108326:doText,[])
}
Add(GetDataEx,12927216,98,228)
{
link(Data,11947023:Result,[])
}
Add(Edit,15254124,518,238)
{
Left=5
Top=140
Width=375
Text=""
}
Add(Memory,1388409,441,147)
{
}
Add(HubEx,9583363,436,322)
{
link(onEvent,16321824:doStr,[])
}
Но что-то это сильно смахивает на изощренное извращение
Поиск
Друзья
Администрация