Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как создать DbfIV из VbScript / 12 сообщений из 12, страница 1 из 1
11.07.2007, 12:18
    #34652886
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
В общем нужно из ВБ скрипта создать файл ДБФ
пробовал по разному, более мение подходящий вариант каторый понял это вызвать ексель, напичкать его данными и сохранить в лист в дбф.
Это как раз и не получается

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

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

при запуске похожего в скрипте пишет ошибку что не хватает параметров
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.07.2007, 09:33
    #34655320
Ex_Soft
Ex_Soft
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
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, 14:24
    #34656533
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
Ругается " метод ранас завершен неверно"

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:30
    #34656573
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
В екселе этот код замечательно выполняется
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.07.2007, 21:28
    #34657983
Ex_Soft
Ex_Soft
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
Попробуйте
Код: plaintext
1.
Workbook.SaveAs(OutputDoc, 11  /* xlDBF4 */);
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.07.2007, 21:32
    #34657986
Ex_Soft
Ex_Soft
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
I'm so sorry...
Переволновался
Думал тут JS, а оказалось - VB...
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.07.2007, 06:35
    #34659883
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
Помогите, а
запис в ексель срабатывает
хелп весь перечитал, видать что-то не понял
Как этот чертов код заставить работать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.07.2007, 06:49
    #34659888
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
Ex_SoftI'm so sorry...
Переволновался
не заметил что константа на 11 заменена
_________________
"Helo, word!" - 17 errors 56 warnings
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.07.2007, 10:30
    #34666172
Ex_Soft
Ex_Soft
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
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
| Ответить | Цитировать | Написать  
20.07.2007, 06:10
    #34671956
antipod
antipod
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как создать DbfIV из VbScript
Уже отмучался.
Ошибка была в константе, простой vbscript, даже после вызова exel.aplic не знаетч что это - xlDBF4
написал просто 11 и сработало. явно протормозил от неожиданности
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как создать DbfIV из VbScript / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 178ms
Закрыть
start [/forum/topic.php?fid=22&mobile=1&tid=1457935]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 66ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 10ms
total:  178ms
x
x
Закрыть


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