Страница: 1 | 2 | 3 | 4 |
Вопрос: Внимание! Конкурс!!
Добавлено: 15.11.06 13:44
Автор вопроса: nat-z
Ответы
Всего ответов: 55
Номер ответа: 31
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #31
Добавлено: 21.11.06 14:59
Номер ответа: 32
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #32
Добавлено: 21.11.06 15:06
А ОС пашет и всегда пахала!!!
Номер ответа: 33
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #33
Добавлено: 21.11.06 15:27
Тут уже без меня понаписали, так что я буду оставлять свои комментарии:
Далее
Dim rs1, rs2 As New ADODB.Recordset
На VB6 пока так нельзя...
Но вот так:
Dim rs1 New ADODB.Connection , rs2 As New ADODB.Recordset
Номер ответа: 34
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #34
Добавлено: 21.11.06 15:31
Скачай с интернета, он везде есть
Номер ответа: 35
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #35
Добавлено: 21.11.06 16:06
По-моему ты просто забыла занова объявить переменную cn
Нет - просто неудачно скопировала!
В натуре сейчас у меня на экране сейчас нарисовано вот так:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0ata Source=" & GBmenu.Pth0 & "\" & “GBmax.mdb”
rs.Source = ("SELECT * FROM GBIND WHERE NPP=1"
rs.Open
Только вот cn и і rs - это 2 разных файла или 2 ипостаси одного и того же? Мне просто надо открыть ипрочитать один файл! Как это пишется? В Clipper'e все проще!!!
И дальше:
'Do Until rs.EOF
' ''If GBind.npp = 1 Then
' If i < 10 Then
' 'GB_zakaz1.Oper.Caption = comment
'
' 'GB_zakaz1.Label [1].Visible = True
' 'GB_zakaz1.Label .Visible = True
' 'GB_zakaz1.Label .Caption = gbind.comment
' 'GB_zakaz1.Check .Visible = True
' 'GB_zakaz1.Check .enable = True
' 'GB_zakaz1.Label .Caption = gbind.Name
' i = i + 1
' End If
' ''Else
' ''End If
'rs.MoveNext
'Loop
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
Номер ответа: 36
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #36
Добавлено: 21.11.06 16:12
это что?
Скачай с интернета, он везде есть
Просто скачать и поставить в c:\windows\system32??
А почему егоу меня не было? Ведь работа с dbf поддерживалась!!!
Номер ответа: 37
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #37
Добавлено: 21.11.06 16:15
А вот моя лепта в развитие VB:
Couldn't Find Installable ISAM
(обращений: 3235 с 26.11.2002)
http://am.rusimport.ru/MsAccess/topic.aspx?id=213
Разделы: Ошибки
Описание: Данную ошибку можно получить при попытке импортировать-экспортировать данные из Excel, dBase, текстовых и других типов файлов. Данная ошибка обычно происходит из-за отсутствия некоторых библиотек или некорректной их регистрацией в реестре.
Чаще всего установка офиса "по умолчанию" не устанавливает эти драйвера. Необходимо запустить программу установки офиса в режиме ручного выбора компонентов и выбрать пунтк "Доступ к данным" (Data Access). Если некоторые драйвера отсутствовали, то они будут скопированы на диск и зарегистрированы в системе.
Однако иногда после этого не удаётся устранить данную ошибку. В данном случае, если файлы драйверов уже присутвсуют в системе - они некорректно зарегистрированы в реестре. В данном случае необходимо попробовать зарегистрировать соответсвующую dll в системе амостоятельно с пом. Regsvr32.exe.
Если и это не работает - то можно попробовать запустить установку офиса с командной строкой:
setup /y /r
Если устранить ошибку не удалось, то необходимо попробовать полностью деинсталлировать Ms Access, после чего найти на диске файлы:
Msexcl35.dll (Excel) Mstext35.dll (Text)
Msxbse35.dll (dBase) Msxbse35.dll (FoxPro)
и переименовать их, после чего установить Access заново.
Автор: "найдено в интернете"
Номер ответа: 38
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #38
Добавлено: 21.11.06 16:24
Может, тоже скачал о потом поставил, не помню уже
Ксати, советую завести какой-нибудь клиент, а то ты так часто на форум ходишь. Неудобно, а так стукнул в асю. И тебе ответили ))
Номер ответа: 39
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #39
Добавлено: 21.11.06 16:32
Но я ведь в Access сама без проблем закачивала из dbf!!!
Нашла ссылки для закачки - просят отправить sms то на германский, то на росс номер и проголосовать. Развод? А единственный бесплатн файл кажется для W98, а у меня XP. Может, кто сможет прислатьсвой родной файл (только для XP!!!!!). Сразу +3!!!!!
Номер ответа: 40
Автор ответа:
nat-z
Вопросов: 13
Ответов: 85
Профиль | | #40
Добавлено: 21.11.06 16:51
А за что у меня полбала сняли? ))))))))) (жаль смайликов нету)
У меня есть парень и не в icq а в риалк
Номер ответа: 41
Автор ответа:
Artyom
Разработчик
Вопросов: 130
Ответов: 6602
Профиль | | #41
Добавлено: 21.11.06 16:59
Гм, непонятно тогда какой в приз получит победитель конкурса?
Номер ответа: 42
Автор ответа:
Shark
ICQ: 284036855
Вопросов: 35
Ответов: 155
Web-сайт:
Профиль | | #42
Добавлено: 21.11.06 18:56
Куда выслать файл?
это не файлы это объекты для работы с бд. Но относятся к одному и тому же. cn это подключение к БД, а rs это выборка определенных данных из БД (например таблицы)
Номер ответа: 43
Автор ответа:
Shark
ICQ: 284036855
Вопросов: 35
Ответов: 155
Web-сайт:
Профиль | | #43
Добавлено: 21.11.06 19:38
У меня работает вот так
Dim rs As New ADODB.Recordset
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0ata Source=" & App.Path & "\chit.mdb"
rs.ActiveConnection = cn
rs.Open ("SELECT * FROM chitatel"
Text1.Text = rs.Fields(1)
Номер ответа: 44
Автор ответа:
Shark
ICQ: 284036855
Вопросов: 35
Ответов: 155
Web-сайт:
Профиль | | #44
Добавлено: 21.11.06 19:45
http://www.vbnet.ru/faq/showtopic.asp?id=135 это про сжатие
Номер ответа: 45
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #45
Добавлено: 21.11.06 23:24
Я - о том, что в онлайне за полчаса твои все проблемы решить можно. Задаешь вопрос - сразу получаешь ответ. Или у тебя с парнями не ладится?