ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Элементарщина
11 сообщений из 11, страница 1 из 1
Элементарщина
    #39305186
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
Доброго времени суток, подскажите в чем я ошибаюсь

Код: vbnet
1.
2.
pathpap = pathOba & Trim(rst![dolgnik]) & "_" & Trim(rst!kd)
'pathpap = """" & pathpap & """


в
Код: vbnet
1.
debug.print pathpap



Выводятся
"C:\work\data\Иванов Иван Иванович_28587276"
C:\work\data\Иванов Иван Иванович_28587276

И так и так получается ошибка.... Нужно просто создать папку для каждой записи в rst...
...
Рейтинг: 0 / 0
07.09.2016, 13:42
| Ответить | Цитировать | Написать  
Элементарщина
    #39305190
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
Блин не дописал что делаю
Код: vbnet
1.
fso.createfolder (pathpap)

и возникает ошибка run time erorr 91
...
Рейтинг: 0 / 0
07.09.2016, 13:44
| Ответить | Цитировать | Написать  
Элементарщина
    #39305191
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
ккэпИ так и так получается ошибка...А в чём ошибка, если значения
ккэпВыводятся
?

ккэпНужно просто создать папку для каждой записи в rst...Ну и где собсно код создания папки?
...
Рейтинг: 0 / 0
07.09.2016, 13:45
| Ответить | Цитировать | Написать  
Элементарщина
    #39305195
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
ккэпвозникает ошибка run time erorr 91Это "Object variable or With block variable not set". Покажите инициализацию fso.
...
Рейтинг: 0 / 0
07.09.2016, 13:47
| Ответить | Цитировать | Написать  
Элементарщина
    #39305196
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
AkinaккэпИ так и так получается ошибка...А в чём ошибка, если значения
ккэпВыводятся
?

ккэпНужно просто создать папку для каждой записи в rst...Ну и где собсно код создания папки?

Выводятся это через Debug.print копирую значение....

fso.createfolder (pathpap)

А ошибка run time eror 91
...
Рейтинг: 0 / 0
07.09.2016, 13:49
| Ответить | Цитировать | Написать  
Элементарщина
    #39305201
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
Akinaккэпвозникает ошибка run time erorr 91Это "Object variable or With block variable not set". Покажите инициализацию fso.

Код: vbnet
1.
dim fso as filesystemobject
...
Рейтинг: 0 / 0
07.09.2016, 13:50
| Ответить | Цитировать | Написать  
Элементарщина
    #39305211
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
И это ВСЁ? ну ваще...
Судя по дефиниции, референсная библиотека не подключена. И CreateObject небось тоже отсутствует...
...
Рейтинг: 0 / 0
07.09.2016, 14:06
| Ответить | Цитировать | Написать  
Элементарщина
    #39305212
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
AkinaИ это ВСЁ? ну ваще...
Судя по дефиниции, референсная библиотека не подключена. И CreateObject небось тоже отсутствует...

Неа, а что надо?) Простите за безграмотность, только вспоминаю спустя 10 лет как рабоать в VBA
...
Рейтинг: 0 / 0
07.09.2016, 14:07
| Ответить | Цитировать | Написать  
Элементарщина
    #39305220
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Если референсная библиотека подключена, то должно быть
Код: vbnet
1.
2.
3.
Dim fso As FileSystemObject
Set fso = New FileSystemObject
'...


Если нет, то
Код: vbnet
1.
2.
3.
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
'...
...
Рейтинг: 0 / 0
07.09.2016, 14:14
| Ответить | Цитировать | Написать  
Элементарщина
    #39305222
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
AkinaИ это ВСЁ? ну ваще...
Судя по дефиниции, референсная библиотека не подключена. И CreateObject небось тоже отсутствует...

Если есть возможность дайте пжл краткий пример кода который бы тупо создал папку с именем текстовой переменной...
...
Рейтинг: 0 / 0
07.09.2016, 14:14
| Ответить | Цитировать | Написать  
Элементарщина
    #39305224
ккэп
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ккэп
Гость
[quot Akina]Если референсная библиотека подключена, то должно быть
Код: vbnet
1.
2.
3.
Dim fso As FileSystemObject
Set fso = New FileSystemObject
'...



Спасибо Большое. Вы гений!
...
Рейтинг: 0 / 0
07.09.2016, 14:16
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Элементарщина
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39305212&tid=1613182]:
 0ms
get settings:
 8ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 244ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 371ms
total:  699ms
созд. / загр.: 699ms
x
x
Закрыть


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