| Вопрос: Проблема с Access. Ошибка 3163 | Добавлено: 13.02.06 12:57 |
Автор вопроса:  dmitroon
|
|
Имеется следующая проблема: при выполнении следующего кода
Private Sub FileName_GotFocus() Dim fs, f, f1, fc, s Dim folderspec As String Dim q As Double folderspec = [Forms]![qqq].[Folder] Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(folderspec) Set fc = f.Files Dim db As Database Dim tbl As TableDef Dim fld As Field Dim rec As Recordset Set db = CurrentDb Set tbl = db.TableDefs("Files") Set rec = tbl.OpenRecordset rec.MoveFirst For Each f1 In fc rec.AddNew --------> rec!Name = f1.Name rec.Update Next End Sub вылетает ошибка № 3163 "Выполнение операции невозможно; объем данных велик для поля. Попытайтесь вставить меньшее количество данных. Размер поля, в которое выполняется вставка данных, недостаточен для этих данных. Попытайтесь вставить меньшее количество данных." Ошибка не критическая, но все же подскажите, как можно её обойти. |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 13.02.06 13:06 |
| Собственно, сходить в конструктор таблицы и увеличить максимальную длину поля... | ||
|
Номер ответа: 2 Автор ответа: dmitroon Вопросов: 2 Ответов: 1 |
Профиль | | #2 | Добавлено: 13.02.06 13:14 |
| Спасибо, помогло. | ||
Страница: 1 |