﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / Программирование / Visual Basic  / Подключение к базе данных (dbf) с длинным именем / Latest Posts</title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Sun, 06 Jul 2008 20:14:51 GMT</lastBuildDate><ttl>20</ttl><item><title>Подключение к базе данных (dbf) с длинным именем</title><link>http://www.relib.com/forums/Topic914589-1-1.aspx</link><description>[code]&lt;br&gt;&lt;br&gt;    Dim Path As String&lt;br&gt;    Dim file_name1 As String&lt;br&gt;&lt;br&gt;    Dim base As ADODB.Connection&lt;br&gt;    Dim bRec As ADODB.Recordset&lt;br&gt;    Set base = New ADODB.Connection&lt;br&gt;    Set bRec = New ADODB.Recordset&lt;br&gt;&lt;br&gt;    base.Mode = adModeReadWrite&lt;br&gt;    base.Open "Driver={Microsoft dBASE Driver (*.dbf)};Dbq=" &amp; Path&lt;br&gt;    bRec.Open "select * from " &amp; file_name1, base, adOpenKeyset, adLockBatchOptimistic&lt;br&gt;&lt;br&gt;[/code]&lt;br&gt;в принципе работает. если имя файла короткое, но если имя файла длинное то выскакивает ошибка:&lt;br&gt;ADO error:[Microsoft][Драйвер ODBC dBase]Усечение данных строки справа ...&lt;br&gt;&lt;br&gt;я бы решил, что длинные имена вообще не воспринимаются, но на другом компе этот код работает без ошибок.&lt;br&gt;Что сделать чтоб избавиться от такой ошибки?</description><pubDate>Mon, 09 Jul 2007 15:52:04 GMT</pubDate><dc:creator>wedmed</dc:creator></item></channel></rss>