задача у меня была следующая.
Вбскрипт, открывает dbf файл формата  Visual FoxPro  и там изменить свойства всех полей на  not null

застопорился я на том, что:



на последней строчке выдает сообщение 
D:\imdb.vbs(14, 5) Microsoft OLE DB Provider for ODBC Drivers: [Microsoft][ODBC Visual FoxPro Driver]File 'i_yegvas_uaf.dbf' does not exist.


ребята, подскажите, как ДБФник открыть правильно так, чтобы там выполнить команду ALTER  и MODIFY для изменения свойств.

Не знаю, как открыть на VB, но много знаю про DBF:

Если ты откроешь не эксклюзивно, то никаких ALTER TABLE... у тебя не получится.  

Ок, открою эксклюзивно.
Но почему он выдает ошибку на обычном селекте?

Файл-то точно существует?

В том-то и дело.
Файл, падлюка, никуда не девается. имя в скрипте, это копипаст имени файла. Файл лежит в корне диска Д.
Изначально вообще всё как происходило, до того как я задумался скрипт наваять.
Файл изначально имеет расширение *.pdm. Файл переименовывается в дбф открівается обічнім visual FoxPro и в ручную в едиторе полей таблицы выщёлкивались чекбоксы is null. 
Вот почему я и решил автоматизировать процесс, таких файлов становилось всё больше и больше. Народу было трудно.

Ещё заметил, когда пытался открыть файл через простенькую прогу DBFNavigator он не совсем открылся.  Вернее открывается, но странно. Вниз по строчкам прокручивает до конца, а при попытке прокрутить по столбцам полей вправо (а столбцов там около семидесяти или может чуток меньше) при подходе к концу, навигатор просто закрывается, тупо вырубается даже не выдав ошибку...сам по себе факт непонятный и я насторожился.

Ну да ладно, это всё лирика.

Если не брать в рассчет эту строчку,


То как по простому удостовериться, что файл приконнектился?
Как по простому этот файл приконнектить и вывести хоть что-нибудь из него?

А если в строке подключения оставить только path_dbf ? Т.е.


?


Почему именно на VB надо? Если у тебя фокс установлен - так пиши прогу на нём.  

Georg4, всё это чудо у Вас на VBS для ASP? Вероятно, на этот файл нет просто NTFS прав для чтения\открытия... Попробуйте копировать файл в папку web-узла (если мои догадки верны), а лучше создайте с помощью скриптов этот файл именно в папке узла [тогда точно права будут].


Это сообщение отредактировал(а) DrBoom - 21.6.2009, 12:07

На VBscripte пишу потому что на нём умею, а на фоксе нет Плюс сам фокс у меня не установлен.
А для вбскрипта простого блокнота хватит.
Попробую предложения ваши все в понедельник на работе, авось что получится, отпишусь.

Да ладно, аргумент не катит.  


Фокс 8.0 поставь(если будешь ставить)  - самое оно.  

Согласен, не катит, но вот просто теперь из интереса, заставить пахать скрипт, ну а если что то и за фокс усядемся....что делать...

Ну вот попробуй мой вариант, я в VB, как говорил, мало что понимаю, но, по логике, строка подключения должна быть такой. Или же через ADO ещё проще, но это если фокс установлен и с таблицами размеров не особо больших.


Давай, а то соответствующий раздел винградовский как-то плохо юзается.  

Это сообщение отредактировал(а) Данкинг - 21.6.2009, 22:29

Ну что, товарищи, после продолжительных боёв, удалив по совету тов. Данкинга имя базы из СорсДБ и оставив там только путь, смог отобразить базу данных в формате ексель:


Теперь начнутся работы над выполнением команды ALTER с целью убрать свойство всех полей is null

А при чём тут Excel? В нём же никаких NULL определённо нет.  


На фоксе вот так:

(base - название таблицы, pole - название поля)
А здесь тебе надо как-то запросом сиё сделать после подключения к каталогу с таблицами.  

Т.е. этот запрос куда-то воткнуть, дабы он работал.  

Это сообщение отредактировал(а) Данкинг - 22.6.2009, 11:01

Я её просто выкинул в ексель, чтобы понять открылась ли она или нет, и открылась ли полностью..


всвязи с запросом встала следующая проблема, почему то драйвер ругается при представлении ему разных видов запроса.
поколупался в мсдне нашел формат нужного запроса

ALTER TABLE MyTable ALTER COLUMN NullCOl NVARCHAR(20) NOT NULL

пытался вставить код следующий:



Ругается на Microsoft OLE DB Provider for ODBC Drivers: [Microsoft][ODBC Visual FoxPro Driver]Command contains unrecognized phrase/keyword.

Если убрать первых 4 строчки, то ругатьс прекращает, но нифига не делает



Есть вариант использовать метод EXECUTE 
Set recordset = connection.Execute (CommandText, RecordsAffected, Options)

но что-то я с ним разобраться не могу...чего-то как её не введу, на формат ругается.


Это сообщение отредактировал(а) Georg4 - 22.6.2009, 11:45

Тот запрос, который я написал, у меня отлично работает на самом фоксе. Тебе же нужно:
1. Открыть каталог, в котором находится файл .dbf;
2. Выполнить запрос на изменение с именем этого файла.

Не знаю, как это сделать на VB, но, видимо, connection.Execute более ближе к теме.  Ну вот пример на JAVA могу привести, там нечто похожее:


Переложи это на VB, и будет тебе счастье.  

Это сообщение отредактировал(а) Данкинг - 22.6.2009, 12:12