powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBS для внесения данных в mdb
21 сообщений из 21, страница 1 из 1
VBS для внесения данных в mdb
    #39536148
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день, уважаемые форумчане требуется Ваша помощь, хотелось бы развернуть скриптик по расписанию для автоматического заполнения, внесения данных в Access97 базу test.mdb с рабочей группой group.mdw также логином и паролем. Внесение данных нужно именно в таблицу "Tabl1" в самой таблице есть столбцы: Nomer/Счетчик; Date/Дата,время; Type/Числовой; Consul/Текстовой и т.д, нужен примерчик скрипта, отзовитесь добрые люди!?
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536161
Фотография Лапух
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikod, запросто, но только через недельку или две начну создавать уже созданное вами, пока свободного времени маловато.
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536255
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ткните пальцем плиз где черпать информации по данному вопросу??!
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536292
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikodТкните пальцем плиз где черпать информации по данному вопросу??!

киньте сюда примерчик, тогда проще будет помогать.
Я то в батниках не шарю, но проще, когда уже есть пример базы.
А то и пример создай и скрипт напиши.
Понимаете о чём я...
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536293
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikod,

А так то, мне кажется,
вам dao или ado обязательно помогут.
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536377
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
час58,
час58,
Доброй ночи, база test.mdb с таблицей "Tabl1" создана в Ассesse97 как и уже упоминалось выше и используется, порой т.е часто приходиться заходить в базу через mdw c авторизацией(логином и паролем) и вносить данные в таблицу вручную, а именно в данные столбцы указанные выше в начале темы, хотелось бы автоматизировать эту задачу с помощью vbs, я вижу примерно это так:

set cnn1 = WScript.CreateObject("ADODB.Connection")
cnn1.Mode = 1 ' adModeReadWrite
cnn1.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn1.Open "Data Source="c:\test.mdb;Jet OLEDB:System Database=c:\group.mdw;User ID=alex;Password=qwerty
????
???? далее что нужно прописать в сценарий для внесения данных в таблицу "Tabl1" в столбцы: Nomer/Счетчик; Date/Дата,время; Type/Числовой; Consul/Текстовой и после этого завершить с сохранением скрипт!?
,да если конечно я вообще на правильном пути скрипта который предоставил...
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536385
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ikodТкните пальцем плиз где черпать информации по данному вопросу??!
http://www.askit.ru/custom/progr_admin/m13/lab13_01_ado.htm
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536445
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
guest_rusimportikodТкните пальцем плиз где черпать информации по данному вопросу??!
http://www.askit.ru/custom/progr_admin/m13/lab13_01_ado.htm Всё это замечательно. Но...
ТС пишет, что у него база Access 97. А ADO может ли работать с базой в формате Access 97? Ведь оно появилось только в Access 2000.

Может ему надо менять формат базы или копать в сторону DAO?
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39536588
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Jossguest_rusimportпропущено...

http://www.askit.ru/custom/progr_admin/m13/lab13_01_ado.htm Всё это замечательно. Но...
ТС пишет, что у него база Access 97. А ADO может ли работать с базой в формате Access 97? Ведь оно появилось только в Access 2000...

Не знаю, Дим, я с 97-м не работал, но пишут, что можно 929 ... Вообщем, пробовать надо :)
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537283
Код: vbnet
1.
2.
3.
4.
5.
Set dbe = CreateObject("DAO.DBEngine") 'или "DAO.DBEngine.35" для А97 
dbe.SystemDB = "путь к MDW"
dbe.DefaultUser = "Юзер"   
dbe.DefaultPassword = "Пасс"   
Set Db = dbe.OpenDatabase("путь к mdb")
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537870
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Пробовал так,

Set cn = CreateObject("ADODB.Connection")
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\base.mdb;Jet OLEDB:System Database=C:\group.mdw;User ID=vlad;Password=qwerty"
cn.Open
Set rs = CreateObject("ADODB.Recordset")
rs.CursorType = 3
rs.LockType = 3
rs.Open "Tabl1", cn

При выполнении вылетает ошибка Windows Script Host:Ошибочная инструкция SQL;предполагалось DELETE,INSERT,PROCEDURE,SELECT или UPDATE , не понятно в чем дело!???
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537874
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ikod,
так надо , вроде
Код: vbnet
1.
2.
...
rs.Open "select * from Tabl1", cn
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537883
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
guest_rusimportikod,
так надо , вроде
Код: vbnet
1.
2.
...
rs.Open "select * from Tabl1", cn

недавно, кстати вопрос поднимался, что на таблицах Open("Tab1") даёт ошибку и надо Open "select * from Tabl1"
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537893
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да отрабатывает, спасиб
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537898
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
et cn = CreateObject("ADODB.Connection")
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\base.mdb;Jet OLEDB:System Database=C:\group.mdw;User ID=vlad;Password=qwerty"
cn.Open
Set rs = CreateObject("ADODB.Recordset")
rs.CursorType = 3
rs.LockType = 3
rs.Open "select * from Tabl1", cn

Начало сценария есть), теперь понять бы как прописать добавление новой записи в таблицу с внесением данных в столбцы: Nomer/Счетчик; Date/Дата,время; Type/Числовой; Consul/Текстовой !???
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537932
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikodтеперь понять бы как прописать добавление новой записи
главное - не говори, что за данные и откуда они берутся в скрипте...
классический способ:
https://ru.wikipedia.org/wiki/Insert_(SQL)
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537947
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikodПри выполнении вылетает ошибка Windows Script Host:Ошибочная инструкция SQL;предполагалось DELETE,INSERT,PROCEDURE,SELECT или UPDATE , не понятно в чем дело!???у процедуры Open есть ещё пятый параметр, укажи там 2 ( adCmdTable )
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537951
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ikodНачало сценария есть), теперь понять бы как прописать добавление новой записи в таблицу с внесением данных в столбцы: Nomer/Счетчик; Date/Дата,время; Type/Числовой; Consul/Текстовой !???
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
...
rs.Open "select * from Tabl1", cn,,,2
rs.AddNew
rs.Fields("Date")=ЗначениеДаты
rs.Fields("Type")=4
...
rs.Update
rs.Close
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39537953
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поправил
Панург
Код: vbnet
1.
2.
3.
...
rs.Open "Tabl1", cn,,,2'<-поправил
...
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39538185
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо за помощь добрые люди, буду тестить
...
Рейтинг: 0 / 0
VBS для внесения данных в mdb
    #39540485
ikod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как сделать, чтобы при ошибке запуска этого скрипта создавался лог-файл??
...
Рейтинг: 0 / 0
21 сообщений из 21, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBS для внесения данных в mdb
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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