ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как создать DbfIV из VbScript
12 сообщений из 12, страница 1 из 1
Как создать DbfIV из VbScript
    #34652886
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
В общем нужно из ВБ скрипта создать файл ДБФ
пробовал по разному, более мение подходящий вариант каторый понял это вызвать ексель, напичкать его данными и сохранить в лист в дбф.
Это как раз и не получается

Как сейвас в дбф4 сделать?
...
Рейтинг: 0 / 0
11.07.2007, 12:18
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34654573
Фотография Ex_Soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ex_Soft
Участник
antipod
Как сейвас в дбф4 сделать?

тынць
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
11.07.2007, 18:33
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34655065
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
пробовал
но такой фокус, начать запись, операция "сойханить как", остановить запись
например так
ChDir "C:\Temp"
ActiveWorkbook.SaveAs Filename:="C:\Temp\Книга1.dbf", FileFormat:=xlDBF4, _
CreateBackup:=False

при запуске похожего в скрипте пишет ошибку что не хватает параметров
...
Рейтинг: 0 / 0
12.07.2007, 06:18
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34655320
Фотография Ex_Soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ex_Soft
Участник
x:\Program Files\Microsoft Office\Office\VBAXL8.HLP
SaveAs Method

Saves changes to the sheet (Syntax 1) or workbook (Syntax 2) in a different file.

Syntax 1

expression .SaveAs(Filename, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AddToMru, TextCodePage, TextVisualLayout )

Syntax 2

expression .SaveAs(Filename, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AccessMode, ConflictResolution, AddToMru, TextCodePage, TextVisualLayout )

expression Required. An expression that returns a Chart or Worksheet object (Syntax 1) or a Workbook object (Syntax 2).

"...i так далi..."

_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
12.07.2007, 09:33
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34656533
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
Ругается " метод ранас завершен неверно"

sub OutTranDBF()
set Xl=CreateObject("Excel.Application")
xl.Workbooks.Add
xl.UserControl = True
With xl
.Range("A1").Select
.ActiveCell.FormulaR1C1 = "lischet"
.Range("B1").Select
.Selection.ColumnWidth = 10
.Columns("B:B").Select
.Selection.NumberFormat = "#,##0.00"
ChDir "C:\"

.ActiveWorkbook.SaveAs "C:\11.dbf", xlDBF4,,,,false end with
msgbox "fgg"
end sub
...
Рейтинг: 0 / 0
12.07.2007, 14:24
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34656573
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
В екселе этот код замечательно выполняется
...
Рейтинг: 0 / 0
12.07.2007, 14:30
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34657983
Фотография Ex_Soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ex_Soft
Участник
Попробуйте
Код: plaintext
1.
Workbook.SaveAs(OutputDoc, 11  /* xlDBF4 */);
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
12.07.2007, 21:28
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34657986
Фотография Ex_Soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ex_Soft
Участник
I'm so sorry...
Переволновался
Думал тут JS, а оказалось - VB...
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
12.07.2007, 21:32
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34659883
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
Помогите, а
запис в ексель срабатывает
хелп весь перечитал, видать что-то не понял
Как этот чертов код заставить работать?
...
Рейтинг: 0 / 0
16.07.2007, 06:35
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34659888
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
Ex_SoftI'm so sorry...
Переволновался
не заметил что константа на 11 заменена
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
16.07.2007, 06:49
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34666172
Фотография Ex_Soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ex_Soft
Участник
JS
Код: plaintext
1.
Workbook.SaveAs(OutputDbf, 11  /* xlDBF4 */);
BCB (позднее)
Код: plaintext
1.
Workbook.OleProcedure("SaveAs",OutputDbf.c_str(), 11  /* xlDBF4 */);
BCB (раннее)
Код: plaintext
1.
ExcelWorkbookDest->SaveAs(OutputDbf,(TVariant)xlDBF4,EmptyParam,EmptyParam,EmptyParam,EmptyParam,xlNoChange,EmptyParam,EmptyParam,EmptyParam,EmptyParam,TDefLCID());
C# (позднее)
Код: plaintext
1.
Workbook.GetType().InvokeMember("SaveAs",BindingFlags.InvokeMethod,null,Workbook,new object[]{OutputDbf, 11  /* xlDBF4 */,Type.Missing,Type.Missing,Type.Missing,Type.Missing, 1  /* xlNoChange */,Type.Missing,Type.Missing,Type.Missing,Type.Missing});
C# (раннее)
Код: plaintext
1.
Workbook.SaveAs(OutputDbf,XlFileFormat.xlDBF4,Type.Missing,Type.Missing,Type.Missing,Type.Missing,XlSaveAsAccessMode.xlNoChange,Type.Missing,Type.Missing,Type.Missing,Type.Missing);
Все проверено - все работает. Мучайте васика

_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
18.07.2007, 10:30
| Ответить | Цитировать | Написать  
Как создать DbfIV из VbScript
    #34671956
antipod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
antipod
Участник
Уже отмучался.
Ошибка была в константе, простой vbscript, даже после вызова exel.aplic не знаетч что это - xlDBF4
написал просто 11 и сработало. явно протормозил от неожиданности
...
Рейтинг: 0 / 0
20.07.2007, 06:10
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как создать DbfIV из VbScript
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=22&msg=34659888&tid=1457935]:
 0ms
get settings:
 8ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 160ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 46ms
get tp. blocked users:
 2ms
others: 225ms
total:  473ms
созд. / загр.: 473ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]