Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Создание DBF, Создание поля numeric в DBF  
:(
    Опции темы
AyanTai
Дата 1.4.2010, 12:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 28.10.2008

Репутация: нет
Всего: нет
Товарисчи не пинать ногами! Тема заезжанная понимаю, инет облазил ответа не нашел! НО все же хелп!
Создаю DBF из Vb.

Код

Set Conn = New ADODB.Connection
With Conn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("Extended Properties") = "dBase IV"
.Properties("Data Source") = "D:\data\"
.Open
End With
DoEvents
Set dbfCmd = New ADODB.Command
With dbfCmd
.ActiveConnection = Conn
.CommandTimeout = 10

.CommandText = "CREATE TABLE 130903_1 " & "(COD number ,CDPR numeric(12),NCARD numeric(10)," & _
"IDCODE char(10),PASP char(14),FIO char(50),IDPIL char(10),PASSPIL char(14)," & _
"FIOPIL char(50),INDEk numeric(6),CDUL numeric(5),HOUSE char(7),BLILD char(2),APT char(4)," & _
"LGCODE numeric(4),KAT numeric(4),YRARIN numeric(4),MONTHIN numeric(2)," & _
"YEAROUT numeric(4),MONTHOUT numeric(2),RAH char(25),RIZN numeric(6),TARIF numeric(10));"
' ,
.Execute
End With 

открываю получившуюся DBF через FoxPro и вижу: numeric (20, 5) на всех полях с типом numeric , а нужно точно как указано в скрипте.
alter - oм пользовался не помогло (хотя киньте вариант мож что нитак делаю..)
пытался записать как number, single, double - тож самое, тупо создает numeric (20,5)!
Помогите пожалуйста.

Это сообщение отредактировал(а) Akina - 1.4.2010, 12:42
PM MAIL   Вверх
Akina
Дата 1.4.2010, 12:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Создай пустой DBF и сунь его в ресы, понадобится - выплюни на диск.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
AyanTai
Дата 1.4.2010, 12:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 28.10.2008

Репутация: нет
Всего: нет
2 Akina 
ничего не понял)))) можно по подробнее..

ПС: создать пустой DBF файл уже с :
COD number ,CDPR numeric(12),NCARD numeric(10)," & _
"IDCODE char(10),PASP char(14),FIO char(50),IDPIL char(10),PASSPIL char(14)," & _
"FIOPIL char(50),INDEk numeric(6),CDUL numeric(5),HOUSE char(7),BLILD char(2),APT char(4)," & _
"LGCODE numeric(4),KAT numeric(4),YRARIN numeric(4),MONTHIN numeric(2)," & _
"YEAROUT numeric(4),MONTHOUT numeric(2),RAH char(25),RIZN numeric(6),TARIF numeric(10) 
и в него писать?

а потом чистить чтоль?
PM MAIL   Вверх
Данкинг
Дата 1.4.2010, 14:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
А если тип указать просто как N ?
n(12)


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Akina
Дата 1.4.2010, 14:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Цитата(AyanTai @  1.4.2010,  13:54 Найти цитируемый пост)
а потом чистить чтоль? 

Нет. Положить его в ресурсы исполняемого файла как CustomResource.
А при исполнении проверять наличие файла, и если его нет - брать из ресурсов и записывать на диск. После чего уже работать с ним.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
AyanTai
Дата 2.4.2010, 06:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 28.10.2008

Репутация: нет
Всего: нет
Цитата
А если тип указать просто как N ?
n(12)



да тож не выходит...придется делать шаблон и в него выгружать постоянно..
PM MAIL   Вверх
AyanTai
Дата 2.4.2010, 06:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 28.10.2008

Репутация: нет
Всего: нет
мне кажется полюбому должно быть решение этой порблемы! ну не верю я чтоб не создалась dbf-ка с таким полем..
PM MAIL   Вверх
Данкинг
Дата 2.4.2010, 11:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Цитата(AyanTai @ 2.4.2010,  07:57)
мне кажется полюбому должно быть решение этой порблемы! ну не верю я чтоб не создалась dbf-ка с таким полем..

Так у тебя фокс на компе стоит? Тогда и используй его провайдер, а не Microsoft.Jet. А вообще можно и не в ресурсах файл хранить, а просто в папке с программой, и при необходимости копировать куда нужно.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Dexx
Дата 2.4.2010, 14:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 292
Регистрация: 13.6.2005

Репутация: 5
Всего: 7
Вот класс для работы с dbf! 
Попробуй.

Присоединённый файл ( Кол-во скачиваний: 55 )
Присоединённый файл  CLSDBF.CLS 92,16 Kb


--------------------
PM   Вверх
AyanTai
Дата 5.4.2010, 06:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 28.10.2008

Репутация: нет
Всего: нет
Цитата

Dexx

СпасибО!
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0795 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.