powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBScript и DBF
6 сообщений из 6, страница 1 из 1
VBScript и DBF
    #32542231
jimbeam
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Можно ли через VBS открыть и обработать DBF? и если есть готовый примерный код = напиши пожалуйста.
...
Рейтинг: 0 / 0
VBScript и DBF
    #32542359
vbGuest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Const dbEngine = "DAO.DBEngine.36"
Private Const dbOpenDynamic =  16 
Private Const dbOpenTable =  1 
Private Const dbOptimistic =  3 

Sub Main(sPath)
	Dim dbe
	Dim odb
	Dim oRs

	Set dbe = CreateObject(dbEngine)
	Set odb = dbe.OpenDatabase(sPath, True, False, "dBASE III")	
	Set oRs = odb.OpenRecordset("MyDbfFile", dbOpenTable)
End Sub
...
Рейтинг: 0 / 0
VBScript и DBF
    #32544427
jimbeam
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Скажите, а как дальше? Как выудить из ячейки (2,3) значение?
Как это сделать в C#, VB4, VB6, VB.NET знаю.Но начальство требует сделать не компилируемый код (скриптовой), чтобы любой человек мог спокойно подправить под свои нужды.
Проблема: есть Биржа ММВБ - которая по результатам торгов присылает файлик *.dbf который потом необходимо разбить на текстовые файлы по секциям ММВБ - корпоративки в один файл, гос бумаги в другой, ОВВЗ в третий и так далее.
Потом эти файлы стандартными интерфейсными методами грузятся в АБС.
Вот предваряя будущий свой вопрос спрошу: А как работать с IO текста в VBS. Спасибо.
А может есть доки в сети??? Я бы перестал мучать Вас.
...
Рейтинг: 0 / 0
VBScript и DBF
    #32544457
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Какие-то у тебя странные проблемы, если ты знаешь VB6 и VBA, то с VBScriptom даже нечего разбираться, различия минимальные: нет нескольких встроенных в библ. VB функций, а так вся работа как была через COM объекты так и осталась, CreateObject и вперед
...
Рейтинг: 0 / 0
VBScript и DBF
    #32544464
vbGuest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Выбрать данные из полей и записать в текстовый файл:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
dim fso
dim t

Set fso = CreateObject("Scripting.FileSystemObject")
Set t = fso.CreateTextFile("c:\testfile.txt", True)

Do While Not oRs.Eof
	t.WriteLine oRs.Fields( 0 ).Value
	oRs.MoveNext
Loop
oRs.Close
t.Close
А подробнее в MSDN о FileSystemObject
...
Рейтинг: 0 / 0
VBScript и DBF
    #32544815
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
FSO - справка по VBA, в поиске пишем file и находим среди найденных топиков один про объект file из FSO, а дальше через ссылки выходим на все остальные объекты и свойства FSO
- вот такая она гипертекстовая справка, ничего не попишешь.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBScript и DBF
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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