ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
25 сообщений из 180, страница 4 из 8
  4  все
в чем глюк?
    #32087694
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Dim StrSQL as string

Me.GNOMER может лучше записать так Me.GNOMER.Value

и проверять IsEmty и/или IsNull

по эксперементируй
...
Рейтинг: 0 / 0
08.01.2003, 17:07
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087702
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
ясно но с вба как быть? там ведь запрос в БД адресовать надо какая форма для этого? не подскажешь?
...
Рейтинг: 0 / 0
08.01.2003, 17:12
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087709
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
если тебе нужон реальный запрос с каким то именем, то
Код: plaintext
CurrentDb.CreateQueryDef  "SumLen" , StrSQL

если для внутренней работы используй recordset
если для контролов recordsourse/rowsourse

извени, но мне пора:(
...
Рейтинг: 0 / 0
08.01.2003, 17:17
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087710
Фотография Cooper
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cooper
Участник
2 яяя

Ничего себе у тебя тут активная деятельность!!! Я помочь не могу, потому как незнам как. Но поддерживаю морально!
...
Рейтинг: 0 / 0
08.01.2003, 17:18
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087713
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
2 Sfagnym... большой спасибо за огромную помощь...
...
Рейтинг: 0 / 0
08.01.2003, 17:22
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087726
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Верно ли я понял, что за время моего отсутствия проблема решилась?
...
Рейтинг: 0 / 0
08.01.2003, 17:34
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087883
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
не до конца...

чем vba не нарвится тип: стринг в:
Dim StrSQL As String
'* = AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER,AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER],AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, AVTO.PERSONAL , AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING
StrSQL = "SELECT * FROM AVTO WHERE "
MsgBox ((StrSQL))
If Me.SVA.Value <> 0 Then
StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ")
MsgBox Err.Description
End If

на StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ") - он ругается "type mismatch"
...
Рейтинг: 0 / 0
09.01.2003, 09:13
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087907
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ")
Код: plaintext
StrSQL=StrSQL &  "AVTO.SVA = '*" & Forms!AVTO!SVA & "*'"


MsgBox Err.Description

Код: plaintext
1.
2.
Ну зачем же так пессимистично  ; 0 )
Можно хотя бы задать условие
If err.Number<> 0
...
Рейтинг: 0 / 0
09.01.2003, 10:09
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087915
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
радость ты моя чтоб я без тебя делала? СПАСИБО ОГРОМНОЕ... с меня ящик пива...

еще вопрос: QueryDefs.Delete "SumLen" на попытку удалить существующий запрос с этим именем.... пишет переполнение... почему?
...
Рейтинг: 0 / 0
09.01.2003, 10:25
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087930
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
CurrentDb.QueryDefs.Delete "SumLen"
...
Рейтинг: 0 / 0
09.01.2003, 10:56
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087933
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
еще раз спасибо... и последний вопрос (чесное слово самый последний) есть ли функция в аксесс для того чтобы по этому запросу формировался отчет или делать рыбу с обращением к этому запросу от лица отчета?
...
Рейтинг: 0 / 0
09.01.2003, 11:00
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087954
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
> чесное слово самый последний

Да ладно уж... Сколько было этих "честных"-то...

Надо на основе этого запроса построить отчет. Чего тут сложного-то? Аксесс как раз и создан для таких действий, мастеров полно...
А дальше из кода, после того как сформировался нужный запрос, открывать отчет:
DoCmd.OpenReport "MyReport"

Кстати, пива ждать в каком формате? BMP или JPG?
...
Рейтинг: 0 / 0
09.01.2003, 11:11
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087955
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
а ты где находишься... если в пределах досягаемости то можно и в живую...))
...
Рейтинг: 0 / 0
09.01.2003, 11:12
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087965
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Это когда как ;0)
Работаю в Алтуфьево, живу на Щелковской

Но это не главное. С отчетом-то как, разобралась?
...
Рейтинг: 0 / 0
09.01.2003, 11:19
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087967
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
если я на ","
напишу что-то типа:
If Len(params) <> 0 Then
Left (params) + ", "
End If
оно отработает?
...
Рейтинг: 0 / 0
09.01.2003, 11:20
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087969
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
почти... сейчас ковыряю...
...
Рейтинг: 0 / 0
09.01.2003, 11:21
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087973
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Left (params) + ", "

Нет. params=Left$(params) + ", "
...
Рейтинг: 0 / 0
09.01.2003, 11:25
| Ответить | Цитировать | Написать  
в чем глюк?
    #32087974
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
точно-точно ... сиб-сиб...
...
Рейтинг: 0 / 0
09.01.2003, 11:26
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088012
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
2 AlexJujice

хотя не совсем так правильно :
If Len(params) <> 0 Then
params = params & ", "
End If

.... так что я еще не совсем потерянный для общества человек... главное работает...
SHE'S A LIVE..., A LIVE...!!!
...
Рейтинг: 0 / 0
09.01.2003, 12:04
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088020
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Код: plaintext
1.
2.
If Len(params) <>  0  Then 
params = params &  ", "  
End If


Ну так смотря что нужно:
если вся строка, то так, а если первые n символов, то
Left$(params, n)

Код: plaintext
SHE'S A LIVE..., A LIVE...!!!

Поздравляю!
Но мобыть все-таки правильнее ALIVE??? (типа жыф)
...
Рейтинг: 0 / 0
09.01.2003, 12:10
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088024
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
может и так... спасибо за ликбез по англу...))) уряяяяяяяяяяяя.....!!!!!!!! главное заработало...
...
Рейтинг: 0 / 0
09.01.2003, 12:13
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088027
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
гы....... рано радовалась... он теперь на пустые обьекты при обходе ругаться начал... почему?...
...
Рейтинг: 0 / 0
09.01.2003, 12:15
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088048
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
вот я и грю - рано честными словами разбрасываисси!

Поподробнее можно?
...
Рейтинг: 0 / 0
09.01.2003, 12:31
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088067
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
пример:
If Me.TBS.Value <> 0 Then- ест
If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.TBS = -1 "

If Me.OPT.Value <> 0 Then-давится и при =0 и при = -1...

If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.OPT = -1 "

End If

If Me.AKVA.Value = -1 Then-давится и при =0 и при = -1...
If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.AKVA = -1"
End If
End If

почему понять не могу... изврат... бросаю аксесс... возвращаюсь в скулл...
...
Рейтинг: 0 / 0
09.01.2003, 12:42
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088072
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
говорит что не содержит значения... тогда как оно там есть...(((
...
Рейтинг: 0 / 0
09.01.2003, 12:45
| Ответить | Цитировать | Написать  
25 сообщений из 180, страница 4 из 8
  4  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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