Çàâèñàåò DoCmd.TransferText
|
|
Ïîíåäåëüíèê, 21 Äåêàáðÿ 2015 ã. 20:09
+ â öèòàòíèê
Acc2003. Åñòü ïðîñòåíüêèé êîä, âèäà
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE * FROM " & strImportTable
DoCmd.SetWarnings True
DoCmd.TransferText acImportDelim, "spec_HomeCredit_TXT", strImportTable, strInputFileName
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE " & strImportTable & " SET PostalType = 'NOR'" 'normal package
DoCmd.SetWarnings True
Ïîòîì ýòè äàííûå ðàçáèðàþòñÿ íà çàãîëîâîê, äàííûå è ïîäïèñü è îáðàáàòûâàþòñÿ â íà ñåðâåðå â òðàíñàêöèè, è, äîïóñòèì, ïàäàþò ñ rollback'îì. È ÂѨ!!! Âòîðîé ðàç ýòîò êîä áåçíà䏿íî âèñíåò íà ñòðî÷êå DoCmd.TransferText Ïðè÷¸ì îêîí÷àòåëüíî è áåñïîâîðîòíî - áîëüøå ýòîò êîä èç ýòîé MDB íå ðàáîòàåò, áîëåå òîãî, åñëè ñîçäàòü ïóñòîé ôàéë è èìïîðòèðîâàòü â íåãî âñ¸, òî ýòîò êîä îïÿòü æå íå ðàáîòàåò! Ðàáîòàåò òîëüêî îðèãèíàëüíàÿ âåðñèÿ, íà êîòîðîé ýòîò êîä çàïóñêàåòñÿ âïåðâûå 8-î Ïðè÷¸ì, äàæå åñëè ïðîñòî ïîïûòàòüñÿ çàïóñòèòü ýòîò êóñîê êîäà 2 ðàçà, âòîðîé çàïóñê âèñíåò íàãëóõî, è, îïÿòü æå, â ýòîì ôàéëå àööåññà óæå âñåãäà áóäåò âèñíóòü. Ïðè çàâèñàíèè âíèçó ýêðàíà ïîÿâëÿåòñÿ ñòðîêà ñòàòóñà èìïîðòà, êàê áóäòî òàì íå 10 ñòðî÷åê, à 100500, à èìïîðòèðîâàëîñü òîëüêî 2%, è îíà íå äâèãàåòñÿ.
×ÒÎ ÇÀ ###íÿ?!?
http://www.sql.ru/forum/1191766/zavisaet-docmd-transfertext
-
Çàïèñü ïîíðàâèëàñü
-
0
Ïðîöèòèðîâàëè
-
0
Ñîõðàíèëè
-